ASP在服務(wù)器自動解壓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文件的。
相關(guān)文章
GetPaing 函數(shù)之a(chǎn)sp采集函數(shù)中用到的獲取分頁的代碼
GetPaing 函數(shù)之a(chǎn)sp采集函數(shù)中用到的獲取分頁的代碼...2007-09-09asp 實現(xiàn)檢測字符串是否為純字母和數(shù)字組合的函數(shù)
asp 實現(xiàn)檢測字符串是否為純字母和數(shù)字組合的函數(shù)...2007-08-08ASP中Utf-8與Gb2312編碼轉(zhuǎn)換亂碼問題的解決方法 頁面編碼聲明
ASP程序在同一個站點中,如果有UTF-8編碼的程序,又有GB2312編碼的程序時,在瀏覽UTF-8編碼的頁面后,再瀏覽當(dāng)前網(wǎng)站GB2312的頁面,GB2312編碼的頁面就會出現(xiàn)亂碼2012-02-02