Jump to content

Frustrated that my program won't close


Recommended Posts

Hello,

I have wrote a basic program that will install software that we use in our school district without any user intervention, and if necessary it can install multiple programs one after the other.

The program itself works... well sort of, but one thing at a time.

When I want to close the program, it doesn't close by just clicking the standard Windows RED X. I don't understand why, as I thought this would be built into the OS. Am I missing a command to allow this?

I created a menu option called Exit and this works fine, but I'd like the X to work too.

Also, if I am in the middle of using my program and I install an app that I wanted to install on a client PC, I am not able to cancel and installation and resume back to my program. The entire program freezes!

I have to then go into the System Tray and exit the script and then launch the program again.

Does anyone have any ideas what's wrong?

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\..\..\..\Icon\Toolbox.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>
#Region ### START Koda GUI section ###
$mainForm = GUICreate("Installer", 434, 486, 192, 124)
$menuFile = GUICtrlCreateMenu("&File")
$menuExit = GUICtrlCreateMenuItem("Exit", $menuFile)
$menuHelp = GUICtrlCreateMenu("&Help")
$menuAbout = GUICtrlCreateMenuItem("About Installer", $menuHelp)
$btnExecute = GUICtrlCreateButton("Execute", 352, 432, 75, 25, $WS_GROUP)
$TabWin = GUICtrlCreateTab(8, 16, 177, 441)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$tabProg = GUICtrlCreateTabItem("Programs")
$rGPUpdate = GUICtrlCreateRadio("GP Update", 19, 47, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rIntelProf = GUICtrlCreateRadio("Intel Wireless Profile", 19, 63, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rIntelRepair = GUICtrlCreateRadio("Intel Wireless Repair", 19, 79, 121, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rGhost = GUICtrlCreateRadio("Ghost Client", 19, 95, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rRFBA = GUICtrlCreateRadio("RFBA Client", 19, 111, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rSAM = GUICtrlCreateRadio("SAM Client", 19, 127, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rMSAccess = GUICtrlCreateRadio("Microsoft Access 2000", 19, 143, 137, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rMSOutlook = GUICtrlCreateRadio("Microsoft Outlook 2003", 19, 159, 137, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rDFSeed = GUICtrlCreateRadio("Deepfreeze Seed", 19, 175, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rDFWkstn = GUICtrlCreateRadio("Deepfreeze Workstation", 19, 191, 137, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$rITUNES = GUICtrlCreateRadio("iTunes", 19, 208, 113, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$tabInst = GUICtrlCreateTabItem("Multiple Installs")
GUICtrlSetState(-1,$GUI_SHOW)
$cDFWkstn = GUICtrlCreateCheckbox("Deepfreeze Workstation", 16, 194, 137, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cDFSeed = GUICtrlCreateCheckbox("Deepfreeze Seed", 16, 178, 105, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cGPUpdate = GUICtrlCreateCheckbox("GP Update", 16, 50, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cIntelProf = GUICtrlCreateCheckbox("Intel Wireless Profile", 16, 66, 129, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cIntelRepair = GUICtrlCreateCheckbox("Intel Wireless Repair", 16, 82, 129, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cGhost = GUICtrlCreateCheckbox("Ghost Client", 16, 98, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cRFBA = GUICtrlCreateCheckbox("RFBA Client", 16, 114, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cSAM = GUICtrlCreateCheckbox("SAM Client", 16, 130, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cMSAccess = GUICtrlCreateCheckbox("Microsoft Access 2000", 16, 146, 137, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cMSOutlook = GUICtrlCreateCheckbox("Microsoft Outlook 2003", 16, 162, 129, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cITUNES = GUICtrlCreateCheckbox("iTunes", 16, 211, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateTabItem("")
$grpBldg = GUICtrlCreateGroup("Buildings", 208, 32, 217, 233)
$rOper = GUICtrlCreateRadio("Operations", 278, 237, 73, 17)
$rAdmin = GUICtrlCreateRadio("Admin", 222, 237, 49, 17)
$lblAdmin = GUICtrlCreateLabel("Administration", 214, 218, 83, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$rCHS = GUICtrlCreateRadio("CHS", 222, 171, 41, 17)
$rTCHS = GUICtrlCreateRadio("TCHS", 317, 171, 49, 17)
$rEMS = GUICtrlCreateRadio("EMS", 269, 171, 41, 17)
$rWMS = GUICtrlCreateRadio("WMS", 269, 195, 49, 17)
$rWHS = GUICtrlCreateRadio("WHS", 222, 195, 47, 17)
$lblSec = GUICtrlCreateLabel("Secondary Schools", 214, 150, 113, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$rWH = GUICtrlCreateRadio("WH", 299, 126, 41, 17)
$rWW = GUICtrlCreateRadio("WW", 258, 126, 41, 17)
$rSL = GUICtrlCreateRadio("SL", 382, 102, 33, 17)
$rTH = GUICtrlCreateRadio("TH", 222, 126, 33, 17)
$rOM = GUICtrlCreateRadio("OM", 342, 102, 33, 17)
$rMO = GUICtrlCreateRadio("MO", 299, 102, 41, 17)
$rLL = GUICtrlCreateRadio("LL", 258, 102, 33, 17)
$rIN = GUICtrlCreateRadio("IN", 222, 102, 33, 17)
$rEA = GUICtrlCreateRadio("EA", 382, 78, 33, 17)
$rCO = GUICtrlCreateRadio("CO", 342, 78, 33, 17)
$rCK = GUICtrlCreateRadio("CK", 299, 78, 33, 17)
$rBL = GUICtrlCreateRadio("BL", 222, 78, 33, 17)
$rCE = GUICtrlCreateRadio("CE", 258, 78, 33, 17)
$lblEL = GUICtrlCreateLabel("Elementary Schools", 214, 62, 115, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$grpComp = GUICtrlCreateGroup("Computer", 208, 272, 217, 153)
$lblDell = GUICtrlCreateLabel("Dell", 214, 295, 26, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$rGX260 = GUICtrlCreateRadio("GX260", 222, 310, 57, 17)
$rGX270 = GUICtrlCreateRadio("GX270", 286, 310, 57, 17)
$rGX280 = GUICtrlCreateRadio("GX280", 354, 310, 57, 17)
$rD600 = GUICtrlCreateRadio("D600", 222, 330, 49, 17)
$rD830 = GUICtrlCreateRadio("D830", 286, 330, 49, 17)
$lblHP = GUICtrlCreateLabel("HP", 214, 352, 21, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$r2140 = GUICtrlCreateRadio("2140", 222, 370, 49, 17)
$r6120 = GUICtrlCreateRadio("6120", 286, 370, 49, 17)
$r6710 = GUICtrlCreateRadio("6710", 354, 370, 49, 17)
GUISetState(@SW_SHOW)
Dim $mainForm_AccelTable[1][2] = [["+p", $menuAbout]]
GUISetAccelerators($mainForm_AccelTable)
#EndRegion ### END Koda GUI section ###

Opt("TrayIconDebug", 1)

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

        Case $menuAbout
            MsgBox("", "About Installer", "Installer - Version 0.4")

        Case $menuExit
            ExitLoop

        Case $btnExecute
    ;Intel Wireless Profile
            If BitAND(GUICtrlRead($cIntelProf), $GUI_CHECKED) = $GUI_CHECKED Then IntelProfile()
            If BitAND(GUICtrlRead($rIntelProf), $GUI_CHECKED) = $GUI_CHECKED Then IntelProfile()
    ;GPUpdate
            If BitAND(GUICtrlRead($cGPUpdate), $GUI_CHECKED) = $GUI_CHECKED Then GPUpdater()
            If BitAND(GUICtrlRead($rGPUpdate), $GUI_CHECKED) = $GUI_CHECKED Then GPUpdater()
    ;Ghost Client
            ;Blair
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rBL), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientBL()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rBL), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientBL()
            ;Central Grade
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCE), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientCE()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCE), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientCE()
            ;Courtade
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCO), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientCO()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCO), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientCO()
            ;Eastern
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEA), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientEA()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEA), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientEA()
            ;Interlochen
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rIN), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientIN()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rIN), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientIN()
            ;Long Lake
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rLL), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientLL()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rLL), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientLL()
            ;Montessorri
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rMO), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientMO()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rMO), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientMO()
            ;Old Mission
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rOM), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientOM()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rOM), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientOM()
            ;Silver Lake
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rSL), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientSL()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rSL), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientSL()
            ;Traverse Heights
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTH), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientTH()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTH), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientTH()
            ;Westwoods
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWW), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWW()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWW), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWW()
            ;Willow Hill
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWH), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWH()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWH), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWH()
            ;Central Senior High
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCHS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientCHS()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCHS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientCHS()
            ;East Middle School
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEMS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientEMS()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEMS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientEMS()
            ;Traverse City High School
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTCHS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientTCHS()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTCHS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientTCHS()
            ;West Middle School
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWMS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWMS()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWMS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWMS()
            ;West High School
            If BitAND(GUICtrlRead($cGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWHS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWHS()
            If BitAND(GUICtrlRead($rGhost), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWHS), $GUI_CHECKED) = $GUI_CHECKED Then GhostClientWHS()
    ;RFBA
            ;Central Grade
            If BitAND(GUICtrlRead($cRFBA), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCE), $GUI_CHECKED) = $GUI_CHECKED Then rfbaCE()
            If BitAND(GUICtrlRead($rRFBA), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCE), $GUI_CHECKED) = $GUI_CHECKED Then rfbaCE()
            ;Interlochen
            If BitAND(GUICtrlRead($cRFBA), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rIN), $GUI_CHECKED) = $GUI_CHECKED Then rfbaIN()
            If BitAND(GUICtrlRead($rRFBA), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rIN), $GUI_CHECKED) = $GUI_CHECKED Then rfbaIN()
            ;Westwoods
            If BitAND(GUICtrlRead($cRFBA), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWW), $GUI_CHECKED) = $GUI_CHECKED Then rfbaWW()
            If BitAND(GUICtrlRead($rRFBA), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWW), $GUI_CHECKED) = $GUI_CHECKED Then rfbaWW()
    ;SAM Client
            If BitAND(GUICtrlRead($cSAM), $GUI_CHECKED) = $GUI_CHECKED Then SAMClient()
            If BitAND(GUICtrlRead($rSAM), $GUI_CHECKED) = $GUI_CHECKED Then SAMClient()
    ;Microsoft Access
            ;Elementary Schools
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rBL), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rBL), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCE), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCE), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCK), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCK), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCO), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCO), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEA), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEA), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rIN), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rIN), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rLL), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rLL), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rMO), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rMO), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rOM), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rOM), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rSL), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rSL), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTH), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTH), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWW), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWW), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWH), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWH), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessEL()
            ;Secondary Schools
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCHS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rCHS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEMS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rEMS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTCHS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rTCHS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWMS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWMS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($cMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWHS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
            If BitAND(GUICtrlRead($rMSAccess), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($rWHS), $GUI_CHECKED) = $GUI_CHECKED Then MSAccessSec()
    ;Deepfreeze Seed
            If BitAND(GUICtrlRead($cDFSeed), $GUI_CHECKED) = $GUI_CHECKED Then DFSeed()
            If BitAND(GUICtrlRead($rDFSeed), $GUI_CHECKED) = $GUI_CHECKED Then DFSeed()
    ;Deepfreeze Workstation
            If BitAND(GUICtrlRead($cDFWkstn), $GUI_CHECKED) = $GUI_CHECKED Then DFWkstn()
            If BitAND(GUICtrlRead($rDFWkstn), $GUI_CHECKED) = $GUI_CHECKED Then DFWkstn()
    ;iTunes
            If BitAND(GUICtrlRead($cDFWkstn), $GUI_CHECKED) = $GUI_CHECKED Then iTunes()
            If BitAND(GUICtrlRead($rDFWkstn), $GUI_CHECKED) = $GUI_CHECKED Then iTunes()
    ;Microsoft Outlook 2003
            If BitAND(GUICtrlRead($cMSOutlook), $GUI_CHECKED) = $GUI_CHECKED Then Outlook2003()
            If BitAND(GUICtrlRead($rMSOutlook), $GUI_CHECKED) = $GUI_CHECKED Then Outlook2003()

    EndSwitch
WEnd

Func _WinWaitActivate($title, $text, $timeout = 0)
    WinWait($title, $text, $timeout)
    If Not WinActive($title, $text) Then WinActivate($title, $text)
    WinWaitActive($title, $text, $timeout)
EndFunc   ;==>_WinWaitActivate

; Install Intel Wireless Profile
Func IntelProfile()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("c{SHIFTDOWN};{SHIFTUP}\windows\{SHIFTDOWN}1{SHIFTUP}drivercache\intel 3945 ABG Drivers and Wireless Profile\v3.exe{ENTER}")
EndFunc   ;==>IntelProfile

; Run GPUpdate
Func GPUpdater()
    Run("gpupdate /force")
    _WinWaitActivate("C:\WINDOWS\system32\gpupdate.exe", "")
    Send("n{ENTER}n{ENTER}")
EndFunc   ;==>GPUpdater

; Ghost configurations
; Install the Ghost client and configure it for Blair server
Func GhostClientBL()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.9.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\BL\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Central Grade server
Func GhostClientCE()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.12.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\CE\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Courtade server
Func GhostClientCO()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.7.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\CO\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Eastern server
Func GhostClientEA()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.15.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\EA\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Interlochen server
Func GhostClientIN()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.16.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\IN\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Long Lake server
Func GhostClientLL()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.17.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\LL\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Montessorri server
Func GhostClientMO()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.18.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\MO\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Old Mission server
Func GhostClientOM()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.21.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\OM\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Silver Lake server
Func GhostClientSL()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.10.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\SL\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Traverse Heights server
Func GhostClientTH()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.23.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\TH\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Westwoods server
Func GhostClientWW()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.8.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\WW\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Willow Hill server
Func GhostClientWH()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.24.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Elementary\3 - Ghost Client\WH\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Central High School server
Func GhostClientCHS()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.28.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Secondary\3 - Ghost Client\CHS\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for East Middle School server
Func GhostClientEMS()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.37.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Secondary\3 - Ghost Client\EMS\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for Traverse City High School server
Func GhostClientTCHS()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.40.1.20{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Secondary\3 - Ghost Client\TCHS\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for West Middle School server
Func GhostClientWMS()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.27.1.22{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Secondary\3 - Ghost Client\WMS\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install the Ghost client and configure it for West High School server
Func GhostClientWHS()
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\deployment drive\Elementary\3 - Ghost Client\client.msi{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield(R)")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "I &do not accept the")
    Send("{UP}{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "If you leave this fi")
    Send("10.38.1.21{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "Click Next to instal")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The wizard is ready ")
    Send("{ENTER}")
    _WinWaitActivate("Symantec Ghost Managed Console Client 11.01 - InstallShield Wizard", "The InstallShield Wi")
    Send("{ENTER}")
    ; Install Pubkey file for the Ghost client
    Send("{LWINDOWN}r{LWINUP}")
    _WinWaitActivate("Run", "")
    Send("\\servername\toolbox$\Deployment Drive\Secondary\3 - Ghost Client\WHS\Copy Pubkey.bat{ENTER}")
    _WinWaitActivate("C:\WINDOWS\system32\cmd.exe", "")
    Send("{ENTER}")
EndFunc
; Install RFBA client and configure for the appropriate network
;Central Grade
Func rfbaCE()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","")
Send("\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\applications-installers\rfba\rfba{SHIFTDOWN}-{SHIFTUP}client{SHIFTDOWN}-{SHIFTUP}install\installwkstn{SHIFTDOWN}-{SHIFTUP}win.exe{ENTER}")
_WinWaitActivate("Reading Fluency Benchmark Assessor Installation","")
Send("{TAB}{ENTER}{ENTER}{TAB}{TAB}{ENTER}")
_WinWaitActivate("Read Naturally Login","")
MouseClick("left",50,37,1)
MouseClick("left",68,139,1)
_WinWaitActivate("Network Settings","")
Send("10.100.12.2")
MouseClick("left",219,368,1)
_WinWaitActivate("Read Naturally Login","")
Send("mmcgee{ENTER}")
_WinWaitActivate("Read Naturally Teacher Management","")
Send("{ALTDOWN}f{ALTUP}{ENTER}")
_WinWaitActivate("Read Naturally Login","")
Send("{ALTDOWN}f{ALTUP}{ENTER}")
EndFunc
;Interlochen
Func rfbaIN()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","")
Send("\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\applications-installers\rfba\rfba{SHIFTDOWN}-{SHIFTUP}client{SHIFTDOWN}-{SHIFTUP}install\installwkstn{SHIFTDOWN}-{SHIFTUP}win.exe{ENTER}")
_WinWaitActivate("Reading Fluency Benchmark Assessor Installation","")
Send("{TAB}{ENTER}{ENTER}{TAB}{TAB}{ENTER}")
_WinWaitActivate("Read Naturally Login","")
MouseClick("left",50,37,1)
MouseClick("left",68,139,1)
_WinWaitActivate("Network Settings","")
Send("10.100.16.2")
MouseClick("left",219,368,1)
_WinWaitActivate("Read Naturally Login","")
Send("bauerpa{ENTER}")
_WinWaitActivate("Read Naturally Teacher Management","")
Send("{ALTDOWN}f{ALTUP}{ENTER}")
_WinWaitActivate("Read Naturally Login","")
Send("{ALTDOWN}f{ALTUP}{ENTER}")
EndFunc
;Westwoods
Func rfbaWW()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","")
Send("\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\applications-installers\rfba\rfba{SHIFTDOWN}-{SHIFTUP}client{SHIFTDOWN}-{SHIFTUP}install\installwkstn{SHIFTDOWN}-{SHIFTUP}win.exe{ENTER}")
_WinWaitActivate("Reading Fluency Benchmark Assessor Installation","")
Send("{TAB}{ENTER}{ENTER}{TAB}{TAB}{ENTER}")
_WinWaitActivate("Read Naturally Login","")
MouseClick("left",50,37,1)
MouseClick("left",68,139,1)
_WinWaitActivate("Network Settings","")
Send("10.100.8.2")
MouseClick("left",219,368,1)
_WinWaitActivate("Read Naturally Login","")
Send("{SHIFTDOWN}w{SHIFTUP}estwoods{ENTER}")
_WinWaitActivate("Read Naturally Teacher Management","")
Send("{ALTDOWN}f{ALTUP}{ENTER}")
_WinWaitActivate("Read Naturally Login","")
Send("{ALTDOWN}f{ALTUP}{ENTER}")
EndFunc
; Install the SAM Client
Func SAMClient()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\applications-installers\scholastic\rd180\enterprise{ENTER}")
_WinWaitActivate("enterprise","FolderView")
Send("{DOWN}{ENTER}")
_WinWaitActivate("Version 1.9","FolderView")
Send("sa{ENTER}")
_WinWaitActivate("SamClientv19-noQT","The following error ")
Send("{ALTDOWN}s{ALTUP}")
EndFunc
; Install MS Access
;Elementary
Func MSAccessEL()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("\\app2\k5-staff\msofficep\disk{SPACE}1\setup.exe{ENTER}")
_WinWaitActivate("Microsoft Office 2000 Maintenance Mode","&Add or Remove Featu")
Send("{ALTDOWN}a{ALTUP}")
_WinWaitActivate("Microsoft Office 2000: Update Features","Office programs, plu")
MouseClick("left",272,132,1)
_WinWaitActivate("Microsoft Office 2000: Update Features","Microsoft Access wil")
MouseClick("left",283,169,1)
Send("{ALTDOWN}u{ALTUP}")
_WinWaitActivate("Microsoft Office 2000 Setup","Microsoft Office 200")
Send("{ENTER}")
EndFunc
;Secondary
Func MSAccessSec()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("\\app2\apps$\6-12\MSoffP\Disk1\setup.exe{ENTER}")
_WinWaitActivate("Microsoft Office 2000 Maintenance Mode","&Add or Remove Featu")
Send("{ALTDOWN}a{ALTUP}")
_WinWaitActivate("Microsoft Office 2000: Update Features","Office programs, plu")
MouseClick("left",272,132,1)
_WinWaitActivate("Microsoft Office 2000: Update Features","Microsoft Access wil")
MouseClick("left",283,169,1)
Send("{ALTDOWN}u{ALTUP}")
_WinWaitActivate("Microsoft Office 2000 Setup","Microsoft Office 200")
Send("{ENTER}")
EndFunc
; Install DeepFreeze seed
Func DFSeed()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("{SHIFTDOWN}'{SHIFTUP}\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\deployment{SPACE}drive\elementary\4{SPACE}-{SPACE}deepfreeze{SPACE}client\df-seed.exe{SHIFTDOWN}'{SHIFTUP}{SPACE}/{SHIFTDOWN}install{SHIFTUP}{ENTER}")
EndFunc
; Install DeepFreeze workstation
Func DFWkstn()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("{SHIFTDOWN}'{SHIFTUP}\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\deployment{SPACE}drive\elementary\4{SPACE}-{SPACE}deepfreeze{SPACE}client\df-wkstn.exe{SHIFTDOWN}'{SHIFTUP}{SPACE}/{SHIFTDOWN}install{SHIFTUP}{ENTER}")
EndFunc
; Install iTunes
Func iTunes()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\ghost{SHIFTDOWN}-{SHIFTUP}packages\draft\iTunesV9.1.1XP042810.exe{ENTER}")
_WinWaitActivate("iTunesV9.1.1XP042810","For proper installat")
EndFunc
;Install Microsoft Outlook 2003
Func Outlook2003()
Send("{LWINDOWN}r{LWINUP}")
_WinWaitActivate("Run","Type the name of a p")
Send("\\servername\toolbox{SHIFTDOWN}4{SHIFTUP}\scripts\applications\microsoft\microsoft-outlook2003installation.bat{ENTER}")
_WinWaitActivate("Microsoft Office Outlook 2003","Please wait while wi")
EndFunc

Any help is greatly appreciated.

Thanks,

Jeff

Here is my script:

Link to comment
Share on other sites

Well now I feel pretty silly! I thought I tried that, but I guess not.

Thank you very much for you help!

You can also do it by removing the

Case $menuExit
            ExitLoop

And Changing

Case $GUI_EVENT_CLOSE

To

Case GUI_EVENT_CLOSE, $menuexit
            ExitLoop

To perform the same action on more than one item just separate the items with a comma

George

Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.

Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.***

The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number.

Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else.

"Old age and treachery will always overcome youth and skill!"

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...