日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

通過(guò)ASP自動(dòng)解壓RAR文件_ASP教程

編輯Tag賺U幣
教程Tag:暫無(wú)Tag,歡迎添加,賺取U幣!

推薦:從ASP Web頁(yè)返回XML
概要 從 Active Server Pages (ASP) Web 頁(yè)返回 XML 數(shù)據(jù)是一種常見的編程要求。 實(shí)現(xiàn)此要求所用的方法因用來(lái)托管 ASP 應(yīng)用程序的 Microsoft Internet 信息服務(wù) (IIS) 的版本而異。 本文中的分步指南帶有相關(guān)的示例代碼,演示了怎樣從 ASP 頁(yè)返回可擴(kuò)展標(biāo)記語(yǔ)言 (XML)

 


    其實(shí)想實(shí)現(xiàn)這種功能很簡(jiǎn)單,首先要上傳一個(gè)RAR的解壓程序,就是RAR自己的解壓程序,只需要它的核心
程序RAR.EXE這個(gè)文件就可以了。然后就要上傳一個(gè)執(zhí)行RAR.EXE的程序 CMD.EXE 這個(gè)是windows里的程序(不必我在多說(shuō)了吧)。最后就開始執(zhí)行這些程序了�?匆幌孪旅娴�代碼

 

<%

 

dim ylj,ywj,Mlpath,Shell,rarcomm,RetCode,cmd,comm,fso

 

Mlpath="E:pagemian"    '存放RAR.EXE和CMD.EXE的路徑

 

ylj=Server.mappath("mian")&""  '解壓文件后所放的路徑

 

ywj=Server.mappath("mianapathy.rar")  '要解壓的rar文件

 

Set Shell = Server.CreateObject("WScript.Shell")

 

rarcomm= "E:pagemiancmd.exe /c "&Mlpath&"rar.exe x -t -o+ -p- "

 

cmd=rarcomm&ywj&" "&ylj

 

RetCode = Shell.Run(cmd,1, True)

 

%>

 

   就是用Server.CreateObject("WScript.Shell")來(lái)執(zhí)行CMD.EXE來(lái)運(yùn)行RAR.EXE文件來(lái)解壓RAR文件的。
以前不知道是否有前輩們發(fā)表過(guò)這些文章,但那位兄弟有興趣的可以以用這種方法來(lái)實(shí)現(xiàn)諸多類似與這樣的程序,希望你們可以找到一些更好的方法。

分享:在ASP中使用事務(wù)控制
julyclyde(原作) 作者系2月份微軟社區(qū)之星Microsoft China Community Star 在編程中,經(jīng)常需要使用事務(wù)。所謂事務(wù),就是一系列必須都成功的操作,只要有一步操作失敗,所有其他的步驟也必須撤銷。比如用ASP開發(fā)一個(gè)網(wǎng)絡(luò)硬盤系統(tǒng),其用戶注冊(cè)部分要做的事有: 將用戶信

來(lái)源:模板無(wú)憂//所屬分類:ASP教程/更新時(shí)間:2014-10-10
相關(guān)ASP教程