求asp自动压缩文件夹成rar的。穷人分数不多，在线务求大神帮忙。
这个是文件路劲。根目录是website呢，求可行的压缩代码。 asp 压缩文件
[解决办法]
<%
'简单提一下，把Winrar.ext放到C:\WINDOWS\system32文件夹下，然后设置C:\WINDOWS\system32\cmd.exe与C:\WINDOWS\system32\winrar.exe文件IIS有读取运行权限。
Set WshShell = Server.CreateObject("WScript.Shell")
RetCode = WshShell.Run ("winrar a -ep c:\web\website\uploadpic\ c:\web\website\uploadpic",1, False) '打包
'RetCode =WshShell.Run ("WinRAR x -r -o+ c:\web\website\uploadpic\*.rar c:\web\website\uploadpic",1,True) 解压
If RetCode=0 Then Response.write "执行成功"
%>
