RunProgram()... lance puis ferme mon programme

[Shinao]

Je vous manquais ?
Non, tant pis.

Bref, programme :

Code : Tout sélectionner

CreateFile(#BatInstall, "install.bat")
  WriteStringN(#BatInstall, "ping google.fr")
  WriteStringN(#BatInstall, "pause > nul")
  RunProgram("install.bat", "", "", #PB_Program_Wait)

Le .bat se lance et se ferme automatiquement, j'ai essayé toute les solutions au niveau des read/wait/..., rien ne fonctionne.

Quelqu'un sait pourquoi ?

PS: de plus, quand je crée mon .exe, le programme me dit que le fichier est utilisé par une autre application.

Thanks !

[Mindphazer]

Faut que tu fermes ton fichier, avant de l'utiliser :

Code : Tout sélectionner

CreateFile(#BatInstall, "install.bat")
WriteStringN(#BatInstall, "ping google.fr")
WriteStringN(#BatInstall, "pause > nul")
CloseFile(#BatInstall)
RunProgram("install.bat", "", "", #PB_Program_Wait)

[GallyHC]

Bonjour,

Comme dit par Mindphazer, il faut que tu fermes ton fichier, mais le code serait plus propore comme cela:

Code : Tout sélectionner

Define result.i

result = CreateFile(#PB_Any, "install.bat")
If result <> 0
  WriteStringN(result, "ping google.fr")
  WriteStringN(result, "pause > nul")
  CloseFile(result)
  RunProgram("install.bat", "", "", #PB_Program_Wait)
EndIf

cordialement
GallyHC

[Shinao]

Merci pour vos réponses, vraiment une erreur de débutant ;[

[venom]

un petit résolu dans ton titre







@++