<%
dim wshshell,retcode
set wshshell=server.CreateObject("WScript.Shell")
cmd=server.mappath("xxx.exe")
response.write cmd
retcode=wshshell.run(cmd,1,true)
if retcode=0 then
response.write "程序没有运行!"
else
response.write "程序有运行!"
end if
set WShShell=nothing%>
dim wshshell,retcode
set wshshell=server.CreateObject("WScript.Shell")
cmd=server.mappath("xxx.exe")
response.write cmd
retcode=wshshell.run(cmd,1,true)
if retcode=0 then
response.write "程序没有运行!"
else
response.write "程序有运行!"
end if
set WShShell=nothing%>
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货