‘’‘’test.vbs
‘’‘’*********************
‘’‘’上面用SHELL对象启动程序
‘’‘’*********************
Set WshShell = Wscript.CreateObject("Wscript.Shell")
WshShell.Run ("c:\wzzip.exe c:\test.zip c:\a.txt c:\b.txt")


‘’‘’test.asp
‘’‘’*********************
‘’‘’上面用SHELL对象启动程序
‘’‘’*********************
<script language="VBScript.Encode" runat=server>
‘’‘’上面用SHELL对象启动程序
Set WshShell = server.CreateObject("Wscript.Shell")
IsSuccess = WshShell.Run (" c:\wzzip.exe c:\test.zip c:\a.txt c:\b.txt" ,1, true)
if IsSuccess = 0 Then
Response.write " 命令成功执行！"
else
Response.write " 命令执行失败！权限不够或者该程序无法在DOS状态下运行"
end if
</script>

感谢 靓哥 的投稿 本文仅代表作者观点，与楚天站长站立场无关。