论坛 › 『 提问交流 』 › 那里出错了?

1352688 发表于 2009-8-18 17:25:38

那里出错了?

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <GUIConstants.au3>
#Include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <Array.au3>
$Form1                        = Guicreate("Form 1", 390, 217, -1, -1)

$Button1                = GuiCtrlCreateButton("安装", 50, 130, 90, 40)
$Button2                = GuiCtrlCreateButton("退出", 250, 130, 90, 40)

$Checkbox1                = GUICtrlCreateCheckbox("NET Framework 2.0", 30, 40, 140, 20)
$Checkbox2                = GUICtrlCreateCheckbox("搜狗拼音网吧版3.5", 30, 90, 140, 20)
$Checkbox3                = GUICtrlCreateCheckbox("OFFICE 2003 简化版", 220, 40, 140, 20)
$Checkbox4                = GUICtrlCreateCheckbox("远古播放器2009版", 220, 90, 140, 20)

$Label1                        = GuiCtrlCreateLabel("Label1", 220, 180, 140, 20)

$Group1                        = GUICtrlCreateGroup("Group1", 10, 10, 370, 190)
GUICtrlSetState ($Checkbox1, $GUI_CHECKED)
GUICtrlSetState ($Checkbox2, $GUI_CHECKED)
GUICtrlSetState ($Checkbox3, $GUI_CHECKED)
GUICtrlSetState ($Checkbox4, $GUI_CHECKED)

GuiSetState(@SW_SHOW)

While 1
      $Msg = GUIGetMsg()
      Switch $Msg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        IfGUICtrlRead($Checkbox1)=1 then
RunWait(@ScriptDir & "\dotnetfx2.0\install.exe /Q")
      EndIf
      IfGUICtrlRead($Checkbox2)=1 then
                RunWait(@ScriptDir & "\sogou.exe")
      EndIf
      IfGUICtrlRead($Checkbox3)=1 then
                RunWait(@ScriptDir & "\office2003.exe")
      EndIf
      IfGUICtrlRead($Checkbox4)=1 then
                RunWait(@ScriptDir & "\WebPlayer2009.exe /S")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "WebPlayerUpdater")
SplashOff()
endif
exit
      
                Case $Button2
exit
                Case $GUI_EVENT_CLOSE
                        Exit
                        
      EndSwitch
Wend


选择了怎么不安装啊...判断错了么?

顽固不化 发表于 2009-8-18 19:44:03

脚本所在的目录无需要安装的软件？

1352688 发表于 2009-8-18 20:04:07

@ScriptDir在同一个目录下边有相应的软件啊

afan 发表于 2009-8-19 03:10:16

经测试完全没问题，只对软件及参数的运行结果稍有怀疑。
或者安装完进程没退出之类。可以每次选择一个测试下（从第二个开始测）

1352688 发表于 2009-8-19 09:39:10

:face (37): 选好一点安装脚本就退出了..郁闷

查看完整版本: 那里出错了?