ASP自动解压RAR文件

Liuchao52baby

Liuchao52baby

2016-01-29 20:26

ASP自动解压RAR文件,ASP自动解压RAR文件
其实想实现这种功能很简单,首先要上传一个RAR的解压程序,就是RAR自己的解压程序,只需要它的核心
程序RAR.EXE这个文件就可以了。然后就要上传一个执行RAR.EXE的程序 CMD.EXE 这个是windows里的程序(不必我在多说了吧)。最后就开始执行这些程序了。看一下下面的代码

<%

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")来执行CMD.EXE来运行RAR.EXE文件来解压RAR文件的。
以前不知道是否有前辈们发表过这些文章,但那位兄弟有兴趣的可以以用这种方法来实现诸多类似与这样的程序,希望你们可以找到一些更好的方法。
展开更多 50%)
分享

猜你喜欢

ASP自动解压RAR文件

ASP
ASP自动解压RAR文件

通过ASP自动解压RAR文件

ASP
通过ASP自动解压RAR文件

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

怎么解压rar文件 rar文件怎么打开

rar
怎么解压rar文件 rar文件怎么打开

ASP中也能解压缩rar文件

ASP rar
ASP中也能解压缩rar文件

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

菜鸟详听ASP中也能解压缩rar文件

ASP
菜鸟详听ASP中也能解压缩rar文件

如何解决rar文件解压缩失败

电脑网络
如何解决rar文件解压缩失败

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

从数据表中取出第n条到第m条的记录的方法

从数据表中取出第n条到第m条的记录的方法

PS鼠绘逼真的耳朵

PS鼠绘逼真的耳朵
下拉加载更多内容 ↓