VB 6: copie de fichier

Question

Je débute en visual basic 6 et je voudrais réaliser un logiciel me permettant de comparer, mettre à jour ou ajouter des fichiers depuis un disque dur source vers un disque dur de sauvegarde.
Et je galère pour trouver une procédure qui me permette de copier des dossiers.
Merci de vos tuyaux

cs_ITALIA · Answer

ca devrait aller :

Private Sub btnCopie_Click() 

Dim fso 

Set fso = CreateObject("Scripting.FileSystemObject") 
fso = fso.CopyFolder(TXT_source.Text, TXT_destination1.Text) 
MsgBox "Dossier copié !" 

End Sub 

It@li@

thierrydelepine · Answer

ITALIA,

tu oubli une chose tres tres importante, c'est de detruire l'objet que tu viens de creer car si je met ton prog en boucle alors j'explose la memoire du PC.

Set fso = NOTHING

Il faut toujours détruire les objets que l'on créé.

Private Sub btnCopie_Click() 
Dim fso 
Set fso = CreateObject("Scripting.FileSystemObject") 
fso = fso.CopyFolder(TXT_source.Text, TXT_destination1.Text) 
MsgBox "Dossier copié !" 
set fso = NOTHING
End Sub 

il existe d'autres methodes pour faire des copies (API), celle la est simple mais nécessite une version de Internet explorer 5 sur le poste.

cs_ITALIA · Answer

OOOOOOOOOOUUUUUUPPPPPPPSSS

SI OU PLAIT JY SUIS PAS UN TIRROUUUUURISTE

It@li@

cs_padboy · Answer

voila, sa devrait t'aller ca (C'est une source de mon site http://www.techniquewindows.fr.fm)

VB 6: copie de fichier

4 réponses

Discussions similaires