WDForge.org - Forums

Pb LanceAppli(....) et fichiers .vbs

Sujet: Pb LanceAppli(....) et fichiers .vbs
par nrobin sur 18/5/2007 11:53:06

Après avoir refait des essais, la méthode suivante n'exécute pas mon fichier .vbs.
(Je vérifie l'exécution avec une MessageBox dans le fivhier vbs.)

fic 	est une chaîne = ComplèteRep(fRepEnCours()) + "donneDateAcces.vbs"
arg1 	est une chaîne = fExtraitChemin(cheminFichier, fDisque) + fExtraitChemin(cheminFichier, fRépertoire)
arg2 	est une chaîne = fExtraitChemin(cheminFichier, fFichier) + fExtraitChemin(cheminFichier, fExtension)
arg3 	est une chaîne = ComplèteRep(fRepEnCours()) + "ficDateAcces.txt"

sTexte est une chaîne
sTexte = """" + fic + """ " + " """ + arg1 + """ """ + arg2 + """ """ + arg3 + """"
LanceAppli(sTexte, exeActif, exeNonBloquant)

Avant exécution, sTexte vaut la valeur suivante:
"C:\Mes Projets\PRGM\Exe\donneDateAcces.vbs" "F:\fic1\" "fic1.exe" "C:\Mes Projets\PRGM\Exe\ficDateAcces.txt"

Si j'exécute directement cette ligne dans l'invite de commande Windows, le fichier . vbs est bien exécuté.

Auriez-vous une explication rationnelle à me founir?
Là, çà fait un moment que je bloque.