如何通过远程服务器启动本地应用程序？

Question

<SCRIPT LANGUAGE="VBScript">
Set objShell = CreateObject("Wscript.Shell")
strCommand = "E:\wrox\ThePhileVB\ThePhile.vbproj"
objShell.Run strCommand, 0, True
</SCRIPT>strCommand 为你在命令台的命令，你自己拼接一个正确的命令就可以了。exe文件的话，strCommand=“exe文件地址”就可以直接打开。

Answer 1

楼上，这是我的做法
<SCRIPT LANGUAGE="VBScript">
Set objShell = CreateObject("Wscript.Shell")
strCommand = "C:\Program Files\Tencent\qq\QQ.exe"
objShell.Run strCommand, 0, True
</SCRIPT>
提示找不到文件，可是我的文件确实存在，我发现这种方法只可以运行跟目录下的可执行文件。
还有什么好的解决方法吗？

Answer 2

事实上，你说的这种方法我之前也知道，缺点就是要降低IE安全度，但这个可以通过生成.hta文件解决。
我现在唯一的问题就是子目录下的文件都找不到，可以考虑写个.bat文件，不过这样也很麻烦，有没有更好的方法呢？

Answer 3

strCommand = "C:\Program Files\Tencent\qq\QQ.exe"
这个不能用是因为路径中有空格造成的，但怎么解决还没找到好的办法，知道的朋友请指点一下

Answer 4

楼上,我试过了,不是因为空格的问题
路径就算是strCommand = "C:\Tencent\qq\QQ.exe"
也不行
好象是只有跟目录才可以的

Answer 5

你可以制定一个程序来打开某个文件，如果只是文件名有些文件打不开是正常的。比如：
strSoundFile = "C:\windows\Media\Notify.wav"
Set objShell = CreateObject("Wscript.Shell")
strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
objShell.Run strCommand, 0, False

Answer 6

楼上这里的strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
在这里sndrec32 /play /close ，我估计就是你所说的一个专门用来打开.wav文件的程序。
不过我对这些并不是很清楚，你可以告诉我，如果要打开的是.exe文件可以怎么做吗？

Answer 7

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>