用如下代码：
<%
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 运行时错误
应该如何解决呢？我在本机上调试是正常的。
IUSR的权限不够的
试一下everyone权限。
将IUSR_机器名这个帐号加入到管理员组?
请问下，在哪里可以加入。服务器是独立的，操作系统是win2003
管理工具-计算机管理-本地用户和组
虚拟主机不够权限
to net_lover，加进去了�
