call main()
sub main()
Dim scmd
Set scmd = "c:\windows\system32\cscript.exe //nologo c:\s.vbs"
createobject("wscript.shell").run scmd,0,false
end sub
It gives me error:
Object required: '[string: "c:\windows\system32\"]' Code 800A01A8
Update
As it's not clear feel it best to point out your
Object Required
issue is due to this lineSet scmd = "c:\windows\system32\cscript.exe //nologo c:\s.vbs"
This is because an Object is expected but you are assigning it a string, by removing the
Set
your code will work (As Ekkehard.Horner has pointed out).
Below is my interpretation of situation. First looking at your code it almost looked like it had mixed the instantiation of the
WScript.Shell
object with the command line for the.Run()
method. It was my first stab at breaking down the code, rearranging it then putting it back together.
Original Answer
Your Set scmd
should be instantiating the WScript.Shell
(As Ekkehard.Horner points out you can use Server.CreateObject("WScript.Shell").Run
for a one off reference but I wouldn't recommend it).
The .Run()
should be executed by the instantiated scmd
object and passed the command line to execute.
Here is an example I've renamed some of the variables (scmd
to cmd
for example).
Call main()
Sub main()
'Renamed variables to cmd is your object and cmdline is your file path.
Dim cmd, cmdline
'Instantiate WshShell object
Set cmd = Server.Createobject("WScript.Shell")
'Set cmdline variable to file path
cmdline = "c:\windows\system32\cscript.exe //nologo c:\s.vbs"
'Execute Run and return immediately
Call cmd.Run(cmdline, 0, False)
End Sub
Things to consider
When using WScript.Shell in Classic ASP to run executables there are some things to consider;
Run command will execute using the current Application Pool identity.
Run will execute the executable on the server not at the client (server side).
If you love us? You can donate to us via Paypal or buy me a coffee so we can maintain and grow! Thank you!
Donate Us With