Page 1 sur 1

Copier des fichiers

Publié : ven. 09/mars/2012 16:50
par langa68
salut,

J'ai copié l'exemple CopyFile() et l'ai appliqué a mes besoins.
Tout fonctionne parfaitement seulement lorsque je remplace le nom du fichier par une étoile (*) rien ne fonctionne plus.
Pouvez vous m'aider??

Code : Tout sélectionner

  Dossiersource$="E:\Download\"
  Dossiercible$="E:\Download\01test\"
  Fichier$="*.txt"
  
  
  
  If CopyFile(Dossiersource$+Fichier$, Dossiercible$+Fichier$)
    Debug "Fichier déplacé et renommé avec succès."     
  Else 
    Debug "Echec, le fichier ne peut pas être renommé et déplacé." ; Echec si par exemple le fichier (ou le disque) n'existe pas.
  EndIf
  
Merci

Re: Copier des fichiers

Publié : ven. 09/mars/2012 20:50
par case
on ne peux pas nommer un fichier '*'

la commande copie un fichier dont le nom et le chemin est connu.
si le but est de faire comme avant sous dos un espèce de copy *.* il vas falloir programmer toi même la fonction.

regarde du coté de ExamineDirectory()

Re: Copier des fichiers

Publié : sam. 10/mars/2012 9:50
par langa68
Merci pour ta réponse. Je vais essayer avec ExamineDirectory().

Re: Copier des fichiers

Publié : lun. 12/mars/2012 8:45
par Mindphazer
Ou sinon tu fais un RunProgram d'un xcopy...

Re: Copier des fichiers

Publié : lun. 12/mars/2012 10:56
par langa68
Mindphazer a écrit :Ou sinon tu fais un RunProgram d'un xcopy...

Alors la????

Re: Copier des fichiers

Publié : lun. 12/mars/2012 12:57
par Backup
langa68 a écrit :
Mindphazer a écrit :Ou sinon tu fais un RunProgram d'un xcopy...

Alors la????

ben oui comme ça :

Code : Tout sélectionner

; ******************procedure de copy *************************
procedure copy (source.s,destination.s)
	; By Dobro
	result$="?/c  xcopy "+source.s+" "+destination.s
	if prg=RunProgram("cmd.exe",  result$ , "", #PB_Program_Wait) 
		CloseProgram(prg)
	endif
EndProcedure

; ************************************************************

source.s=" E:\Dobro\Mes_Photos\*.jpg "
destination.s="E:\Dobro\Mes_Photos\img\"
copy (source.s,destination.s)

je copie tout les jpg se trouvant dans : E:\Dobro\Mes_Photos\*.jpg
ici : E:\Dobro\Mes_Photos\img\
;)

Re: Copier des fichiers

Publié : lun. 12/mars/2012 18:12
par langa68
Merci Dobro