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:
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"
Message édité par kofky0 le 16-08-2007 à 04:30:41