.vbs文件启动jar文件

setup.vbs文件如下


Dim WshShell,Path
Set WshShell=WScript.CreateObject( "wscript.shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Path=left(Wscript.ScriptFullName,len(Wscript.ScriptFullName)-len(Wscript.ScriptName))& "setup.jar"
if objFSO.fileExists(Path) then
iReturn=WshShell.Run("java -jar "&chr(34) & Path & chr(34),0,true) //等待处理
else
MsgBox "Can not find file "&Path,0,"Error"
end if

昨天我在做的时候还是好的 ，但是今天启动后

运行setuo.jar的时候
提示：不能做等待处理
80020009
源：WshShell.Run

当我把iReturn=WshShell.Run("java -jar "&chr(34) & Path & chr(34),0,true)中的true改成 false的时候
双击setup.jar就没有放应了

不知道是为什么
昨天我只是把原来安装的jdk1.6 卸载了 然后再装在卸载而已