asp调用winrar压缩文件的问题?
用如下代码:
<%
on error resume next
unzip_path=Server.mappath("/ab")&"\"
Set WshShell = server.CreateObject("Wscript.Shell")
prompt = "winrar a "&unzip_path&"/ab/c/200912/data "&unzip_path&"/ab/c/200912/*.html "&unzip_path&"images"
IsSuccess = WshShell.Run (prompt,1, False)
if IsSuccess = 0 Then
Response.write " 命令成功执行!"
else
Response.write " 命令执行失败!权限不够或者该程序无法运行"
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
%>
在服务器上执行上面的代码后,提示:
命令成功执行!
错误号码:70
原因:没有权限
错误来源:Microsoft VBScript 运行时错误
应该如何解决呢?我在本机上调试是正常的。