如何通过远程服务器启动本地应用程序?
这纯粹是客户要求,要通过远程网络(网页文本连接),启动本地的一个应用程序,例如QQ.exe文件。
//from www.w3sky.com
chr(34)是加双引号,给path加上后就可以直接启动exe文件了。包含空格的也可以打开。
<SCRIPT LANGUAGE="VBScript">
Set objShell = CreateObject("Wscript.Shell")
strCommand = chr(34) & "C:\Program Files\EditPlus 2\editplus.exe" & chr(34)
objShell.Run strCommand, 0, True
</SCRIPT>
如果这样你打不开,可能你ie设置启用activeX禁止。
strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
里面的sndrec32 是window自带的录音机 ,然后用它启动后面的path为strSoundFile 的文件。
普通的exe文件就用
<SCRIPT LANGUAGE="VBScript">
Set objShell = CreateObject("Wscript.Shell")
strCommand = chr(34) & "C:\Program Files\EditPlus 2\editplus.exe" & chr(34)
objShell.Run strCommand, 0, True
</SCRIPT>
//from www.w3sky.com
chr(34)是加双引号,给path加上后就可以直接启动exe文件了。包含空格的也可以打开。
<SCRIPT LANGUAGE="VBScript">
Set objShell = CreateObject("Wscript.Shell")
strCommand = chr(34) & "C:\Program Files\EditPlus 2\editplus.exe" & chr(34)
objShell.Run strCommand, 0, True
</SCRIPT>
如果这样你打不开,可能你ie设置启用activeX禁止。
strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
里面的sndrec32 是window自带的录音机 ,然后用它启动后面的path为strSoundFile 的文件。
普通的exe文件就用
<SCRIPT LANGUAGE="VBScript">
Set objShell = CreateObject("Wscript.Shell")
strCommand = chr(34) & "C:\Program Files\EditPlus 2\editplus.exe" & chr(34)
objShell.Run strCommand, 0, True
</SCRIPT>
继续阅读
- 上一篇 >:日记时间:2005-12-22 13:31:03,天气:晴 |
- 下一篇 >:日记时间:2005-12-19 14:04:55,天气:晴