Jump to content

Recommended Posts

I have an autoit file on my desktop that was working fine until I edited some code

Now when I try to launch it, it gets stuck on Setting Hotkeys. It shows in the taskbar, but nothing on the screen (see attached screenshots)

I can however open this same file and run it on any other PC without issue so I am not sure what I did wrong

 

image.thumb.png.e26511fd0747206af0c130cd05448511.png

image.png.c6e4f086611b170b5bcc92f795a933e8.png

Link to post
Share on other sites

I do not have any hotkeysets in the code anywhere at all

I have also tried disabling the au3 checks and running it same issue, turned it back on but now I seem to be getting a different error:

image.png.87a45d161ac10c199027354ace8e1a64.png

Link to post
Share on other sites
58 minutes ago, Mattw11486 said:

working fine until I edited some code

So what did you change? Do a compare between old and new.

You are probably not actually running the code you think you are running. Probably two versions.

You say you have no hotkey settings yet the error message says you do. I don't think the error message is auto generated by AutoIt , I believe it is hard coded. Search for "Failed Setting Hotkeys" in your source.

Unrelated, but a good golden rule is never include spaces in file names or folders.

Phil Seakins

Link to post
Share on other sites

There are no hotkeys set, I have done a search through the whole code to make sure and I know I never set this up

I can run this same project on any other PC or a VDI, just not on my local laptop for some reason, I get the above screenshots so it's not an issue with the code itself, there is some sort of setting that is causing it to crash I think. After I made the changes and it stopped working, I reverted back to the original code that was working prior and it is still doing the same thing.

Link to post
Share on other sites

Yes both running it outside of Scite and compiling it locally on this laptop does the same thing

I will just have to modify a backup that works unfortunately..it's weird that it seems to work on all other devices except for my work laptop

Link to post
Share on other sites
Posted (edited)
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=H:\CSD\CSD Applications\CSD Power Tool\swalogo.ico
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <File.au3>
#include <ColorConstants.au3>
;###################################################################################################################################################################


$pcleanfile="\\techsvcs\tech_svcs-shared\CSD\CSD Applications\PcCleanUp_Win 7\WkstntoClean.txt"

$x=RegRead("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool","X")
If @error<>0 Then
    $x=-1
    RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool","X","REG_SZ",$x)
EndIf
$y=RegRead("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool","Y")
If @error<>0 Then
    $y=-1
    RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool V8","Y","REG_SZ",$y)
EndIf
If @OSArch="X64" Then
    $PFLocation="Program Files (x86)"
Else
    $PFLocation="Program Files"
