Copier un fichier vers un autre dossier

Bonjour,

je suis debutant en vbs. Jai reussi a me depatouiller avec divers exemples sur le net pour faire ce script de copie d'un fichier et qui le renomme à la date du jour. Sur mon poste, windows xp, il s'execute correctement. Des que je le lance sur un serveur 2003, il me met erreur 800004C: path not found.

Avez vous une idée? J'insiste sur le fait que les chemins sont tous corrects.

Merci d'avance.


Code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Function FileCp (strSourceFile, strTargetFile) Const OverwriteExisting = True Set objFSO = CreateObject("Scripting.FileSystemObject" ) If Not objFSO.FileExists(strSourceFile) Then MsgBox "Fichier " & strSourceFile & " introuvable", vbExclamation Exit Function End If objFSO.CopyFile strSourceFile , strTargetFile, OverwriteExisting Set objFSO = Nothing   End Function   FileCp "c:\test.txt", "c:\"& Mid(Date,4,2) & Left(Date,2) & Right(Date, 4) & ".txt"

---

sur qu'elle ligne l'erreur

Citation:

---

Envoyé par kofky0

...
Avez vous une idée? J'insiste sur le fait que les chemins sont tous corrects.
...

---

vérifie les quand même en les affichant

Code:

---

1 2 3 4 5

Function FileCp (strSourceFile, strTargetFile) Const OverwriteExisting = True MsgBox "Copie fichier : " & vbcrlf & strSourceFile & vbcrlf & " vers " & vbcrlf & strTargetFile ...

---

Bonjour

Quand tu utilises la fonction avec cette ligne

Code:

---

FileCp "c:\test.txt", "c:\"& Mid(Date,4,2) & Left(Date,2) & Right(Date, 4) & ".txt"

---

que tu dis lancer sur un serveur, celui-ci ne sait pas où est c, ne faudrait-il pas indiquer aussi la machine ?

Starec

merci a vous.

Finalement jai codé d'une autre facon en regardant la faq et cette fois ca fonctionne.

Merci à vous!

Un petit clic sur le bouton résolu, s'il te plaît?

Merci.