ASP在线解压文件及采集gzip压缩的页面的方法

时间:2021-05-02

有时我们需要在线解压缩文件,本文就介绍了使用7za程序和gzip进行在线解压缩文件的方法。

由于winrar的ming令行工具不支持zip格式的文件,所以我选择了7z的ming令行工具7za.exe,在百度搜索下就可以找到该程序。

在使用下面的代码前把cmd.exe(windows文件夹下有)和7za.exe拷贝到asp程序目录。

代码(JScript格式) 时间关系,并没有写更多的容错以及返回值问题。

function unZip(file){ //在线解压zip函数 //by fisker (http://ifisker.com lionkay@gmail.com) var objFso=Server.CreateObject("scripting.FileSystemObject"); var objWshShell=Server.CreateObject("Wscript.Shell"); var zipFile=Server.MapPath(file); if(!objFso.FileExists(zipFile)) return false; var runcmd=Server.MapPath("cmd.exe")+" /c "+Server.MapPath("7za.exe")+" x "+zipFile+" -y -o"+Server.MapPath("./"); var RetCode = objWshShell.Run(runcmd,1,true); if(RetCode!=0)return false; delete objWshShell; delete objFso; }

关于gzip压缩页面的问题

思路:用ServerXMLHTTP组件下载页面,保存为*.zip文件,解压文件,读取文件。

代码(JScript格式)

function getGzipPage(url){ //Gzip格式页面采集程序 //by fisker (http://ifisker.com lionkay@gmail.com) var fileStream; var xmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP"); xmlHttp.open("GET",url,false); xmlHttp.send(null); fileStream=xmlHttp.responseBody; delete xmlHttp; var objStream = Server.CreateObject("ADOD"+"B.Stream"); objStream.Type = 1; objStream.Open(); objStream.write(fileStream); objStream.SaveToFile(Server.MapPath("tmp.html.zip"),2); objStream.Flush(); objStream.Close(); delete objStream; unZip("tmp.html.zip"); var str=ReadFile("tmp.html"); //ReadFile,deleteFile就是简单的文本读取和文件删除函数,未附代码 deleteFile("tmp.html.zip"); deleteFile("tmp.html"); return str; }

文章来自: 翔宇亭乐园(http://www.biye5u.com) ,转载时请保留此信息。

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章