高手,帮帮小妹...在本地测试是好好的.一传到服务器上就提示缺少对象.
是一段压解代码,调用了两个.exe文件.可是在本地测试是好好的.一传到服务器上就提示缺少对象.帮帮我啊..各位,先谢谢了
<%
'首先要降低浏览器安全级别
'csdb文件夹中包含cmd.exe   rar.exe   要压缩的文件（*.asp)   压缩后的存放目录为csdb\data.rar
on   error   resume   next
unzip_path=Server.mappath( "csdb ")& "\ "
Set   WshShell   =   server.CreateObject( "Wscript.Shell ")
IsSuccess   =   WshShell.Run   ( "winrar   a   "&unzip_path& "data   "&unzip_path& "*.mdb ",1,   False)
'WinRAR   <命令>   - <开关1>   - <开关N>   <压缩文件>   <文件...>   <@列表文件...>   <解压路径\>
'命令:   A   -   添加到压缩文件中
if   IsSuccess   =   0   Then
'Response.write   "   命令成功执行！ "
else
Response.write   "   命令执行失败！权限不够或者该程序无法在DOS状态下运行 "
end   if
if   err.number   <>   0   then
Response.Write   " <p> 错误号码： "   &   Err.number
Response.Write   " <p> 原因： "   &   Err.description
Response.Write   " <p> 错误来源： "   &   Err.Source
Response.Write  
end   if
%>

------解决方案--------------------
服务器禁止了运行Wscript.Shell


------解决方案--------------------
要查一下服务器上Wscript.Shell可不可用了，一般虚拟主机是禁用的