erreurs vbs - script conversion .tra vers .pnm
Bonjour,
pouvez vous m'aidez pour mon script VBS?
Il y a deux erreurs :
- ligne 6, "fichier introuvable", erreur 800A0035
- ligne 7, "variable non définie "rename"", erreur 800A01F4
Code:
1 2 3 4 5 6 7 8 9 10
| *
ChemNomFichier = InputBox("Entrez le chemin du fichier à convertir", "Chemin du fichier à importer")
NewFichier = ChemNomFichier & ".txt"
OrigineFichier = ChemNomFichier & ".TRA"
Set WshShell = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
fso.MoveFile OrigineFichier, ChemNomFichier & ".txt"
Rename OrigineFichier, ChemNomFichier & ".txt"
arg1_ext = Left(arg(0), Len(arg(0))- 4 ) & ".txt" |
Merci d'avance.