EndIf
#Region ### START Koda GUI section ### Form=F:\AutoIt3\CSD Power Tool V1.kxf
$Form1_1 = GUICreate("Service Desk Power Tool", 1225, 90, $x, $y)
GUISetFont(10, 400, 0, "Calibri")
GUISetBkColor(0x99B4D1)
WinSetOnTop("AlwaysOnTop", "On", 1)
$PageControl1 = GUICtrlCreateTab(0, 30, 1255, 60)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$tsBTN = GUICtrlCreateButton("SWAFlu", 4, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button52 = GUICtrlCreateButton("SWALife", 94, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button43 = GUICtrlCreateButton("CSD Schedule", 185, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button44 = GUICtrlCreateButton("Locator Map", 276, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button45 = GUICtrlCreateButton("TechInfo", 367, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button51 = GUICtrlCreateButton("PWD Mgr", 460, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button32 = GUICtrlCreateButton("LUVALI", 552, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$Button103= GUICtrlCreateButton("Phone Book", 644, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
$addressIB = GUICtrlCreateCombo("", 740, 2, 130, 25)
GUICtrlSetData(-1, "server")
$raBTN = GUICtrlCreateButton("Remote", 872, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_BLUE)
GUICtrlSetColor(-1, $COLOR_WHITE)
$pgBTN = GUICtrlCreateButton("Ping", 922, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_BLACK)
GUICtrlSetColor(-1, $COLOR_WHITE)
$pcBTN = GUICtrlCreateButton("PCInfo", 972, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_LIME)
$luBTN = GUICtrlCreateButton("Tracert", 1022, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_BLACK)
GUICtrlSetColor(-1, $COLOR_WHITE)
$nsBTN = GUICtrlCreateButton("NSLookup", 1072, 2, 70, 25)
GUICtrlSetBkColor(-1, $COLOR_BLACK)
GUICtrlSetColor(-1, $COLOR_WHITE)
;~ $obBTN = GUICtrlCreateButton("GO", 1122, 2, 50, 25)
$rebBTN = GUICtrlCreateButton("Reboot", 1172, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_RED)
GUICtrlSetColor(-1, $COLOR_WHITE)
;~ ;################## Tab Sheet 1 #################################################################################################################################################
$TabSheet1 = GUICtrlCreateTabItem("Microsoft Office 365")
$Button27 = GUICtrlCreateButton("Teams Access Request", 8, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button28 = GUICtrlCreateButton("Misc Request Form", 138, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;$Button47 = GUICtrlCreateButton("User Portal", 168, 60, 75, 25)
;GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ ;################## Tab Sheet 2 #################################################################################################################################################
$TabSheet2 = GUICtrlCreateTabItem("Altea Amadeus")
$Button87 = GUICtrlCreateButton("Altea Docs", 8, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button88 = GUICtrlCreateButton("App Install", 98, 60, 85, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button89 = GUICtrlCreateButton("ARD Essential", 188, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button90 = GUICtrlCreateButton("ARD Web", 278, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button91 = GUICtrlCreateButton("ARPLSS", 368, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button95 = GUICtrlCreateButton("ARPLSS PW Info", 458, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button92 = GUICtrlCreateButton("Missing Shortcut", 548, 60, 85, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button93 = GUICtrlCreateButton("Printer Issues", 638, 60, 85, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 4 #################################################################################################################################################
$TabSheet4 = GUICtrlCreateTabItem("Aspect")
$Button96 = GUICtrlCreateButton("Aspect PW Utility", 8, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button97 = GUICtrlCreateButton("Aspect PW Info", 110, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button98 = GUICtrlCreateButton("Aspect Docs", 212, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 5 #################################################################################################################################################
$TabSheet5 = GUICtrlCreateTabItem("DASH")
$Button99 = GUICtrlCreateButton("DASH", 8, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button100 = GUICtrlCreateButton("DASH Docs", 104, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button101 = GUICtrlCreateButton("DASH-KB", 200, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button102 = GUICtrlCreateButton("DASH MyAccess", 294, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 6 #################################################################################################################################################
$TabSheet6 = GUICtrlCreateTabItem("Dell")
$Button26 = GUICtrlCreateButton("Tech Direct", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button73 = GUICtrlCreateButton("Drivers", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button29 = GUICtrlCreateButton("Service Request", 168, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 7 #################################################################################################################################################
$TabSheet7 = GUICtrlCreateTabItem("Airport OPS")
$Button70 = GUICtrlCreateButton("FIDS Displays", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button71 = GUICtrlCreateButton("FIDS: TechInfo", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$FIDSBTN = GUICtrlCreateButton("NOC OCC Dashboard", 168, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button33 = GUICtrlCreateButton("Kiosk Monitoring Tool", 288, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button34 = GUICtrlCreateButton("Kiosk Monitoring Tool Guide", 438, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button63 = GUICtrlCreateButton("Ops Suite", 588, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button64 = GUICtrlCreateButton("OTIS PW UTIL", 688, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button65 = GUICtrlCreateButton("OTIS: TechInfo", 788, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 8 #################################################################################################################################################
$TabSheet8 = GUICtrlCreateTabItem("Kiosks")
$Button33 = GUICtrlCreateButton("Monitoring Tool", 8, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button34 = GUICtrlCreateButton("Monitoring Tool Guide", 150, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $tskBTN = GUICtrlCreateButton("Epic Kill/Start", 168, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button56 = GUICtrlCreateButton("Epic KM", 248, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button74 = GUICtrlCreateButton("Top View", 328, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button75 = GUICtrlCreateButton("Right View", 408, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button76 = GUICtrlCreateButton("Rear View", 488, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button77 = GUICtrlCreateButton("Left View", 568, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button78 = GUICtrlCreateButton("Serial #", 648, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button25 = GUICtrlCreateButton("IBM Logon", 728, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 9 #################################################################################################################################################
$TabSheet9 = GUICtrlCreateTabItem("Misc. Apps")
$Button54 = GUICtrlCreateButton("VDI Support", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button48 = GUICtrlCreateButton("ALM", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button53 = GUICtrlCreateButton("PreHire Tool", 168, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button57 = GUICtrlCreateButton("PuTTY", 248, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button59 = GUICtrlCreateButton("Cyberark", 338, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button60 = GUICtrlCreateButton("F Drive Builder", 428, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button61 = GUICtrlCreateButton("(Run) PC Clean", 558, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button62 = GUICtrlCreateButton("Nettracer", 648, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button68 = GUICtrlCreateButton("Outlook Docs", 778, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button69 = GUICtrlCreateButton("RA Install", 868, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button86 = GUICtrlCreateButton("BDD Tool", 958, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button23 = GUICtrlCreateButton("Bluecat", 1048, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$citrixdir = GUICtrlCreateButton("Citrix Admin", 1248, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 10 #################################################################################################################################################
$TabSheet10 = GUICtrlCreateTabItem("Ops Suite/OTIS")
$Button63 = GUICtrlCreateButton("Ops Suite", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button64 = GUICtrlCreateButton("OTIS PW UTIL", 86, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button65 = GUICtrlCreateButton("OTIS: TechInfo", 173, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 11 #################################################################################################################################################
$TabSheet11 = GUICtrlCreateTabItem("Scanners")
$Button55 = GUICtrlCreateButton("SmartSuite", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button80 = GUICtrlCreateButton("Airwatch", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button81 = GUICtrlCreateButton("3M Drivers", 168, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button40 = GUICtrlCreateButton("Itrac30/RMA", 248, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$brockbtn = GUICtrlCreateButton("Brock", 328, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 12 #################################################################################################################################################
$TabSheet12 = GUICtrlCreateTabItem("Printers")
$Button11 = GUICtrlCreateButton("Toshiba", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button21 = GUICtrlCreateButton("IP List", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button22 = GUICtrlCreateButton("Drivers", 168, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button58 = GUICtrlCreateButton("Training", 248, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button94 = GUICtrlCreateButton("Add Printer Tool", 328, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################### Tab Sheet 13 #####################################################################################################################
$TabSheet13 = GUICtrlCreateTabItem("VPN")
$Button84 = GUICtrlCreateButton("Setup Docs", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button82 = GUICtrlCreateButton("Primary PDC", 88, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button83 = GUICtrlCreateButton("Secondary SDC", 168, 60, 100, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;$Button85 = GUICtrlCreateButton("Helpdesk Admin", 275, 60, 100, 25)
;GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button66 = GUICtrlCreateButton("Mobile Lite", 380, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button67 = GUICtrlCreateButton("Mobile Full", 460, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;$Button25 = GUICtrlCreateButton("MFA", 540, 60, 75, 25)
;GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################### Tab Sheet 13 #####################################################################################################################
$TabSheet14 = GUICtrlCreateTabItem("MyAccess Tools")
$Robotbtn = GUICtrlCreateButton("Robotic ID Creation Tool", 8, 60, 130, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$entitlementbtn = GUICtrlCreateButton("Entitlements", 142, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button24 = GUICtrlCreateButton("AD Clone Tool", 220, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$ADreportbtn = GUICtrlCreateButton("AD Report Tool", 298, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg=$Button11
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://gsp.toshiba.com/")
        Case $msg=$Button21
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://techinfo/Hardware/Printers/Toshiba/Toshiba_IP_List.htm")
        Case $msg=$Button22
            ShellExecute("H:\CSD\1_PRINTER DRIVERS")
        Case $msg=$Button23
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://dnsadmin/app")
        Case $msg=$Button24
            ShellExecute("H:\DST\Tools\AutoIt Scripts\ADGroupCloneTool\ADGroupCloneTool.exe")
        ;Case $msg=$Button25
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vdesk.swacorp.com/")
        Case $msg=$Button26
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://techdirect.dell.com/Portal/DTDLogin.aspx")
        Case $msg=$Button27
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://swa.is/teamsintake")
        Case $msg=$Button28
            MsgBox(0, "LogMeIn Tech Portal Login", "Please Use one of the four available username accounts below...")
        Case $msg=$Button29
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://southwest.service-now.com/nav_to.do?uri=%2Fkb_view.do%3Fsysparm_article%3DKB0027312%26sysparm_rank%3D4%26sysparm_tsqueryId%3D78e3f4d01b2148908e2b0f2f5b4bcbd6")
        ;Case $msg=$Button30
        ;   ShellExecute("C:\Program Files\NAVITAIRE\Navitaire TE\NavitaireTE.exe")
        Case $msg=$Button32
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://wpsecadmin01/sec/lockout.html")
        Case $msg=$Button33
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://checkin.si.amadeus.net/static/DEV/testpage/AirlineCustomizationPortal.html")
        Case $msg=$Button34
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://southwest.service-now.com/nav_to.do?uri=%2Fkb_view.do%3Fsysparm_article%3DKB0056562%26sysparm_rank%3D1%26sysparm_tsqueryId%3Da65d9ff01bedc850107886ae6e4bcbce")
        Case $msg=$Button40
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://itrac360.com/#/report/ticket")
         Case $msg=$brockbtn
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://support.brocksolutions.com/")
        Case $msg=$Button43
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://southwest.quickbase.com/db/bqhanufg6?a=td")
        Case $msg=$Button44
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://techlife.swacorp.com/Confluence/Stations/StationMap.htm")
        Case $msg=$Button45
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://swafluence/display/TSSD/Service+Desk+Links")
        ;Case $msg=$Button47
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://secure.logmeinrescue.com/Customer/Code.aspx")
        Case $msg=$Button48
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://alm.swacorp.com/qcbin/start_a.jsp")
        Case $msg=$Button51
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://idmgmt.swacorp.com/sspr/private/login")
        Case $msg=$Button52
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://login.swalife.com/myswa_lifelogin.htm")
        Case $msg=$Button53
            ShellExecute("H:\CSD\1_ServiceDeskTechs\Matt\Prehire Automation Tool")
        Case $msg=$Button54
            Run("H:\DST\Tools\VDI Support\VDI_Support.exe")
        Case $msg=$Button55
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://swa.brocksolutions.com/WebClient/Default.aspx")
;~      Case $msg=$Button56
;~          Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://msinqweb.swacorp.com/InfoCenter/index?page=content&id=KM22509")
        Case $msg=$Button57
            Run(@ProgramFilesDir&"\PuTTY\putty.exe")
        Case $msg=$Button58
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://copiers.toshiba.com/usa/support/training/index.html")
        Case $msg=$Button59
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://pvwa.cis.prod.swacorp.com/PasswordVault/v10/logon/ldap")
        Case $msg=$Button60
            ShellExecute("H:\DST\Tools\HomeDirBld\DE-HomeDirectoryBuilder.exe")
         Case $msg=$Button61
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            FileDelete($pcleanfile)
            FileWriteLine($pcleanfile,$server)
            ShellExecute("H:\CSD\CSD Applications\PCCleanUp_Win 7\Win7WkstnCleanup.exe","","H:\CSD\CSD Applications\PCCleanUp_Win 7\")
        Case $msg=$Button62
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://idp.cis.prod.swalife.com/secureauth18/")
        Case $msg=$Button63
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://opssuite.swacorp.com/")
        Case $msg=$Button64
            ShellExecute("\\techsvcs\technology-shared\SWASYB_Security\swasecurity.exe","","\\techsvcs\technology-shared\SWASYB_Security")
        Case $msg=$Button65
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://techinfo/applications/otis/otis-main.asp")
;~      Case $msg=$Button66
;~          ShellExecute("H:\CSD\Overnight Crew\OTISInfo.exe")
;~      Case $msg=$Button67
;~          ShellExecute("H:\CSD\Overnight Crew\OTISPW.exe")
        Case $msg=$Button68
            ShellExecute("H:\CSD\Outlook solutions")
        Case $msg=$Button69
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            msgbox(0,"MFA Required","Must be on MFA VDI to install Remotely Anywhere on "&$server&"")
            FileChangeDir("H:\CSD\CSD Applications\RemotelyAnywhere\x86")
            ShellExecute('cmd.exe','/T:1f /K RemotelyAnywhere.exe install -computer \\'&$server&' -path "C:\Program Files\RemotelyAnywhere" -license "H:\CSD\CSD Applications\RemotelyAnywhere\x86\license.txt -port 2000"')
         Case $msg=$Button70
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://techinfo/TechUpdates/EclipsX/LCDserial.htm")
         Case $msg=$Button71
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://techinfo/EclipsX/EclipsX/EclipsX-main.htm")
         Case $msg=$FIDSBTN
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://nrtd.swacorp.com/nrtd_occ/occ_dashboard.jsp")
         Case $msg=$Button73
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://www.dell.com/support/home/us/en/04?app=drivers")
;~       Case $msg=$Button74
;~          ShellExecute("H:\CSD\Overnight Crew\Top View of Kiosk.jpg")
;~       Case $msg=$Button75
;~          ShellExecute("H:\CSD\Overnight Crew\Right View of Kiosk.jpg")
;~       Case $msg=$Button76
;~          ShellExecute("H:\CSD\Overnight Crew\Rear View of Kiosk.jpg")
;~       Case $msg=$Button77
;~          ShellExecute("H:\CSD\Overnight Crew\Left View of Kiosk.jpg")
;~       Case $msg=$Button78
;~          ShellExecute("H:\CSD\Overnight Crew\Kiosk Serial #.jpg")
         ;Case $msg=$Button79
        ;   ShellExecute(@ProgramFilesDir&"\Navitaire\NewSkies\R3.2\AirTran prodr3x\ClientSuite\Utilities\UI.Win.Utilities.exe")
         Case $msg=$Button80
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://cn166.awmdm.com/AirWatch/Login?ReturnUrl=%2FAirWatch%2F")
         Case $msg=$Button81
            ShellExecute("H:\CSD\1 _CSD Drivers & Patches\3M Card Reader Drivers")
         ;Case $msg=$Button82
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vpn.swalife.com/secureauth1/")
         ;Case $msg=$Button83
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vpn2.swalife.com/secureauth1/")
         Case $msg=$Button84
            ShellExecute("H:\CSD\VPN Connectivity Issues")
         ;Case $msg=$Button85
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vpn.swalife.com/secureauth6/")
         Case $msg=$Button86
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://wpcmpri01.luv.ad.swacorp.com:8443/Imaging/BDDTool.aspx")
         Case $msg=$Button87
            ShellExecute("H:\CSD\Altea\")
;~       Case $msg=$Button88
;~          ShellExecute("H:\CSD\Altea\Altea Installs.msg")
         Case $msg=$Button89
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://ardessential.swacorp.com/app_ard/apf/init/login?LANGUAGE=US&SITE=EWNPEWNP&MARKETS=ARDW_PROD_LP_INTRA")
         Case $msg=$Button90
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://ARDWeb.swacorp.com/app_ard/apf/init/login?LANGUAGE=US&SITE=AWNPAWNP&MARKETS=ARDW_PROD_LP_INTRA")
         Case $msg=$Button91
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://arp.swacorp.com/1ASIHGAPWN/glorep/start")
;~       Case $msg=$Button92
;~          ShellExecute("H:\CSD\Altea\Missing Altea Shortcut.msg")
;~       Case $msg=$Button93
;~          ShellExecute("H:\CSD\Altea\Altea Printer issues.msg")
         Case $msg=$Button94
            ShellExecute("H:\CSD\1_ServiceDeskTechs\Matt\PrinterInstall")
         Case $msg=$Button95
            ShellExecute("H:\CSD\Altea\ARP LSS Login Info.txt")
         Case $msg=$Button96
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://s2dacdmgmt.swaaod.net/RDWeb/Pages/en-US/login.aspx?ReturnUrl=/RDWeb/Pages/en-US/Default.aspx")
         Case $msg=$Button97
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://swafluence/display/TSSD/Service+Desk+Links")
         Case $msg=$Button98
            ShellExecute("H:\CSD\CSD Applications\Aspect\")
         Case $msg=$Button99
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://southwest.service-now.com")
         Case $msg=$Button100
            ShellExecute("H:\CSD\DASH Info\")
         Case $msg=$Button101
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://southwest.service-now.com/nav_to.do?uri=%2F$pa_dashboard.do%3Fsysparm_dashboard%3Dae92bd3d1bbea8588878a8a82b4bcbca")
         Case $msg=$Button102
            ShellExecute("H:\CSD\DASH Info\MyAccess Support Docs.msg")
         Case $msg=$Button103
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://southwest.service-now.com/nav_to.do?uri=%2Fkb_view.do%3Fsysparm_article%3DKB0084860%26sysparm_rank%3D2%26sysparm_tsqueryId%3D4d0024c41ba544908e2b0f2f5b4bcb65")
        Case $msg=$raBTN
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            If Ping($server) Then
               Run("C:\"&$PFLocation&"\Microsoft\Edge\Application\msedge.exe http://"&$server&":2000"&"/ntlm")
            Else
               MsgBox(0,"Unable to Connect", "Unable to Ping Machine - Possible Reasons:" & @CRLF & @CRLF & "Connect via MFA" & @CRLF & "Machine is not on the SWA Network" & @CRLF & "Remotely Anywhere is not installed")
               EndIf
        Case $msg=$pgBTN
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            ShellExecute("cmd.exe","/T:1f /K ping "&$server&" -t")
        Case $msg = $pcbtn
            $server = GUICtrlRead($addressib)
            GUICtrlSetData($addressib, $server)
            If (StringRegExp($server,"[%]"))  Then
              $server = StringReplace($server,"%","%25")
            EndIf
            Run("C:\" & $pflocation & "\Microsoft\Edge\Application\msedge.exe http://wpcmsql01/ReportServer/Pages/ReportViewer.aspx?/ConfigMgr_P01/SCCM+2007+Imported%2fTechnical+Services%2fTS+ComputerInformation+by+variable&SerialNumber=&ComputerVar="&$server)
        Case $msg=$luBTN
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            ShellExecute("cmd.exe","/T:1f /K tracert "&$server&"")
        Case $msg=$nsBTN
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            ShellExecute("cmd.exe","/T:1f /K nslookup "&$server&" -t")
;~      Case $msg=$obBTN
;~          Run("C:\"&$PFLocation&"\Microsoft\Edge\Application\msedge.exe https://idmgmt.swacorp.com/sspr/private/login")
        Case $msg=$rebBTN
            $server=GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB,$server)
            MsgBox(1,"Confirm Reboot","You are initiating a reboot for "&$server&" Do you wish to proceed?")
            ShellExecute("cmd.exe","/c shutdown.exe -r -t -m "&$server&"")
        Case $msg=$tsBTN
            Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://swafluence/pages/viewpage.action?spaceKey=TSSD&title=Service+Desk")
;~      Case $msg=$tskBTN
;~          ShellExecute("H:\CSD\CSD Applications\EPIC Killer\EPIC Killer.exe")
        Case $msg=$Robotbtn
            ShellExecute("H:\CSD\1_ServiceDeskTechs\Matt\Robotic ID Creation Tool\")
        Case $msg=$entitlementbtn
            ShellExecute("H:\CSD\1_ServiceDeskTechs\Matt\entitlement.xlsx")
        Case $msg=$GUI_EVENT_CLOSE
            $array=WinGetPos("Service Desk Power Tool")
            RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool","X","REG_SZ",$array [0])
            RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool","Y","REG_SZ",$array [1])
            Exit
    EndSelect
WEnd

Current code. I was working from a backup but it looks like its starting to do the same thing with no rhyme or reason to it.

Edited by Mattw11486
Link to post
Share on other sites
  • Developers
On 5/19/2021 at 7:11 AM, Mattw11486 said:

I do not have any hotkeysets in the code anywhere at all

I have also tried disabling the au3 checks and running it same issue, turned it back on but now I seem to be getting a different error:

image.png.87a45d161ac10c199027354ace8e1a64.png

This is a message that comes from AutoIt3Wrapper which is failing to set its standard HotKeys for STOP and/or RESTART, so has nothing to do with your script!

Jos 

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to post
Share on other sites

Thanks, I am not sure why that kept coming up as I had no hotkeys but maybe they were in one of the includes. It was not related to what was going on. After I commented out all of the registry writes in my code it opened fine, after I uncommented them out it continued to open fine. It was weird that that had occurred in the first place as I was not moving the file around before closing it or anything. But, it is working now so I am happy!

Link to post
Share on other sites
29 minutes ago, Jos said:

This is a message that comes from AutoIt3Wrapper which is failing to set its standard HotKeys for STOP and/or RESTART, so has nothing to do with your script!

What can cause the message? Does it detect that a running program has already registered them?

Code hard, but don’t hard code...

Link to post
Share on other sites
Posted (edited)

I think you should try deleting Autoit Scite and Autoit then reinstalling!

When something goes wrong I usually do it first!

 

I have some optimizations for your code:

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=swalogo.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;~ #include <ButtonConstants.au3>
;~ #include <ComboConstants.au3>
;~ #include <EditConstants.au3>
;~ #include <GUIConstantsEx.au3>
;~ #include <StaticConstants.au3>
;~ #include <TabConstants.au3>
;~ #include <WindowsConstants.au3>
;~ #include <IE.au3>
;~ #include <File.au3>
;~ #include <ColorConstants.au3>
;########################################################################################################################################

Global Const $GUI_EVENT_CLOSE = -3, $GUI_DOCKAUTO = 0x0001, $COLOR_BLACK = 0x000000, $COLOR_BLUE = 0x0000FF, $COLOR_LIME = 0x00FF00, $COLOR_RED = 0xFF000, $COLOR_WHITE = 0xFFFFFF
;~ Opt("MustDeclareVars", 1) ;0=no, 1=require pre-declaration
;~ AutoItSetOption("MustDeclareVars", 1) ;0=no, 1=require pre-declaration

Global $pCleanFile = "\\techsvcs\tech_svcs-shared\CSD\CSD Applications\PcCleanUp_Win 7\WkstntoClean.txt"
Global $PFLocation
If @OSArch = "X64" Then
    $PFLocation = "Program Files (x86)"
Else
    $PFLocation = "Program Files"
EndIf
Global $P_MsEdge_EXE = @ProgramFilesDir & '\Microsoft\Edge\Application\msedge.exe'
Global $C_MsEdge_EXE = @HomeDrive & '\' & $PFLocation & '\Microsoft\Edge\Application\msedge.exe"'
Global $CSD_DIR = "H:\CSD"
Global $DST_DIR = "H:\DST"

Local $x = RegRead("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool", "X")
If @error <> 0 Then
    $x = -1
    RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool", "X", "REG_SZ", $x)
EndIf
Local $y = RegRead("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool", "Y")
If @error <> 0 Then
    $y = -1
    RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool V8", "Y", "REG_SZ", $y)
EndIf

#Region ### START Koda GUI section ### Form=F:\AutoIt3\CSD Power Tool V1.kxf
Global $Form1_1 = GUICreate("Service Desk Power Tool", 1225, 90, $x, $y)
GUISetFont(10, 400, 0, "Calibri")
GUISetBkColor(0x99B4D1)
WinSetOnTop("AlwaysOnTop", "On", 1)
Global $PageControl1 = GUICtrlCreateTab(0, 30, 1255, 60)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
Global $tsBTN = GUICtrlCreateButton("SWAFlu", 4, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button52 = GUICtrlCreateButton("SWALife", 94, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button43 = GUICtrlCreateButton("CSD Schedule", 185, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button44 = GUICtrlCreateButton("Locator Map", 276, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button45 = GUICtrlCreateButton("TechInfo", 367, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button51 = GUICtrlCreateButton("PWD Mgr", 460, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button32 = GUICtrlCreateButton("LUVALI", 552, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $Button103 = GUICtrlCreateButton("Phone Book", 644, 2, 90, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetColor(-1, 0x000080)
Global $addressIB = GUICtrlCreateCombo("", 740, 2, 130, 25)
GUICtrlSetData(-1, "server")
Global $raBTN = GUICtrlCreateButton("Remote", 872, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_BLUE)
GUICtrlSetColor(-1, $COLOR_WHITE)
Global $pgBTN = GUICtrlCreateButton("Ping", 922, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_BLACK)
GUICtrlSetColor(-1, $COLOR_WHITE)
Global $pcBTN = GUICtrlCreateButton("PCInfo", 972, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_LIME)
Global $luBTN = GUICtrlCreateButton("Tracert", 1022, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_BLACK)
GUICtrlSetColor(-1, $COLOR_WHITE)
Global $nsBTN = GUICtrlCreateButton("NSLookup", 1072, 2, 70, 25)
GUICtrlSetBkColor(-1, $COLOR_BLACK)
GUICtrlSetColor(-1, $COLOR_WHITE)
;~ $obBTN = GUICtrlCreateButton("GO", 1122, 2, 50, 25)
Global $rebBTN = GUICtrlCreateButton("Reboot", 1172, 2, 50, 25)
GUICtrlSetBkColor(-1, $COLOR_RED)
GUICtrlSetColor(-1, $COLOR_WHITE)
;~ ;################## Tab Sheet 1 #################################################################################################
Global $TabSheet1 = GUICtrlCreateTabItem("Microsoft Office 365")
Global $Button27 = GUICtrlCreateButton("Teams Access Request", 8, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button28 = GUICtrlCreateButton("Misc Request Form", 138, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;$Button47 = GUICtrlCreateButton("User Portal", 168, 60, 75, 25)
;GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ ;################## Tab Sheet 2 #################################################################################################
Global $TabSheet2 = GUICtrlCreateTabItem("Altea Amadeus")
Global $Button87 = GUICtrlCreateButton("Altea Docs", 8, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button88 = GUICtrlCreateButton("App Install", 98, 60, 85, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button89 = GUICtrlCreateButton("ARD Essential", 188, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button90 = GUICtrlCreateButton("ARD Web", 278, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button91 = GUICtrlCreateButton("ARPLSS", 368, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button95 = GUICtrlCreateButton("ARPLSS PW Info", 458, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button92 = GUICtrlCreateButton("Missing Shortcut", 548, 60, 85, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $Button93 = GUICtrlCreateButton("Printer Issues", 638, 60, 85, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 4 #################################################################################################
Global $TabSheet4 = GUICtrlCreateTabItem("Aspect")
Global $Button96 = GUICtrlCreateButton("Aspect PW Utility", 8, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button97 = GUICtrlCreateButton("Aspect PW Info", 110, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button98 = GUICtrlCreateButton("Aspect Docs", 212, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 5 ##################################################################################################
Global $TabSheet5 = GUICtrlCreateTabItem("DASH")
Global $Button99 = GUICtrlCreateButton("DASH", 8, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button100 = GUICtrlCreateButton("DASH Docs", 104, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button101 = GUICtrlCreateButton("DASH-KB", 200, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button102 = GUICtrlCreateButton("DASH MyAccess", 294, 60, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 6 ####################################################################################################
Global $TabSheet6 = GUICtrlCreateTabItem("Dell")
Global $Button26 = GUICtrlCreateButton("Tech Direct", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button73 = GUICtrlCreateButton("Drivers", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button29 = GUICtrlCreateButton("Service Request", 168, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 7 ####################################################################################################
Global $TabSheet7 = GUICtrlCreateTabItem("Airport OPS")
Global $Button70 = GUICtrlCreateButton("FIDS Displays", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button71 = GUICtrlCreateButton("FIDS: TechInfo", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $FIDSBTN = GUICtrlCreateButton("NOC OCC Dashboard", 168, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button33 = GUICtrlCreateButton("Kiosk Monitoring Tool", 288, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button34 = GUICtrlCreateButton("Kiosk Monitoring Tool Guide", 438, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button63 = GUICtrlCreateButton("Ops Suite", 588, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button64 = GUICtrlCreateButton("OTIS PW UTIL", 688, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button65 = GUICtrlCreateButton("OTIS: TechInfo", 788, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 8 ####################################################################################################
Global $TabSheet8 = GUICtrlCreateTabItem("Kiosks")
Global $Button33 = GUICtrlCreateButton("Monitoring Tool", 8, 60, 120, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button34 = GUICtrlCreateButton("Monitoring Tool Guide", 150, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ $tskBTN = GUICtrlCreateButton("Epic Kill/Start", 168, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button56 = GUICtrlCreateButton("Epic KM", 248, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button74 = GUICtrlCreateButton("Top View", 328, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button75 = GUICtrlCreateButton("Right View", 408, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button76 = GUICtrlCreateButton("Rear View", 488, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button77 = GUICtrlCreateButton("Left View", 568, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button78 = GUICtrlCreateButton("Serial #", 648, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button25 = GUICtrlCreateButton("IBM Logon", 728, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 9 #####################################################################################################
Global $TabSheet9 = GUICtrlCreateTabItem("Misc. Apps")
Global $Button54 = GUICtrlCreateButton("VDI Support", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button48 = GUICtrlCreateButton("ALM", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button53 = GUICtrlCreateButton("PreHire Tool", 168, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button57 = GUICtrlCreateButton("PuTTY", 248, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button59 = GUICtrlCreateButton("Cyberark", 338, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button60 = GUICtrlCreateButton("F Drive Builder", 428, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button61 = GUICtrlCreateButton("(Run) PC Clean", 558, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button62 = GUICtrlCreateButton("Nettracer", 648, 60, 125, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button68 = GUICtrlCreateButton("Outlook Docs", 778, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button69 = GUICtrlCreateButton("RA Install", 868, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button86 = GUICtrlCreateButton("BDD Tool", 958, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button23 = GUICtrlCreateButton("Bluecat", 1048, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $citrixdir = GUICtrlCreateButton("Citrix Admin", 1248, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 10 ####################################################################################################
Global $TabSheet10 = GUICtrlCreateTabItem("Ops Suite/OTIS")
Global $Button63 = GUICtrlCreateButton("Ops Suite", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button64 = GUICtrlCreateButton("OTIS PW UTIL", 86, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button65 = GUICtrlCreateButton("OTIS: TechInfo", 173, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 11 ###################################################################################################
Global $TabSheet11 = GUICtrlCreateTabItem("Scanners")
Global $Button55 = GUICtrlCreateButton("SmartSuite", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button80 = GUICtrlCreateButton("Airwatch", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button81 = GUICtrlCreateButton("3M Drivers", 168, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button40 = GUICtrlCreateButton("Itrac30/RMA", 248, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $brockbtn = GUICtrlCreateButton("Brock", 328, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################## Tab Sheet 12 #####################################################################################################
Global $TabSheet12 = GUICtrlCreateTabItem("Printers")
Global $Button11 = GUICtrlCreateButton("Toshiba", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button21 = GUICtrlCreateButton("IP List", 88, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button22 = GUICtrlCreateButton("Drivers", 168, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button58 = GUICtrlCreateButton("Training", 248, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button94 = GUICtrlCreateButton("Add Printer Tool", 328, 60, 85, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################### Tab Sheet 13 ###############################################################################################
Global $TabSheet13 = GUICtrlCreateTabItem("VPN")
Global $Button84 = GUICtrlCreateButton("Setup Docs", 8, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button82 = GUICtrlCreateButton("Primary PDC", 88, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button83 = GUICtrlCreateButton("Secondary SDC", 168, 60, 100, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Global $Button85 = GUICtrlCreateButton("Helpdesk Admin", 275, 60, 100, 25)
;GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button66 = GUICtrlCreateButton("Mobile Lite", 380, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;~ Global $Button67 = GUICtrlCreateButton("Mobile Full", 460, 60, 75, 25)
;~ GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;Global $Button25 = GUICtrlCreateButton("MFA", 540, 60, 75, 25)
;GUICtrlSetFont(-1, 8, 400, 0, "Arial")
;################### Tab Sheet 13 #############################################################################################
Global $TabSheet14 = GUICtrlCreateTabItem("MyAccess Tools")
Global $Robotbtn = GUICtrlCreateButton("Robotic ID Creation Tool", 8, 60, 130, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $entitlementbtn = GUICtrlCreateButton("Entitlements", 142, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $Button24 = GUICtrlCreateButton("AD Clone Tool", 220, 60, 75, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
Global $ADreportbtn = GUICtrlCreateButton("AD Report Tool", 298, 60, 95, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $msg, $server
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $Button11
            Run('"' & $P_MsEdge_EXE & '" ' & "http://gsp.toshiba.com/")
        Case $msg = $Button21
            Run('"' & $P_MsEdge_EXE & '" ' & "http://techinfo/Hardware/Printers/Toshiba/Toshiba_IP_List.htm")
        Case $msg = $Button22
            ShellExecute($CSD_DIR & "\1_PRINTER DRIVERS")
        Case $msg = $Button23
            Run('"' & $P_MsEdge_EXE & '" ' & "https://dnsadmin/app")
        Case $msg = $Button24
            ShellExecute($DST_DIR & "\Tools\AutoIt Scripts\ADGroupCloneTool\ADGroupCloneTool.exe")
            ;Case $msg=$Button25
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vdesk.swacorp.com/")
        Case $msg = $Button26
            Run('"' & $P_MsEdge_EXE & '" ' & "https://techdirect.dell.com/Portal/DTDLogin.aspx")
        Case $msg = $Button27
            Run('"' & $P_MsEdge_EXE & '" ' & "http://swa.is/teamsintake")
        Case $msg = $Button28
            MsgBox(262144, "LogMeIn Tech Portal Login", "Please Use one of the four available username accounts below...")
        Case $msg = $Button29
            Run('"' & $P_MsEdge_EXE & '" ' & "https://southwest.service-now.com/nav_to.do?uri=%2Fkb_view.do%3Fsysparm_article%3DKB0027312%26sysparm_rank%3D4%26sysparm_tsqueryId%3D78e3f4d01b2148908e2b0f2f5b4bcbd6")
            ;Case $msg=$Button30
            ;   ShellExecute("C:\Program Files\NAVITAIRE\Navitaire TE\NavitaireTE.exe")
        Case $msg = $Button32
            Run('"' & $P_MsEdge_EXE & '" ' & "https://wpsecadmin01/sec/lockout.html")
        Case $msg = $Button33
            Run('"' & $P_MsEdge_EXE & '" ' & "https://checkin.si.amadeus.net/static/DEV/testpage/AirlineCustomizationPortal.html")
        Case $msg = $Button34
            Run('"' & $P_MsEdge_EXE & '" ' & "https://southwest.service-now.com/nav_to.do?uri=%2Fkb_view.do%3Fsysparm_article%3DKB0056562%26sysparm_rank%3D1%26sysparm_tsqueryId%3Da65d9ff01bedc850107886ae6e4bcbce")
        Case $msg = $Button40
            Run('"' & $P_MsEdge_EXE & '" ' & "https://itrac360.com/#/report/ticket")
        Case $msg = $brockbtn
            Run('"' & $P_MsEdge_EXE & '" ' & "https://support.brocksolutions.com/")
        Case $msg = $Button43
            Run('"' & $P_MsEdge_EXE & '" ' & "https://southwest.quickbase.com/db/bqhanufg6?a=td")
        Case $msg = $Button44
            Run('"' & $P_MsEdge_EXE & '" ' & "http://techlife.swacorp.com/Confluence/Stations/StationMap.htm")
        Case $msg = $Button45
            Run('"' & $P_MsEdge_EXE & '" ' & "https://swafluence/display/TSSD/Service+Desk+Links")
            ;Case $msg=$Button47
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://secure.logmeinrescue.com/Customer/Code.aspx")
        Case $msg = $Button48
            Run('"' & $P_MsEdge_EXE & '" ' & "http://alm.swacorp.com/qcbin/start_a.jsp")
        Case $msg = $Button51
            Run('"' & $P_MsEdge_EXE & '" ' & "https://idmgmt.swacorp.com/sspr/private/login")
        Case $msg = $Button52
            Run('"' & $P_MsEdge_EXE & '" ' & "https://login.swalife.com/myswa_lifelogin.htm")
        Case $msg = $Button53
            ShellExecute($CSD_DIR & "\1_ServiceDeskTechs\Matt\Prehire Automation Tool")
        Case $msg = $Button54
            Run($DST_DIR & "\Tools\VDI Support\VDI_Support.exe")
        Case $msg = $Button55
            Run('"' & $P_MsEdge_EXE & '" ' & "https://swa.brocksolutions.com/WebClient/Default.aspx")
;~      Case $msg=$Button56
;~          Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe http://msinqweb.swacorp.com/InfoCenter/index?page=content&id=KM22509")
        Case $msg = $Button57
            Run(@ProgramFilesDir & "\PuTTY\putty.exe")
        Case $msg = $Button58
            Run('"' & $P_MsEdge_EXE & '" ' & "http://copiers.toshiba.com/usa/support/training/index.html")
        Case $msg = $Button59
            Run('"' & $P_MsEdge_EXE & '" ' & "https://pvwa.cis.prod.swacorp.com/PasswordVault/v10/logon/ldap")
        Case $msg = $Button60
            ShellExecute($DST_DIR & "\Tools\HomeDirBld\DE-HomeDirectoryBuilder.exe")
        Case $msg = $Button61
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            FileDelete($pCleanFile)
            FileWriteLine($pCleanFile, $server)
            ShellExecute($CSD_DIR & "\CSD Applications\PCCleanUp_Win 7\Win7WkstnCleanup.exe", "", $CSD_DIR & "\CSD Applications\PCCleanUp_Win 7\")
        Case $msg = $Button62
            Run('"' & $P_MsEdge_EXE & '" ' & "https://idp.cis.prod.swalife.com/secureauth18/")
        Case $msg = $Button63
            Run('"' & $P_MsEdge_EXE & '" ' & "http://opssuite.swacorp.com/")
        Case $msg = $Button64
            ShellExecute("\\techsvcs\technology-shared\SWASYB_Security\swasecurity.exe", "", "\\techsvcs\technology-shared\SWASYB_Security")
        Case $msg = $Button65
            Run('"' & $P_MsEdge_EXE & '" ' & "http://techinfo/applications/otis/otis-main.asp")
;~      Case $msg=$Button66
;~          ShellExecute($CSD_DIR & "\Overnight Crew\OTISInfo.exe")
;~      Case $msg=$Button67
;~          ShellExecute($CSD_DIR & "\Overnight Crew\OTISPW.exe")
        Case $msg = $Button68
            ShellExecute($CSD_DIR & "\Outlook solutions")
        Case $msg = $Button69
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            MsgBox(262144, "MFA Required", "Must be on MFA VDI to install Remotely Anywhere on " & $server & "")
            FileChangeDir($CSD_DIR & "\CSD Applications\RemotelyAnywhere\x86")
            ShellExecute('cmd.exe', '/T:1f /K RemotelyAnywhere.exe install -computer \\' & $server & ' -path "C:\Program Files\RemotelyAnywhere" -license $CSD_DIR & "\CSD Applications\RemotelyAnywhere\x86\license.txt -port 2000"')
        Case $msg = $Button70
            Run('"' & $P_MsEdge_EXE & '" ' & "http://techinfo/TechUpdates/EclipsX/LCDserial.htm")
        Case $msg = $Button71
            Run('"' & $P_MsEdge_EXE & '" ' & "http://techinfo/EclipsX/EclipsX/EclipsX-main.htm")
        Case $msg = $FIDSBTN
            Run('"' & $P_MsEdge_EXE & '" ' & "https://nrtd.swacorp.com/nrtd_occ/occ_dashboard.jsp")
        Case $msg = $Button73
            Run('"' & $P_MsEdge_EXE & '" ' & "https://www.dell.com/support/home/us/en/04?app=drivers")
;~       Case $msg=$Button74
;~          ShellExecute($CSD_DIR & "\Overnight Crew\Top View of Kiosk.jpg")
;~       Case $msg=$Button75
;~          ShellExecute($CSD_DIR & "\Overnight Crew\Right View of Kiosk.jpg")
;~       Case $msg=$Button76
;~          ShellExecute($CSD_DIR & "\Overnight Crew\Rear View of Kiosk.jpg")
;~       Case $msg=$Button77
;~          ShellExecute($CSD_DIR & "\Overnight Crew\Left View of Kiosk.jpg")
;~       Case $msg=$Button78
;~          ShellExecute($CSD_DIR & "\Overnight Crew\Kiosk Serial #.jpg")
            ;Case $msg=$Button79
            ;   ShellExecute(@ProgramFilesDir&"\Navitaire\NewSkies\R3.2\AirTran prodr3x\ClientSuite\Utilities\UI.Win.Utilities.exe")
        Case $msg = $Button80
            Run('"' & $P_MsEdge_EXE & '" ' & "https://cn166.awmdm.com/AirWatch/Login?ReturnUrl=%2FAirWatch%2F")
        Case $msg = $Button81
            ShellExecute($CSD_DIR & "\1 _CSD Drivers & Patches\3M Card Reader Drivers")
            ;Case $msg=$Button82
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vpn.swalife.com/secureauth1/")
            ;Case $msg=$Button83
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vpn2.swalife.com/secureauth1/")
        Case $msg = $Button84
            ShellExecute($CSD_DIR & "\VPN Connectivity Issues")
            ;Case $msg=$Button85
            ;Run(@ProgramFilesDir&"\Microsoft\Edge\Application\msedge.exe https://vpn.swalife.com/secureauth6/")
        Case $msg = $Button86
            Run('"' & $P_MsEdge_EXE & '" ' & "https://wpcmpri01.luv.ad.swacorp.com:8443/Imaging/BDDTool.aspx")
        Case $msg = $Button87
            ShellExecute($CSD_DIR & "\Altea\")
;~       Case $msg=$Button88
;~          ShellExecute($CSD_DIR & "\Altea\Altea Installs.msg")
        Case $msg = $Button89
            Run('"' & $P_MsEdge_EXE & '" ' & "https://ardessential.swacorp.com/app_ard/apf/init/login?LANGUAGE=US&SITE=EWNPEWNP&MARKETS=ARDW_PROD_LP_INTRA")
        Case $msg = $Button90
            Run('"' & $P_MsEdge_EXE & '" ' & "https://ARDWeb.swacorp.com/app_ard/apf/init/login?LANGUAGE=US&SITE=AWNPAWNP&MARKETS=ARDW_PROD_LP_INTRA")
        Case $msg = $Button91
            Run('"' & $P_MsEdge_EXE & '" ' & "https://arp.swacorp.com/1ASIHGAPWN/glorep/start")
;~       Case $msg=$Button92
;~          ShellExecute($CSD_DIR & "\Altea\Missing Altea Shortcut.msg")
;~       Case $msg=$Button93
;~          ShellExecute($CSD_DIR & "\Altea\Altea Printer issues.msg")
        Case $msg = $Button94
            ShellExecute($CSD_DIR & "\1_ServiceDeskTechs\Matt\PrinterInstall")
        Case $msg = $Button95
            ShellExecute($CSD_DIR & "\Altea\ARP LSS Login Info.txt")
        Case $msg = $Button96
            Run('"' & $P_MsEdge_EXE & '" ' & "https://s2dacdmgmt.swaaod.net/RDWeb/Pages/en-US/login.aspx?ReturnUrl=/RDWeb/Pages/en-US/Default.aspx")
        Case $msg = $Button97
            Run('"' & $P_MsEdge_EXE & '" ' & "https://swafluence/display/TSSD/Service+Desk+Links")
        Case $msg = $Button98
            ShellExecute($CSD_DIR & "\CSD Applications\Aspect\")
        Case $msg = $Button99
            Run('"' & $P_MsEdge_EXE & '" ' & "http://southwest.service-now.com")
        Case $msg = $Button100
            ShellExecute($CSD_DIR & "\DASH Info\")
        Case $msg = $Button101
            Run('"' & $P_MsEdge_EXE & '" ' & "https://southwest.service-now.com/nav_to.do?uri=%2F$pa_dashboard.do%3Fsysparm_dashboard%3Dae92bd3d1bbea8588878a8a82b4bcbca")
        Case $msg = $Button102
            ShellExecute($CSD_DIR & "\DASH Info\MyAccess Support Docs.msg")
        Case $msg = $Button103
            Run('"' & $P_MsEdge_EXE & '" ' & "https://southwest.service-now.com/nav_to.do?uri=%2Fkb_view.do%3Fsysparm_article%3DKB0084860%26sysparm_rank%3D2%26sysparm_tsqueryId%3D4d0024c41ba544908e2b0f2f5b4bcb65")
        Case $msg = $raBTN
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            If Ping($server) Then
                Run('"' & $C_MsEdge_EXE & '" ' & "http://" & $server & ":2000" & "/ntlm")
            Else
                MsgBox(48 + 262144, "Unable to Connect", "Unable to Ping Machine - Possible Reasons:" & @CRLF & @CRLF & "Connect via MFA" & @CRLF & "Machine is not on the SWA Network" & @CRLF & "Remotely Anywhere is not installed")
            EndIf
        Case $msg = $pgBTN
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            ShellExecute("cmd.exe", "/T:1f /K ping " & $server & " -t")
        Case $msg = $pcBTN
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            If (StringRegExp($server, "[%]")) Then
                $server = StringReplace($server, "%", "%25")
            EndIf
            Run('"' & $C_MsEdge_EXE & '" ' & "http://wpcmsql01/ReportServer/Pages/ReportViewer.aspx?/ConfigMgr_P01/SCCM+2007+Imported%2fTechnical+Services%2fTS+ComputerInformation+by+variable&SerialNumber=&ComputerVar=" & $server)
        Case $msg = $luBTN
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            ShellExecute("cmd.exe", "/T:1f /K tracert " & $server & "")
        Case $msg = $nsBTN
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)

            ShellExecute("cmd.exe", "/T:1f /K nslookup " & $server & " -t")
;~      Case $msg=$obBTN
;~          Run("C:\"&$PFLocation&"\Microsoft\Edge\Application\msedge.exe https://idmgmt.swacorp.com/sspr/private/login")
        Case $msg = $rebBTN
            $server = GUICtrlRead($addressIB)
            GUICtrlSetData($addressIB, $server)
            MsgBox(1 + 262144, "Confirm Reboot", "You are initiating a reboot for " & $server & " Do you wish to proceed?")
            ShellExecute("cmd.exe", "/c shutdown.exe -r -t -m " & $server & "")
        Case $msg = $tsBTN
            Run('"' & $P_MsEdge_EXE & '" ' & "https://swafluence/pages/viewpage.action?spaceKey=TSSD&title=Service+Desk")
;~      Case $msg=$tskBTN
;~          ShellExecute($CSD_DIR & "\CSD Applications\EPIC Killer\EPIC Killer.exe")
        Case $msg = $Robotbtn
            ShellExecute($CSD_DIR & "\1_ServiceDeskTechs\Matt\Robotic ID Creation Tool\")
        Case $msg = $entitlementbtn
            ShellExecute($CSD_DIR & "\1_ServiceDeskTechs\Matt\entitlement.xlsx")
        Case $msg = $GUI_EVENT_CLOSE
            Local $array = WinGetPos("Service Desk Power Tool")
            RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool", "X", "REG_SZ", $array[0])
            RegWrite("HKEY_CURRENT_USER\SOFTWARE\SWA\CSD Power Tool", "Y", "REG_SZ", $array[1])
            Exit
    EndSelect
WEnd

 

Edited by VIP
code

Regards,
 

Link to post
Share on other sites
  • Developers
Posted (edited)
54 minutes ago, VIP said:

I think you should try deleting Autoit Scite and Autoit then reinstalling!

I don't think so, so what about you do not interfere when I am trying to help this member to find the real cause? 

@Mattw11486

Strange as it seems that the setting fields for the hotkeys are both empty.
Couple of questions:

  • Did above post contain the exact scriptsource you have this issue with, so no #Directives to set these hotkeys?
  • Do you have any settings in AutoIt3Wrapper.ini on the pc with the issue for?:
    • SciTE_STOPEXECUTE
    • SciTE_RESTART 

Jos

EDIT: Please used the updated AutoIt3Wrapper.au3 version from Beta and show me what that generates, as the error message was not totally correct in case of failure.

Edited by Jos

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to post
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
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...