Discussion :

[marsupilami34]

Bonjour,
Je cherche à copier un fichier. J'ai trouvé ce code sur le forum

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oFSO.CopyFile("D:\Essai\monfichier.txt","D:\Essai2\ monfichier.txt ",True)

Mais lorsque j'ai écrit cela il me dit qu'il y a une erreur :

Attendu :=

Pourtnat j'ai bien déclaré

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim oFSO As Scripting.FileSystemObject

Quelqu'un a t il une idée pour résoudre mon problème ?
Merci d'avance.

Marsup.

[mout1234]

Salut,

Enlève simplement les parenthèses

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oFSO.CopyFile "D:\Essai\monfichier.txt","D:\Essai2\ monfichier.txt ",True

Les parenthèses ne servent que si tu as une valeur de retour de la méthode à récupérer.

[ouskel'n'or]

Essaie en supprimant les parenthèses

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oFSO.CopyFile "D:\Essai\monfichier.txt","D:\Essai2\monfichier.txt",True

A+

Et enlève l'espace après txt et après Essaie\

[marsupilami34]

Merci,
l'erreur n'y est plus.

Je vais tester la copie maintenant.

[marsupilami34]

J'ai une erreur qui apparait à cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oFSO.FileCopy "C:\DATA\trace.txt", "C:\trace.txt", True

L'erreur est :

Propiriété ou méthode non gérée par cet objet

Quelqu'un peut il m'aider.
Merci d'avance.

[ouskel'n'or]

As-tu activé la référence Microsoft Scripting RunTime ?
Dans l'éditeur VB -> Outils -> Références
Tu dis
Sinon, active et essaie avec la syntaxe que tu as proposée dans ton premier post

[marsupilami34]

Pour info les déclarations que j'ai faites sont les suivantes :

Dim oFSO As Object

Set oFSO = CreateObject("Scripting.fileSystemObject")

[marsupilami34]

Alors en effet, la référence Microsoft Scripting RunTime n'était pas activée.
Par contre j'ai le même message d'errreur.
Et quand je ré-écris avec ma première syntaxe avec les parenthèses ma ligne se met en rouge.

[ouskel'n'or]

Tu as pris le code où ?

[marsupilami34]

Dans les totoriels VB
http://warin.developpez.com/access/fichiers/#LI-D-3-a

[ouskel'n'or]

Ok. Alors essaie ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oFSO.CopyFile "D:\Essai\monfichier.txt", "D:\Essai2\"

Ce que j'ai dans l'aide en ligne c'est

FileSystemObject.CopyFile "c:\Mes Documents\lettres\*.doc", "c:\dossiertemp\"

Si tu as un pb, ce sera dans la déclaration. On verra
A+

Tu ne dois pas répéter le nom de ton fichier

[marsupilami34]

OK merci pour tout.
La ca marche nickel.

[mout1234]

J'ai une erreur qui apparait à cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

                                        oFSO.FileCopy "C:\DATA\trace.txt", "C:\trace.txt", True

L'erreur est :

Quelqu'un peut il m'aider.
Merci d'avance.

oFSO.CopyFile et non oFSO.FileCopy

[ouskel'n'or]

C'est ce qu'il avait mis dans son premier post... pas dans le suivant

[mout1234]

C'est ce qu'il avait mis dans son premier post... pas dans le suivant

J'avais vu mais il a du se mélanger les pinceaux à un moment donné...

J'ai une erreur qui apparait à cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oFSO.FileCopy "C:\DATA\trace.txt"....

C'était histoire d'éclaircir les raisons des bugs qu'il a eu dans ses premiers essais.