Bonjour,
je sais que la question a déjà été posée mille fois mais malgré des centaines d'exemple trouvé sur le net je sèche un peu là
Voici mon code:
Et voici le contenu du fichier et variabiliser dans contents:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Set objFSO = CreateObject("Scripting.FileSystemObject") userprofile = WScript.Arguments.Item(0) dim filesys, text, readfile, contents set filesys = CreateObject("Scripting.FileSystemObject") Set oShell = WScript.CreateObject("WSCript.shell") set readfile = filesys.OpenTextFile("D:\FVS_Integration\" & userprofile & "\command_OO.txt", 1, false) do while readfile.AtEndOfStream=false contents = readfile.ReadLine 'wscript.echo contents Set output = objFSO.CreateTextFile("D:\FVS_INTEGRATION\output.txt", 1) oShell.run ("cmd /C " & contents >> D:\FVS_Integration\output.txt") loop readfile.close
Lorsque j'exécute la commande PHP seule avec la redirection dans le fichier depuis un DOS cela fonctionne et me renvoie bien l'output mais pas dans mon VBS. Alors je mettrais ma main à couper qu'il faut faire des escape de quote un peu partout, mais malgré de nombreux tests, impossible de trouver la bonne syntaxe...C:\php\php.exe D:\IBR_TOOLS\php_depot\steria\sitescope\integration\integration_socle_technique.php --conf D:\IBR_TOOLS\conf_clients\sitescope\MTES_sitescope_serveurs_prod.xml --sitescope_utilise SIS2 --code_client INTEGRATION --verbose --fichier_fvs D:\FVS_INTEGRATION\ngreder\FVS.xls
D'avance merci pour votre aide![]()
Partager