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  卸载了 然后再装在卸载而已