leneuf22 a écrit :
un ptit espace :
Code :
- <input type="button" value="connection PT" id="bouton">
- <script language="VBScript">
- Sub bouton_onclick
- dim wsh, fso, f
- set wsh = CreateObject("WScript.Shell" )
- set fso = CreateObject("Scripting.FileSystemObject" )
- set f = fso.GetFile("c:\PTW525\pt525.exe" )
- wsh.Run f.ShortPath & " telnet.psl"
- end sub
- </script>
|
|
Merci à toi, cela fonctionne bien.
Pour info, j'avais solutionner le pb en faisant cela :
Code :
- <input type="button" value="toto" id="bouton1">
- <script language="VBScript">
- Sub bouton1_onclick
- Dim oShell
- Set oShell = CreateObject ("WSCript.shell" )
- oShell.run "cmd /C cd C:\PTW525 & pt525.exe telnet.psl server"
- end sub
- </script>
|
Par contre, je suis obligé d'utiliser CMD.EXE pour garder le path vers le programme