如何用asp打开可执行程序

teddyboy98 2004-01-02 03:14:05

如何做个连接地址打开如下可执行文件—D:\Program Files\WinRAR\WinRAR.exe

...全文

78 21 打赏收藏转发到动态举报

写回复

用AI写文章

21 条回复

切换为时间正序

请发表友善的回复…

发表回复

yaolijie 2004-04-22

打赏
举报

test.vbs

Set WshShell = Wscript.CreateObject("Wscript.Shell")
WshShell.Run("cmd.exe /c f:\winrar\rar.exe x -t -o+ -p- d:\my.rar d:\")

teddyboy98 2004-01-03

打赏
举报

运行的时候出现exe.value=strPath错误，怎么解决啊:-(((

teddyboy98 2004-01-03

打赏
举报

请教具体的使用方法啊，up

bloodsha 2004-01-02

打赏
举报

建议去google查查WshShell和wscript的用法。

yt_yule 2004-01-02

打赏
举报

yt_yule 2004-01-02

打赏
举报

ygghost(刘华强) ( )：您的代码也没有成功执行，请详细解释WshShell.Run 的参数。

teddyboy98 2004-01-02

打赏
举报

这段有错误呀，我执行了，怎么一点反映都没有呢?
<a href="javascript:void(0)" onclick="Run('notepad')">记事本</a>

yt_yule 2004-01-02

打赏
举报

possible_Y(一切皆可能)(西南交大) :上面的代码行不通呀？
请执教！

possible_Y 2004-01-02

打赏
举报

<SCRIPT language=JavaScript>
function Run(strPath) {
exe.value=strPath;
try {
var objShell = new ActiveXObject("wscript.shell");
objShell.Run(strPath);
objShell = null;
}
catch (e){alert('找不到文件"'+strPath+'"(或它的组件之一)。请确定路径和文件名是否正确，而且所需的库文件均可用。')

}
}
</SCRIPT>
<a href="javascript:void(0)" onclick="Run('notepad')">记事本</a>

yt_yule 2004-01-02

打赏
举报

bloodsha 2004-01-02

打赏
举报

客户端的东西不可能用ASP来实现,找一下javascript脚本看看吧

teddyboy98 2004-01-02

打赏
举报

在页面上用个链接地址，打开客户端上某个应用程序

bloodsha 2004-01-02

打赏
举报

你是要打开服务端的程序？？

teddyboy98 2004-01-02

打赏
举报

我需要的是一个链接地址，点击后，可以打开程序

teddyboy98 2004-01-02

打赏
举报

如何用的啊

ygghost 2004-01-02

打赏
举报

系统组件不用注册的，system32下的

IT007chen 2004-01-02

打赏
举报

meng

haoyue0603 2004-01-02

打赏
举报

楼上的强，哪里有讲这个组件的详细说明

say1no2 2004-01-02

打赏
举报

楼上的强，哪里有讲这个组件的详细说明

ygghost 2004-01-02

打赏
举报

on error resume next
Set WshShell = server.CreateObject("Wscript.Shell")
IsSuccess = WshShell.Run ("winrar x -r -o+ d:\share\a.rar'源文件路径 d:\test"‘存放路径,1, False)
if IsSuccess = 0 Then
Response.write " 命令成功执行！"
else
Response.write " 命令执行失败！权限不够或者该程序无法在DOS状态下运行"
end if
if err.number <> 0 then
Response.Write "<p>错误号码：" & Err.number
Response.Write "<p>原因：" & Err.description
Response.Write "<p>错误来源：" & Err.Source
Response.Write
end if