Installation

Question

Je voudrais creer une installation mais le probleme est que pour copier 10 fichier comme ca
CopyFile App.Path + "****", Chemin & "****", 1
       
c'est bien mais il faut que je copie plus de 100 fichier il n'y a pas un autre moyen pour copie le repertoire complet !! Avec des sous repertoire !!

PatDeLaYaute · Answer

Salut,
tu peux créer un fichier contenant tous les noms de fichiers à copiés pour lors de l'installation tu lit ce fichier et tu fait une 
boucle avec "copyfile..."

@+, bon courage

PatDeLaYaute

cs_BeCaSiNe · Answer

Peut tu me faire un exemple tu serrait trop gentil ! Ou me faire une source et tu la mais sur le site !
Parce que je ne voit pas comment on peut faire ?

cs_rene38 · Answer

Bonjour

Essaie :


Dim fs, Depuis, Juska
   Set fs = CreateObject("Scripting.FileSystemObject")
   Depuis = App.Path 'tous les sous-dossiers et fichiers de App.Path
   Juska = "C:\Chemin\Destination"
   MkDir Juska 'on crée le dossier
   fs.CopyFolder Depuis, Juska 'et on y recopie tout ce que contient App.Path
'il faudra probablement effacer certains fichiers (l'exe, ...)

cs_BeCaSiNe · Answer

OK ca fonctionne mais j'ai une dernier questions !
Comment faire pour un text box mais que a la 2 eme ligne la premier je ne veut rien !

cs_rene38 · Answer

TextBox Text1 (avec Multilne = True)

Text1.Text = vbCrLf & "Texte de la 2ème ligne ; la 1ère est vide"

cs_BeCaSiNe · Answer

Merci vous etes trop gentil les gar dernier questoin Je sais copier tout les fichier avec les repertoire mais je ne sais pas comment enlever (effacer) c'est fichier ?
J'ai essyer mais marche PO !

cs_rene38 · Answer

Dim fs, Dossiers
Set fs = CreateObject("Scripting.FileSystemObject")
Dossiers = "C:\Chemin\*"
fs.DeleteFolder Dossiers
'efface tous les sous-dossiers de C:\Chemin
'et les fichiers qu'ils contiennent
'mais pas les fichiers de C:\Chemin
'Pour effacer tous les fichiers .txt (par exemple) de C:\Chemin
'Kill "C:\Chemin\*.doc"

cs_BeCaSiNe · Answer

RE mercie est la dernier de dernier question  TOUT FONCTIONNE !
J'ai un fichier Mais il faut que je modifie 1 ligne qui est a peut pret au mileu du fichier comment je pourrais faire ?

Installation

8 réponses

Discussions similaires