ASP+WINRAR生成压缩包，不能同时压缩多个文件夹

用asp shell调用winrar在线打包文件夹，只能打包第一个文件夹，后面的无法打包进去。第一个打包成功后返回了0，后面的全都是返回的9，以下是部分代码
exefile = Server.MapPath("Rar.exe")
zipfile　＝"test.rar"
Set WshShell = server.CreateObject("Wscript.Shell")

for each folder in folders
strfiles = Server.MapPath(folder.name)
IsSuccess = WshShell.Run (exefile&" a -ep1 -m1 "&zipfile&" "&strfiles&" ",1,true)　'经测试，当遍历到第二个文件夹的时候就IsSuccess返回9，具体什么意思也不懂，但是第二个开始，后面的文件全部都压缩失败。
if IsSuccess = 0 Then
response.write("目录 "& folder.name &" 打包成功.")
else
response.write("目录 "& folder.name &" 打包失败.")
end if
next

这段代码在有的电脑上可以运行成功，既可把所有的文件夹添加进压缩包，但在有的电脑上只能添加遍历到的第一个文件夹。经测试发现有些电脑上不能对压缩包追加文件进去，也就是说如果有同名压缩名存在，则生成压缩包失败。