ASP在服務器自動解壓RAR文件
<%
dim ylj,ywj,Mlpath,Shell,rarcomm,RetCode,cmd,comm,fso
Mlpath="E:\page\mian\" '存放RAR.EXE和CMD.EXE的路徑
ylj=Server.mappath("mian")&"\" '解壓文件后所放的路徑
ywj=Server.mappath("mian\apathy.rar") '要解壓的RAR文件
Set Shell = Server.CreateObject("WScript.Shell")
rarcomm= "E:\page\mian\cmd.exe /c "&Mlpath&"rar.exe x -t -o+ -p- "
cmd=rarcomm&ywj&" "&ylj
RetCode = Shell.Run(cmd,1, True)
%>
就是用Server.CreateObject("WScript.Shell")來執(zhí)行CMD.EXE來運行RAR.EXE文件來解壓RAR文件的。
相關文章
GetPaing 函數(shù)之asp采集函數(shù)中用到的獲取分頁的代碼
GetPaing 函數(shù)之asp采集函數(shù)中用到的獲取分頁的代碼...2007-09-09
asp 實現(xiàn)檢測字符串是否為純字母和數(shù)字組合的函數(shù)
asp 實現(xiàn)檢測字符串是否為純字母和數(shù)字組合的函數(shù)...2007-08-08
ASP中Utf-8與Gb2312編碼轉換亂碼問題的解決方法 頁面編碼聲明
ASP程序在同一個站點中,如果有UTF-8編碼的程序,又有GB2312編碼的程序時,在瀏覽UTF-8編碼的頁面后,再瀏覽當前網(wǎng)站GB2312的頁面,GB2312編碼的頁面就會出現(xiàn)亂碼2012-02-02

