Beiträge von LatroX

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\data\Desktop\specialpack.kxf
TrayTip("Special Pack Installer", "© by LatroX", 20)
#Region Koda
$Form1 = GUICreate("Special Pack by LatroX", 500, 322, 192, 120)
$Pic1 = GUICtrlCreatePic("zeo_orange.jpg", 340, 220, 136, 84, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("Special Pack 1", 40, 16, 85, 25, 0)
$Button2 = GUICtrlCreateButton("Special Pack 2", 128, 16, 85, 25, 0)
GUICtrlSetState($Button1, $GUI_Disable)
$Button3 = GUICtrlCreateButton("Special Pack 3", 216, 16, 85, 25, 0)
GUICtrlSetState($Button1, $GUI_Disable)
$Button5 = GUICtrlCreateButton("Serials", 392, 16, 85, 25, 0)
GUICtrlSetState($Button1, $GUI_Disable)
$Button6 = GUICtrlCreateButton("Installieren", 392, 88, 65, 17, 0)
$Button7 = GUICtrlCreateButton("Alle", 392, 120, 65, 17, 0)
$Button8 = GUICtrlCreateButton("Keine", 392, 152, 65, 17, 0)
$Button9 = GUICtrlCreateButton("Beenden", 392, 184, 65, 17, 0)
$Checkbox1 = GUICtrlCreateCheckbox("Neustart", 392, 56, 65, 17)
#region Special Pack 1
$Checkbox2 = GUICtrlCreateCheckbox("Adobe Reader 9", 24, 56, 170, 17)

[/autoit] [autoit][/autoit] [autoit]

$Checkbox3 = GUICtrlCreateCheckbox("Picasa 3", 24, 88, 170, 17)

[/autoit] [autoit][/autoit] [autoit]

$Checkbox4 = GUICtrlCreateCheckbox("Open Office 3", 24, 120, 170, 17)

[/autoit] [autoit][/autoit] [autoit]

$Checkbox5 = GUICtrlCreateCheckbox("eDoc", 24, 152, 170, 17)

[/autoit] [autoit][/autoit] [autoit]

$Checkbox6 = GUICtrlCreateCheckbox("WinRAR", 24, 184, 170, 17)

[/autoit] [autoit][/autoit] [autoit]

#endregion Special Pack 1
#region Special Pack 2
$Checkbox7 = GUICtrlCreateCheckbox("Driver Genius 8", 24, 56, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox8 = GUICtrlCreateCheckbox("Nero 7", 24, 88, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox9 = GUICtrlCreateCheckbox("Nero 9 free", 24, 120, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox10 = GUICtrlCreateCheckbox("Avira AntiVir 10", 24, 152, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox11 = GUICtrlCreateCheckbox(".NET Framework 2.0", 24, 184, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox12 = GUICtrlCreateCheckbox(".NET Framework 3.5", 24, 216, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox13 = GUICtrlCreateCheckbox("Mozilla Firefox 3.6.2", 24, 248, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox14 = GUICtrlCreateCheckbox("IncrediMail 2", 24, 280, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox15 = GUICtrlCreateCheckbox("Internet Explorer 8 XP", 208, 56, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox16 = GUICtrlCreateCheckbox("TrayBackup", 208, 88, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox17 = GUICtrlCreateCheckbox("VLC Mediaplayer 1.0.5", 208, 120, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox18 = GUICtrlCreateCheckbox("DriverMax", 208, 152, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
#endregion Special Pack 2
#region Special Pack 3
$Checkbox19 = GUICtrlCreateCheckbox("Norman Security Suite 32bit", 24, 56, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox20 = GUICtrlCreateCheckbox("Norman Security Suite 64bit", 24, 88, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Checkbox21 = GUICtrlCreateCheckbox("SpyBot S&D", 24, 120, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
#endregion Special Pack 3
#region Serials
$Button66 = GUICtrlCreateButton("Driver Genius 8 Serial", 24, 56, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
$Button67 = GUICtrlCreateButton("DriverMax Zugangsdaten", 24, 88, 170, 17)
GUICtrlSetState(-1, $GUI_Hide)
#endregion Serials
GUISetState(@SW_SHOW)
#EndRegion Koda

[/autoit] [autoit][/autoit] [autoit]

$wert = 225
WinSetTrans($Form1, "", $wert)

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1

GUICtrlSetState($Button3, $GUI_Enable)
GUICtrlSetState($Button1, $GUI_Disable)
GUICtrlSetState($Button2, $GUI_Enable)
GUICtrlSetState($Button5, $GUI_Enable)

For $i = $Checkbox2 To $Checkbox21
GUICtrlSetState($i, $GUI_Hide)
Next
For $i1 = $Checkbox2 To $Checkbox6
GUICtrlSetState($i1, $GUI_SHOW)
Next
For $i = $Button66 To $Button67
GUICtrlSetState($i, $GUI_Hide)
Next

Case $Button2

GUICtrlSetState($Button3, $GUI_Enable)
GUICtrlSetState($Button2, $GUI_Disable)
GUICtrlSetState($Button1, $GUI_Enable)
GUICtrlSetState($Button5, $GUI_Enable)

[/autoit] [autoit][/autoit] [autoit]

For $i = $Checkbox2 To $Checkbox21
GUICtrlSetState($i, $GUI_Hide)
Next
For $i1 = $Checkbox7 To $Checkbox18
GUICtrlSetState($i1, $GUI_SHOW)
Next
For $i = $Button66 To $Button67
GUICtrlSetState($i, $GUI_Hide)
Next

Case $Button3

[/autoit] [autoit][/autoit] [autoit]

GUICtrlSetState($Button2, $GUI_Enable)
GUICtrlSetState($Button3, $GUI_Disable)
GUICtrlSetState($Button1, $GUI_Enable)
GUICtrlSetState($Button5, $GUI_Enable)

[/autoit] [autoit][/autoit] [autoit]

For $i = $Checkbox2 To $Checkbox21
GUICtrlSetState($i, $GUI_Hide)
Next
For $i1 = $Checkbox19 To $Checkbox21
GUICtrlSetState($i1, $GUI_SHOW)
Next
For $i = $Button66 To $Button67
GUICtrlSetState($i, $GUI_Hide)
Next

Case $Button5

[/autoit] [autoit][/autoit] [autoit]

GUICtrlSetState($Button2, $GUI_Enable)
GUICtrlSetState($Button5, $GUI_Disable)
GUICtrlSetState($Button1, $GUI_Enable)
GUICtrlSetState($Button3, $GUI_Enable)

[/autoit] [autoit][/autoit] [autoit]

For $i = $Checkbox2 To $Checkbox21
GUICtrlSetState($i, $GUI_Hide)
Next
For $i1 = $Button66 To $Button67
GUICtrlSetState($i1, $GUI_SHOW)
Next

Case $Button6

[/autoit] [autoit][/autoit] [autoit]

If GUICtrlRead($Checkbox2) = 1 Then RunWait("Special Pack 1\AdbeRdr930_de_DE.exe")
If GUICtrlRead($Checkbox3) = 1 Then RunWait("Special Pack 1\Picasa3auto.exe")
If GUICtrlRead($Checkbox4) = 1 Then RunWait("Special Pack 1\OpenOffice.org 3.2 (de) Installation Files\setup.exe")
If GUICtrlRead($Checkbox5) = 1 Then RunWait("Special Pack 1\eDoc.exe")
If GUICtrlRead($Checkbox6) = 1 Then RunWait("Special Pack 1\WinRAR\wrar391d.exe")
If GUICtrlRead($Checkbox7) = 1 Then RunWait("Special Pack 2\Driver Genius\DriverGenius_8_DE_LP.exe")
If GUICtrlRead($Checkbox8) = 1 Then RunWait("Special Pack 2\Nero 7\SetupX.exe")
If GUICtrlRead($Checkbox9) = 1 Then RunWait("Special Pack 2\Nero-9.4.12.3_free.exe")
If GUICtrlRead($Checkbox10) = 1 Then RunWait("Special Pack 2\avira_antivir_personal10_de.exe")
If GUICtrlRead($Checkbox11) = 1 Then RunWait("Special Pack 2\dotnetfx2.exe")
If GUICtrlRead($Checkbox12) = 1 Then RunWait("Special Pack 2\dotnetfx35.exe")
If GUICtrlRead($Checkbox13) = 1 Then RunWait("Special Pack 2\Firefox Setup 3.6.2.exe")
If GUICtrlRead($Checkbox14) = 1 Then RunWait("Special Pack 2\IncrediMailSetup_de.exe")
If GUICtrlRead($Checkbox15) = 1 Then RunWait("Special Pack 2\IE8-WindowsXP-x86-DEU.exe")
If GUICtrlRead($Checkbox16) = 1 Then RunWait("Special Pack 2\TrayBackup.exe")
If GUICtrlRead($Checkbox17) = 1 Then RunWait("Special Pack 2\vlc-1.0.5-win32.exe")
If GUICtrlRead($Checkbox18) = 1 Then RunWait("Special Pack 2\drivermax.exe")
If GUICtrlRead($Checkbox19) = 1 Then RunWait("NormanSecuritySuite_710x86_DEU_R18.msi")
If GUICtrlRead($Checkbox20) = 1 Then RunWait("NormanSecuritySuite_730x64_DEU_R04.msi")
If GUICtrlRead($Checkbox21) = 1 Then RunWait("Special Pack 2\spybotsd162.exe")
If GUICtrlRead($Checkbox1) = 1 Then Shutdown(2)

Case $Button66
ShellExecute("Special Pack 2\Driver Genius\Serial.txt")

Case $Button67
MsgBox(0,"DriverMax Zugangsdaten", "username: xxxxxxxxx"&@CRLF&"----------------------------------------"&@CRLF&"E-Mail: xxxxxxxx"&@CRLF&"----------------------------------------"&@CRLF&"password: xxxxxxx")

Case $Button7
For $i = $Checkbox2 To $Checkbox21
GUICtrlSetState($i, $GUI_Checked)
Next
Case $Button8
For $i = $Checkbox1 To $Checkbox21
GUICtrlSetState($i, $GUI_Unchecked)
Next
Case $Button9
Exit
EndSwitch
WEnd

[/autoit]