你的位置: Kiyo'Space首页 ASP 阅读文章 欢迎留下您的足迹

用asp程序调用压缩winzip

[ ASP ] 分享

谁能写个asp程序或告诉我,怎样把网站的文件夹和文件压缩成一个zip文件, 

 

我用了winnt 下WSH 的来调用程序winzip.exe 程序一直处处以运行中.

代码:
<%
Set WshShell = server.CreateObject("Wscript.Shell")
IsSuccess = WshShell.Run ("c:\WinZip\WZSEPE32.EXE" ,1, true)
%>
请高手指点

IsSuccess = WshShell.Run ("c:\WinZip\WZSEPE32.EXE c:\myfile.zip c:\mypath\*.*" ,1, true)

好象还是老样
c:\myfile.zip 与c:\mypath\*.*是指什么?能解释下吗? 

c:\myfile.zip 是要生成的目的文件
c:\mypath\*.*是某路径下的所有源文件

我也是这样理解的,但是还是不行,不知怎回事?文件一直处于运行状态, 

你以前有没有掉用过wsh,?
<%
Set WshShell = server.CreateObject("Wscript.Shell")
IsSuccess = WshShell.Run ("c:\WinZip\WZSEPE32.EXE c:\myfile.zip c:\mypath\*.*" ,1, true)
%>
这样就可以了吗,程序会自动切到dos下吗?还是要加别的代码?请指点?

<%set fs=server.createobject("wscript.shell")
syf=fs.run("WinRAR.exe a -s c:\syf.rar c:\driver\*.*",1,true) 

%>我用这个行,我想ZIP也需要加参数吧,你可以先在DOS下试试看WinRAR.exe a -s c:\syf.rar c:\driver\*.*

我运行时无法显示, 

我c:\111\*.* 
syf.rar 要自己键吗?
<%set fs=server.createobject("wscript.shell")
syf=fs.run("WinRAR.exe a -s c:\syf.rar c:\111\*.*",1,true)
%>
我在dos上能运行,不知怎回事?

你的服务器上装RAR了吗,我看看,再有你可以看看RAR的帮助文件,只要用命令行能执行就应该没有问题的
syf.rar是自己起的,没错,

运行时候肯定是没有显示的。是在服务器的后台运行。 

几点注意:
winrar的路径中最好别有空格。路径最好写完整的绝对路径。
winzip也一样,先看看在DOS下能不能运行。如果能,那么在ASP中也能。


欢迎在此留下您的脚步






评论内容 (*必填):
(Ctrl + Enter 快速提交)