Mattw11486 Posted May 19, 2021 Share Posted May 19, 2021 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 Link to comment Share on other sites More sharing options...
Mattw11486 Posted May 19, 2021 Author Share Posted May 19, 2021 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: Link to comment Share on other sites More sharing options...
pseakins Posted May 19, 2021 Share Posted May 19, 2021 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 comment Share on other sites More sharing options...
Mattw11486 Posted May 19, 2021 Author Share Posted May 19, 2021 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 comment Share on other sites More sharing options...
JockoDundee Posted May 19, 2021 Share Posted May 19, 2021 Have you run it outside of Scite, or have you compiled it to .exe and tried? Code hard, but don’t hard code... Link to comment Share on other sites More sharing options...
Mattw11486 Posted May 19, 2021 Author Share Posted May 19, 2021 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 comment Share on other sites More sharing options...
Nine Posted May 19, 2021 Share Posted May 19, 2021 You may try to add : Opt('TrayIconDebug', True) To see where it gets stuck. Otherwise, put some log messages, till you find where is the problem. “They did not know it was impossible, so they did it” ― Mark Twain Spoiler Block all input without UAC Save/Retrieve Images to/from Text Monitor Management (VCP commands) Tool to search in text (au3) files Date Range Picker Virtual Desktop Manager Sudoku Game 2020 Overlapped Named Pipe IPC HotString 2.0 - Hot keys with string x64 Bitwise Operations Multi-keyboards HotKeySet Recursive Array Display Fast and simple WCD IPC Multiple Folders Selector Printer Manager GIF Animation (cached) Screen Scraping Multi-Threading Made Easy Link to comment Share on other sites More sharing options...
JockoDundee Posted May 19, 2021 Share Posted May 19, 2021 Is there some reason that the code hasn’t been posted? Code hard, but don’t hard code... Link to comment Share on other sites More sharing options...
Mattw11486 Posted May 20, 2021 Author Share Posted May 20, 2021 (edited) expandcollapse popup#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 May 21, 2021 by Mattw11486 Link to comment Share on other sites More sharing options...
Mattw11486 Posted May 27, 2021 Author Share Posted May 27, 2021 I was able to fix this by resetting the reg keys. Weird that that was the problem and that it worked on every other machine but mine. /shrug. Link to comment Share on other sites More sharing options...
JockoDundee Posted May 28, 2021 Share Posted May 28, 2021 How did you “reset” them? Where did the error messages come from? Code hard, but don’t hard code... Link to comment Share on other sites More sharing options...
Developers Jos Posted May 28, 2021 Developers Share Posted May 28, 2021 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: 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 comment Share on other sites More sharing options...
Mattw11486 Posted May 28, 2021 Author Share Posted May 28, 2021 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 comment Share on other sites More sharing options...
JockoDundee Posted May 28, 2021 Share Posted May 28, 2021 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 comment Share on other sites More sharing options...
Trong Posted May 28, 2021 Share Posted May 28, 2021 (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: expandcollapse popup#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 May 28, 2021 by VIP code Regards, Link to comment Share on other sites More sharing options...
Developers Jos Posted May 28, 2021 Developers Share Posted May 28, 2021 (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 May 28, 2021 by Jos Trong 1 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 comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now