Köra exe-fil

[Patric Johansson]

Jag håller på med ett litet VBScript som jag tänkte skulle köra ett program samt ett kommando till programmet.

 

C:\mapp\program.exe /kommando värde

 

Hur kan jag göra det?

 

Tack på förhand!

 

/ProTeuS

Resistance is futile. You will be assimilated.

- citat från "Star Trek - First Contact"

 

[dotgif]

Hej!

 

Du kan använda WScript (Windows Scripting) för att köra kommandon från ASP koden, se nedanstående exempel.

 

Observera att du måsta använda Windows Authentication på ASP-sidan eller ge IUSR_Machine kontot läs- och exec rättigheter på kommandot för att nedanstående skall funka):

 

Run method:

Dim oShell
Set oShell = Server.CreateObject ("WSCript.shell")
oShell.run "c:\dosomething.exe parameter1"
Set oShell = Nothing

 

Exec metod:

Dim oShell, oExec
Set oShell = Server.CreateObject("WScript.Shell")
Set oExec = oShell.Exec("cmd /c dir c:\inetpub\wwwroot\*.htm")
Do While oExec.Status = 0 and Response.IsClientConnected
If Not oExec.StdOut.AtEndOfStream Then
	strConsole = oExec.StdOut.ReadAll
	Exit Do
End If
Loop

Response.Write (Replace(strConsole,vbCrlf,"<br>"))

 

Se http://msdn.microsoft.com/scripting för mer info. Ett tips är att ladda ner sdk:en för wscript.

 

Mvh

 

Jimmy

 

 

[Patric Johansson]

tackar!

 

ska inte ha det i asp utan bara som en vbs-fil

 

[dotgif]

Funkar lika bra det. Ta antingen bort "Server." eller använd WScript.CreateObject i stället och WScript.Echo i stället för Response.Write.

 

/Jimmy