Bert Posted March 14, 2006 Share Posted March 14, 2006 I have a script that I use for Unicenter 6.0. Works fine. When I do a test in Scite for errors, it says I have 28 errors. I can run it in Crimson editor, using the beta, with no errors. ?Example: autoit scrips\9.6beta12_4_05.au3(346,10) : ERROR: syntax error $msgAll of my other errors are undefined functions. Example:$keyA = HotKeySet($keySET, "_F6_Func")Currently, the script works, so if you want to look at the entire script, go here:http://www.autoitscript.com/forum/index.php?showtopic=22899 I just want to make sure I'm following things right here. I'm trying to use Scite for everything now, but I use Crimson for just this one script. (I can run this script while working in Scite on other stuff, and I keep tweaking the UNPlus script to test stuff) Thoughts? The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
Valuater Posted March 14, 2006 Share Posted March 14, 2006 i just ran Scite error checking on your posted full scripti did not get the errors you mentioned... only this>Running AU3Check...C:\Program Files\AutoIt3\SciTe\Defs\Unstable\Au3Check\au3check.datC:\Program Files\AutoIt3\Examples\My Stuff\testt_old1_old8_old4_old2.au3(89,10) : ERROR: syntax error_F5A_Func~~~~~~~~~^C:\Program Files\AutoIt3\Examples\My Stuff\testt_old1_old8_old4_old2.au3(141,10) : ERROR: syntax error_F1A_Func~~~~~~~~~^C:\Program Files\AutoIt3\Examples\My Stuff\testt_old1_old8_old4_old2.au3 - 2 error(s), 0 warning(s)>AU3Check Ended with Error(s).>Exit code: 0 Time: 0.873and that is a clear error8) Link to comment Share on other sites More sharing options...
Bert Posted March 14, 2006 Author Share Posted March 14, 2006 Whats funny is when I run it using the released version of Autoit, it shows no errors. Only the beta shows errors. hmmmm The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
Developers Jos Posted March 14, 2006 Developers Share Posted March 14, 2006 Whats funny is when I run it using the released version of Autoit, it shows no errors. Only the beta shows errors. hmmmmWhen you want more than a guess you will have to post the exact script you are running and the exact output in the SciTE output pane so I can see what you are running and what the exact errors are.. 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...
Bert Posted March 15, 2006 Author Share Posted March 15, 2006 The script: ;Unicenter UNPlus tool 2.0.02 script;written by Volly;XXXXXXXXXXX 2006;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&AutoItSetOption("WinTitleMatchMode", 2) ;any part of the string can be used in a window's nameAutoItSetOption("TrayIconDebug", 1) ;debug is onBreak(1);This fixes the icon in the systemtray. 1 is on, 0 is offglobal $msg = GUIGetMsg()global $help_R;system tray functions#NoTrayIcon#Include <Constants.au3>#Include <GUIConstants.au3>#include <Date.au3>$current = "12:00:00 AM"Opt("WinDetectHiddenText",1)Opt("TrayAutoPause",0)Opt("TrayMenuMode", 1)$optiontray = TrayCreateItem("Options")$abouttray = TrayCreateItem("About")$helptray = TrayCreateItem("Help")TrayCreateItem("")$exittray = TrayCreateItem("Exit UNPlus")TraySetState();checks to see if UNPlus.exe is running$g_szVersion = "UNPlus.exe"If WinExists($g_szVersion) Then Exit; It's already running;Startup splash screenAutoItWinSetTitle($g_szVersion)SplashTextOn("Unicenter UNPlus", "Unicenter Plus 2.0.02 for ServiceDesk 6.0.", 550, 40, -1, -1, 0, "", 18)Sleep(1500)SplashOff();Checks to see if Unicenter is loaded. If not;it will start UnicenterIF WinExists("Unicenter ServicePlus Service Desk", "http://usdp/CAisd/pdmweb.exe") == 0 thenrun( "C:\Program Files\Internet Explorer\IEXPLORE.EXE -new [url="http://usdp/CAisd/pdmweb.exe""]http://usdp/CAisd/pdmweb.exe"[/url], "")WinWaitActive("Unicenter ServicePlus Service Desk", "http://usdp/CAisd/pdmweb.exe", 20)endifIF WinExists ("Unicenter ServicePlus Service Desk", "http://usdp/CAisd/pdmweb.exe" )== 1 thenWinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )endifdim $keyAdim $keyB;-----------------------------------------------;These hotsetkeys will always be active. This is due to the nature of the function.$keySET = iniread("unplus.ini", "qkeys", "key", "{" & "F6" & "}")$keyA = HotKeySet($keySET, "_F6_Func");QuickPaste$keyB = HotKeySet("^!x", "_key1_Func");exit this script only - clrl + alt + x;------------------------------------------------;_toolbar();had error when trying to make func. Use this method for testing$tooltray = guicreate("UNPlus 2.0", 570, 50, 5, 75,"0x00000200" ) ;$WS_EX_TOOLWINDOW)$button1 = GUICtrlCreateButton("Help",1, 1, 35, 27)$button2 = GUICtrlCreateButton(" Search Request",36, 1, 50, 27, 0x0300 + 0x2000 + 0x0C00)$button3 = GUICtrlCreateButton(" Search Incident",87, 1, 50, 27, 0x0300 + 0x2000 + 0x0C00)$button4 = GUICtrlCreateButton("TreePaste",138, 1, 57, 27, 0x0300 + 0x2000 + 0x0C00)$button5 = GUICtrlCreateButton("Refresh List",196, 1, 50, 27, 0x0300 + 0x2000 + 0x0C00)$button6 = GUICtrlCreateButton("QuickPaste",247, 1, 67, 27, 0x0300 + 0x2000 + 0x0C00)$button7 = GUICtrlCreateButton("Resolution",315, 1, 67, 27, 0x0300 + 0x2000 + 0x0C00)$button8 = GUICtrlCreateButton("TimeStamp",383, 1, 67, 27, 0x0300 + 0x2000 + 0x0C00)$button9 = GUICtrlCreateButton(" Logout Unicenter",450, 1, 57, 27, 0x0300 + 0x2000 + 0x0C00)$button10 = GUICtrlCreateButton(" Hide Toolbar",508, 1, 57, 27, 0x0300 + 0x2000 + 0x0C00)GUISetState();end method noteWhile 1$msg = TrayGetMsg()$msg1 = GUIGetMsg()sleep(2);---------------;test on toolbarSelectCase $msg1 = $button1if WinActive("Request Detail - Unicenter ServicePlus Service Desk")then _win1_func()if WinActive("Incident Detail - Unicenter ServicePlus Service Desk")then _win2_func()if WinActive("Problem Detail - Unicenter ServicePlus Service Desk")then _win3_func()case $msg1 = $button5_F5A_Funcendselect;endtest;--------------SelectCase $msg = $optiontrayrun("UNOption.exe")Case $msg = $helptrayMsgbox(0, "Help", "On each window that UNPlus supports, you can " & _"press the F1 key for a list of supported keys to use." & @CRLF _&""& @CRLF _&"Supported windows are:"& @CRLF _&" Incident List and Request List." & @CRLF _&" Incident Detail, Request Detail and Problem Detail." & @CRLF _&" Incident Update, Request Update and Problem Update." & @CRLF _&" New Incident, New Request, and New Problem."& @CRLF _&""& @CRLF _&"Extra functions include: "& @CRLF _&" QuickPaste - A simple predefined clipboard tool to save keystrokes."& @CRLF _&" Note: QuickPaste is available for use regardless of what window is active."& @CRLF _&" You will quickly find many uses for QuickPaste in other applications."& @CRLF _&" TreePaste - To help in the selection of configuration items."& @CRLF _&" Refresh view on supported windows."& @CRLF _&" Search Request and Search Incident."& @CRLF _&" Resolution shortcut."& @CRLF _&" Time stamper for Unicenter and Service Request."& @CRLF _&" Logout shortcut."& @CRLF _&" Print key support is added for any Incident, Request, or Problem."& @CRLF _&" Extended print key support has been added for Service Request, Depot tickets and Outlook."& @CRLF _&""& @CRLF _&"Many of the options can be configured using the Options interface " & _"located on the system tray icon menu.")Case $msg = $exittrayexitCase $msg = $abouttrayMsgbox(64,"about:","UNPlus 2.0 For Unicenter ServiceDesk"& @CRLF _&""& @CRLF _&" 2006 Suntrust Bank")Endselectsleep(1)select;This section monitors if certain windows are open.;If they are, the hotkeysets for those windows are active.;<:::Keys for Request Detail::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/smile.png' class='bbc_emoticon' alt=':)' />case WinActive("Request Detail - Unicenter ServicePlus Service Desk")_win1_func()selectCase $msg1 = $button1_F1A_Funcendselectcontinueloop;<:::Keys for Incident Detail::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/mellow.png' class='bbc_emoticon' alt=':mellow:' />Case WinActive("Incident Detail - Unicenter ServicePlus Service Desk")_win2_func()continueloop;<:::Keys for Problem Detail::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/smile.png' class='bbc_emoticon' alt=':)' />Case WinActive("Problem Detail - Unicenter ServicePlus Service Desk")_win3_func()continueloop;<:::Keys for Update Incident::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/ohmy.png' class='bbc_emoticon' alt=':o' />Case WinActive("Update Incident - Unicenter ServicePlus Service Desk")_win4_func()continueloop;<:::Keys for New Incident::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("New Incident")_win4a_func()continueloop;<:::Keys for Update Request::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Update Request - Unicenter ServicePlus Service Desk")_win5_func()continueloop;<:::Keys for New Request::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("New Request")_win5a_func()continueloop;<:::Keys for Update Problem::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Update Problem - Unicenter ServicePlus Service Desk")_win6_func()continueloop;<:::Keys for Update Problem::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("New Problem")_win6a_func()continueloop; ;<:::Keys for Main Announcements Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Unicenter ServicePlus Service Desk - Announcements", "http://usdp/CAisd/pdmweb.exe")_win7A_func() ;DO NOT CHANGE THIS LINE!continueloop; ;<:::Keys for Main Request List Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Unicenter ServicePlus Service Desk - Request List", "http://usdp/CAisd/pdmweb.exe")_win7B_func() ;DO NOT CHANGE THIS LINE!continueloop; ;<:::Keys for Main Incident List Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Unicenter ServicePlus Service Desk - Incident List", "http://usdp/CAisd/pdmweb.exe")_win7C_func() ;DO NOT CHANGE THIS LINE!continueloop; ;<:::Keys for Main Incident Search Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Unicenter ServicePlus Service Desk - Incident Search", "http://usdp/CAisd/pdmweb.exe")_win7D_func() ;DO NOT CHANGE THIS LINE!continueloop; ;<:::Keys for Main Request Search Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Unicenter ServicePlus Service Desk - Request Search", "http://usdp/CAisd/pdmweb.exe")_win7E_func() ;DO NOT CHANGE THIS LINE!continueloop; ;<:::Keys for Service Request Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Service Request", "equest.nsf")_win8_func()continueloop; ;<:::Keys for Argis Web Change Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Master Page", "http://dcam.stsc.suntrust.com/PageSetup/master_page.asp")_win9_func()continueloop; ;<:::Keys for email - separate frame::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Message (HTML)", "Menu Bar")_win10_func()continueloop; ;<:::Keys for email - Outlook::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Inbox - Microsoft Outlook")_win11_func()continueloop; ;<:::Keys for Work Order Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Work Order: Ad Hoc")_win8a_func()continueloop; ;<:::Keys for Depot Order Window::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Depot Ordering System - Order #")_win8b_func()continueloop; ;<:::Keys for Create New Activity for::<img src='http://www.autoitscript.com/forum/public/style_emoticons/<#EMO_DIR#>/blush.png' class='bbc_emoticon' alt=':>' />Case WinActive("Create New Activity for")_win8c_func()continueloopcase _NowTime() = $currentexitEndSelectwend;Functions-------------------------------;table of contents;_win1_func(): Request Ticket keys;_win2_func(): Incident Ticket keys;_win3_func(): Problem Ticket keys;_win4_func(): Update Incident keys;_win5_func(): Update Request keys;_win6_func(): Update Problem keys;_win7_func(): Main Window keys;F1; F1A: Help in Request Ticket view; F1B: Help in Incident Ticket view; F1C: Help in Problem Ticket view; F1D: Help in Update Incident view; F1E: Help in Update Request view; F1F: Help in Update Problem view; F1G: Help in Main Window view;F2; F2: Search Request;F3; F3: Search Incident;F4; F4: TreePaste;F5; F5B: Refresh ticket view; F5B: Refresh Querry;F6; F6: QuickPaste; This function's key may be changed depending on UNPlus.ini;F8;F8: Resolution field;F9;F9A: Time Stamp;F10; F10: Log out Unicenter;-------------------------------------------Func _win1_func()HotKeySet("{F1}", "_F1A_Func");turns key on for helpHotKeySet("{F5}", "_F5A_Func");turns key on for refresh ticketHotKeySet("{PRINTSCREEN}", "_key2a_Func"); Print ticketDoSleep(10)Until Not WinActive("Request Detail - Unicenter ServicePlus Service Desk")_key_clean_1()EndFuncFunc _win2_func()HotKeySet("{F1}", "_F1B_Func");turns key on for helpHotKeySet("{F5}", "_F5A_Func");turns key on for refresh ticketHotKeySet("{PRINTSCREEN}", "_key2_Func"); Print ticketDoSleep(10)Until Not WinActive("Incident Detail - Unicenter ServicePlus Service Desk")_key_clean_1()EndFuncFunc _win3_func()HotKeySet("{F1}", "_F1C_Func");turns key on for helpHotKeySet("{F5}", "_F5A_Func");turns key on for refresh ticketHotKeySet("{PRINTSCREEN}", "_key2_Func"); Print ticketDoSleep(10)Until Not WinActive("Problem Detail - Unicenter ServicePlus Service Desk")_key_clean_1()EndFuncFunc _win4_func()HotKeySet("{F1}", "_F1D_Func");turns key on for helpHotKeySet("{F8}", "_F8_Func");turns key on for ResolutionHotKeySet("{F4}", "_F4_Func");turns key on for TreePasteHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("Update Incident - Unicenter ServicePlus Service Desk")_key_clean_1()EndFuncFunc _win4a_func()HotKeySet("{F1}", "_F1Da_Func");turns key on for helpHotKeySet("{F4}", "_F4_Func");turns key on for TreePasteHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("New Incident")_key_clean_1()EndFuncFunc _win5_func()HotKeySet("{F1}", "_F1E_Func");turns key on for helpHotKeySet("{F8}", "_F8_Func");turns key on for ResolutionHotKeySet("{F4}", "_F4_Func");turns key on for TreePasteHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("Update Request - Unicenter ServicePlus Service Desk")_key_clean_1()EndFuncFunc _win5a_func()HotKeySet("{F1}", "_F1Ea_Func");turns key on for helpHotKeySet("{F4}", "_F4_Func");turns key on for TreePasteHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("New Request")_key_clean_1()EndFuncFunc _win6_func()HotKeySet("{F1}", "_F1F_Func");turns key on for helpHotKeySet("{F8}", "_F8_Func");turns key on for ResolutionHotKeySet("{F4}", "_F4_Func");turns key on for TreePasteHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("Update Problem - Unicenter ServicePlus Service Desk")_key_clean_1()EndFuncFunc _win6a_func()HotKeySet("{F1}", "_F1Fa_Func");turns key on for helpHotKeySet("{F4}", "_F4_Func");turns key on for TreePasteHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("New Problem")_key_clean_1()EndFuncFunc _win7A_func()HotKeySet("{F1}", "_F1G_Func");turns key on for helpHotKeySet("{F2}", "_F2_Func");turns key on for Search RequestHotKeySet("{F3}", "_F3_Func");turns key on for Search IncidentHotKeySet("{F5}", "_F5B_Func");turns key on Refresh current querryHotKeySet("{F10}", "_F10_Func");turns key on for close UnicenterDoSleep(10)Until Not WinActive("Unicenter ServicePlus Service Desk - Announcements", "http://usdp/CAisd/pdmweb.exe")_key_clean_1()EndFuncFunc _win7B_func()HotKeySet("{F1}", "_F1G_Func");turns key on for helpHotKeySet("{F2}", "_F2_Func");turns key on for Search RequestHotKeySet("{F3}", "_F3_Func");turns key on for Search IncidentHotKeySet("{F5}", "_F5B_Func");turns key on Refresh current querryHotKeySet("{F10}", "_F10_Func");turns key on for close UnicenterDoSleep(10)Until Not WinActive("Unicenter ServicePlus Service Desk - Request List ", "http://usdp/CAisd/pdmweb.exe")_key_clean_1()EndFuncFunc _win7C_func()HotKeySet("{F1}", "_F1G_Func");turns key on for helpHotKeySet("{F2}", "_F2_Func");turns key on for Search RequestHotKeySet("{F3}", "_F3_Func");turns key on for Search IncidentHotKeySet("{F5}", "_F5B_Func");turns key on Refresh current querryHotKeySet("{F10}", "_F10_Func");turns key on for close UnicenterDoSleep(10)Until Not WinActive("Unicenter ServicePlus Service Desk - Incident List", "http://usdp/CAisd/pdmweb.exe")_key_clean_1()EndFuncFunc _win7D_func()HotKeySet("{F1}", "_F1G_Func");turns key on for helpHotKeySet("{F2}", "_F2_Func");turns key on for Search RequestHotKeySet("{F3}", "_F3_Func");turns key on for Search IncidentHotKeySet("{F5}", "_F5B_Func");turns key on Refresh current querryHotKeySet("{F10}", "_F10_Func");turns key on for close UnicenterDoSleep(10)Until Not WinActive("Unicenter ServicePlus Service Desk - Incident Search", "http://usdp/CAisd/pdmweb.exe")_key_clean_1()EndFuncFunc _win7E_func()HotKeySet("{F1}", "_F1G_Func");turns key on for helpHotKeySet("{F2}", "_F2_Func");turns key on for Search RequestHotKeySet("{F3}", "_F3_Func");turns key on for Search RequestHotKeySet("{F5}", "_F5B_Func");turns key on Refresh current querryHotKeySet("{F10}", "_F10_Func");turns key on for close UnicenterDoSleep(10)Until Not WinActive("Unicenter ServicePlus Service Desk - Request Search", "http://usdp/CAisd/pdmweb.exe")_key_clean_1()EndFuncFunc _win8_func()HotKeySet("{PRINTSCREEN}", "_key3_Func"); Print Service RequestHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("Service Request", "equest.nsf")_key_clean_1()EndFuncFunc _win8a_func()HotKeySet("{PRINTSCREEN}", "_key3_Func"); Print Work OrderHotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("Work Order: Ad Hoc")_key_clean_1()EndFuncFunc _win8b_func()HotKeySet("{PRINTSCREEN}", "_key3_Func"); Print Depot orderDoSleep(10)Until Not WinActive("Depot Ordering System - Order #")_key_clean_1()EndFuncFunc _win8c_func()HotKeySet("{F9}", "_F9A_Func");Turns on key for TimeStampDoSleep(10)Until Not WinActive("Create New Activity for")_key_clean_1()EndFuncFunc _win9_func()HotKeySet("{PRINTSCREEN}", "_key4a_Func"); Print ArgusDoSleep(10)Until Not WinActive("Master Page", "http://dcam.stsc.suntrust.com/PageSetup/master_page.asp")_key_clean_1()EndFuncFunc _win10_func()HotKeySet("{PRINTSCREEN}", "_key4_Func"); Print EmailDoSleep(10)Until Not WinActive("Message (HTML)", "Menu Bar")_key_clean_1()EndFuncFunc _win11_func()HotKeySet("{PRINTSCREEN}", "_key5_Func"); Print EmailDoSleep(10)Until Not WinActive("Inbox - Microsoft Outlook")_key_clean_1()EndFunc;F1 section - HelpFunc _F1A_Func();Help in Request Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Request Ticket view", 445, 150,-1, -1, $WS_DLGFRAME)GUISetBkColor (0xE0FFFF)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F5= Refresh: This will refresh the current view." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 2$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1A_FuncFunc _F1B_Func();Help in Incident Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Incident Ticket view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xE0FFFF)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F5= Refresh: This will refresh the current view." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 3local $msg$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1B_FuncFunc _F1C_Func();Help in Problem Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Problem Ticket view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xE0FFFF)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F5= Refresh: This will refresh the current view." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20, "", $WS_DLGFRAME); Run the GUI until it is closedGUISetState()While 4$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1C_FuncFunc _F1D_Func();Help in Incident Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Update Incident view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xE0FFFF)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F3= Resolution: This will change the view to the resolution field in edit mode." & @CRLF _& "F4= TreePaste: This will open a GUI with a tree menu to allow the user to select the Configuration item desired." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 5$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1D_FuncFunc _F1Da_Func();Help in Incident Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in New Incident view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xE0FFFF)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F4= TreePaste: This will open a GUI with a tree menu to allow the user to select the Configuration item desired." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 6$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1D_FuncFunc _F1E_Func();Help in Request Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Update Request view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xCCFFCC)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F3= Resolution: This will change the view to the resolution field in edit mode." & @CRLF _& "F4= TreePaste: This will open a GUI with a tree menu to allow the user to select the Configuration item desired." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 7$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1E_FuncFunc _F1Ea_Func();Help in Request Ticket viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in New Request view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xCCFFCC)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F4= TreePaste: This will open a GUI with a tree menu to allow the user to select the Configuration item desired." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 8$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1E_FuncFunc _F1F_Func();Help in Update Problem viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Update Problem view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xCCFFCC)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F3= Resolution: This will change the view to the resolution field in edit mode." & @CRLF _& "F4= TreePaste: This will open a GUI with a tree menu to allow the user to select the Configuration item desired." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 9$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1F_FuncFunc _F1Fa_Func();Help in Update Problem viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WInExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in New Problem view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xCCFFCC)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F4= TreePaste: This will open a GUI with a tree menu to allow the user to select the Configuration item desired." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "CTRL + ALT + X: Closes UNPlus, but leaves Unicenter ServiceDesk open" & @CRLF _& "Print Scrn= Print Ticket: This will print your ticket to your default printer.", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 1$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1F_FuncFunc _F1G_Func();Help in main window viewIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WinExists("Help in") thensleep(10)else$fkeyV = iniread("unplus.ini", "Qkeys", "msg", "")$help_R = GUICreate("Help in Main Window view", 445, 150, -1, -1, $WS_DLGFRAME)GUISetBkColor (0xFFC1C1)GUICtrlCreateLabel ("F1= Opens a help file showing the functions." & @CRLF _& "F2= Search Request: This will search for Request tickets in a predefined bucket." & @CRLF _& "F3= Search Incident: This will search for Incidents tickets in a predefined bucket." & @CRLF _& "F5= Refresh: This will refresh the current list of tickets that are listed." & @CRLF _& "" & $fkeyV & "= Quick Paste: This will paste pre-determined text of your choice to fields." & @CRLF _& "F10= Logout: This will log you out of Unicenter", 5, 5, 440, 95)$button1 = GUICtrlCreateButton("OK", 185, 102, 60, 20); Run the GUI until it is closedGUISetState()While 8$msg = GUIGetMsg()SelectCase $msg = $button1GuiDelete($help_R)exitloopEndSelectWEndEndIfEndFunc ;==>_F1G_Func;---------------------------------;F2 Section: Search RequestFunc _F2_Func(); Search Request$INIre = INIread ("unplus.ini", "request", "speed", "")If WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif $INIre == "normal" thenBlockInput(1)send("!e")sleep(5)send("!r");BlockInput(0)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )WinWaitActive( "Unicenter ServicePlus Service Desk" , "Opening", 1)sleep(200)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )WinWaitActive( "Unicenter ServicePlus Service Desk" , "Done", 1 )sleep(500)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" );BlockInput(1)send("{TAB}")sleep(5)send("{TAB}")sleep(5)send("{TAB}")$search1 = iniread("unplus.ini", "request", "search", "")sleep(5)Send($search1)sleep(5)send("!s")BlockInput(0)ElseBlockInput(1)send("!e")sleep(250)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("!r")sleep(3500)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("{TAB}")sleep(200)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("{TAB}")sleep(50)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("{TAB}")sleep(50)fileopen ("search.ini", 0)$note1 = FileReadLine ("search.ini")WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )Send($note1)send("!s")Blockinput(0)EndIfEndFunc ;==>_F2_Func;----------------------------------;F3 Section; F3: Search IncidentFunc _F3_Func(); Search Incident$INIin = INIread ("unplus.ini", "incident", "speed", "")If WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif $INIin == "normal" thenBlockInput(1)send("!e")sleep(3)send("!i")WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )BlockInput(1)WinWaitActive( "Unicenter ServicePlus Service Desk" , "Opening", 1 )sleep(10)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )WInWaitActive( "Unicenter ServicePlus Service Desk" , "Done", 1 )sleep(10)WInWaitActive ( "Unicenter ServicePlus Service Desk - Incident Search" , "http://usdp/CAisd/pdmweb.exe", 5 )WinActivate ( "Unicenter ServicePlus Service Desk - Incident Search" , "http://usdp/CAisd/pdmweb.exe" )sleep(10)send("{TAB}")sleep(7)send("{TAB}")$search1 = iniread("unplus.ini", "incident", "search", "")WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )sleep(7)Send($search1)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )sleep(5)send("!s")BlockInput(0)ElseBlockinput(1)send("!e")sleep(300)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("!i")sleep(3000)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("{TAB}")WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )sleep(20)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("{TAB}")WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )sleep(20)fileopen ("search.ini", 0)$note1 = FileReadLine ("search.ini")Send($note1)WinActivate ( "Unicenter ServicePlus Service Desk" , "http://usdp/CAisd/pdmweb.exe" )send("!s")Blockinput(0)EndIfEndFunc ;==>_F3_Func;--------------------------;F4 SectionFunc _F4_Func(); TreePasteIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")ElseBlockInput(1)Send("^a")Sleep(50)Send("{DEL}")Sleep(50)BlockInput(0)RunWait("treepaste.exe", "")BlockInput(1)Sleep(500)Send("^v")BlockInput(0)EndIfEndFunc ;==>_F4_Func;-----------------------------;F5 Section; F5A: Refresh TIcket; F5B: Refresh ListFunc _F5A_Func(); Refresh TicketIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")ElseBlockInput(1)Send("!v")Sleep(5)Send("f")BlockInput(0)EndIfEndFunc ;==>_F5A_FuncFunc _F5B_Func(); Refresh QuerryIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")ElseBlockInput(1)Send("!v")Sleep(5)Send("!e")BlockInput(0)EndIfEndFunc ;==>_F5B_Func;----------------------------;F6 SectionFunc _F6_Func(); QuickPasteRunWait("quickpaste2_0.exe", "")EndFunc ;==>key6;----------------------------;F8 SectionFunc _F8_Func(); Resolution fieldIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")ElseSend("!4")Send("!9")EndIfEndFunc ;==>_F8_Func;F9 SectionFunc _F9A_Func(); TimeStamp$sLongDayName = _DateDayOfWeek( @WDAY )$stamp = _NowTime()$stamp2 = _NowDate()send(@UserName& ": " &$sLongDayName & " " & $Stamp2 & ", " & $stamp & ": ");EndIfEndFunc ;==>key6;---------------------------;F10 SectionFunc _F10_Func(); Close UnicenterIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")ElseBlockInput(1)Send("!u")Send("!e")BlockInput(0)ExitEndIfEndFunc ;==>_F9_Func;----------------------------Func _key1_Func(); Closes UNPlusIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")ElseExitEndIfEndFunc ;==>_key1_FuncFunc _key2_Func(); Print ticketsIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WinExists ("CAisd report - indtl.rpt") thenWinActivate("CAisd report - indtl.rpt")Send("!p")WInWaitActive("Print", "General", 15)Send("!p")elseWinexists("Incident Detail - Unicenter ServicePlus Service Desk")WinActive("Incident Detail - Unicenter ServicePlus Service Desk")Send("!r")sleep(30)Send("d")sleep(1000)WinActivate("CAisd report - indtl.rpt")WinWaitActive("CAisd report - indtl.rpt", "Opening", 9)sleep(1000)WinWaitActive("CAisd report - indtl.rpt", "Opening", 7)sleep(1000)WinActivate("CAisd report - indtl.rpt")if winexists("CAisd report - indtl.rpt", "Incident")then msgbox(0,"","")sleep(3)Send("!p")WinWaitActive("Print", "General", 5)Send("!p")EndIfEndFunc ;==>_key2_FuncFunc _key2a_Func(); Print ticketsIf WinExists("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.") ThenWinActivate("Microsoft Internet Explorer", "[239] Sorry, your session has timed out.")Elseif WinExists ("CAisd report - indtl.rpt") thenWinActivate("CAisd report - indtl.rpt")Send("!p")WInWaitActive("Print", "General", 15)Send("!p")elseWinexists("Request Detail - Unicenter ServicePlus Service Desk")WinActive("Request Detail - Unicenter ServicePlus Service Desk")Send("!p")sleep(30)Send("d")sleep(1000)WinActivate("CAisd report - indtl.rpt")WinWaitActive("CAisd report - indtl.rpt", "Opening", 9)sleep(1000)WinWaitActive("CAisd report - indtl.rpt", "Opening", 7)sleep(1000)WinActivate("CAisd report - indtl.rpt")if winexists("CAisd report - indtl.rpt", "Incident")then msgbox(0,"","")sleep(3)Send("!p")WinWaitActive("Print", "General", 5)Send("!p")EndIfEndFunc ;==>_key2a_FuncFunc _key3_Func(); Print Service requestWinActivate("Service Request", "equest.nsf")Send("^p")sleep(100)WinWait("Print", "", 7)sleep(100)WinActivate("Print")sleep(150)Send("!p")EndFunc ;==>_key3_FuncFunc _key3a_Func(); Print Service requestWinActivate("Depot Ordering System - Order #")Send("^p")sleep(100)WinWait("Print","", 7)sleep(100)WinActivate("Print")sleep(150)Send("!p")EndFunc ;==>_key3_FuncFunc _key4_Func(); Print emailWinActivate("Message (HTML)", "Menu Bar")Send("!f")sleep(100)Send("p")WinWait("Print","", 7)sleep(100)WinActivate("Print")sleep(200)Send("!p")EndFunc ;==>_key4_FuncFunc _key4a_Func(); Print ArgisWinActivate("Master Page", "http://dcam.stsc.suntrust.com/PageSetup/master_page.asp")Send("^p")sleep(100)WinWait("Print","", 7)sleep(100)WinActivate("Print")sleep(150)Send("!p")EndFunc ;==>_key4_FuncFunc _key5_Func(); Print emailWinActivate("Inbox - Microsoft Outlook")Send("^p")sleep(100)WinWait("Print", "",15)sleep(50)WinActivate("Print")sleep(50)Send("{ENTER}")EndFunc ;==>_key4_FuncFunc _key_clean_1() ;Releases hotsetkeysHotKeySet("{F1}"); turns help offHotKeySet("{F2}"); turns Request offHotKeySet("{F3}"); turns Incident offHotKeySet("{F4}"); turns TreePaste offHotKeySet("{F5}"); turns refresh offHotKeySet("{F8}"); turns Resolution offHotKeySet("{F9}"); turns TimeStamp offHotKeySet("{PRINTSCREEN}"); Turns Print ticket offEndFunc ;==>_key_clean_1;===============================================;concept for tool window. This will put a tool window in the top left corner to allow;for mouse clicks to run scripts. This toolbar will only work for Unicenter, not; for other supported windows that have print support.Func _toolbar()$tooltray = guicreate("UNPlus 2.0", 570, 50, 5, 75, "", 0x00000008 + $WS_EX_TOOLWINDOW)$button1 = GUICtrlCreateButton("Help",1, 1, 35, 27)$button2 = GUICtrlCreateButton(" Search Request",36, 1, 50, 27, 0x0300 + 0x2000 + 0x0C00)$button3 = GUICtrlCreateButton(" Search Incident",87, 1, 50, 27, 0x0300 + 0x2000 + 0x0C00)$button4 = GUICtrlCreateButton("TreePaste",138, 1, 57, 27, 0x0300 + 0x2000 + 0x0C00)$button5 = GUICtrlCreateButton("Refresh List",196, 1, 50, 27, 0x0300 + 0x2000 + 0x0C00)$button6 = GUICtrlCreateButton("QuickPaste",247, 1, 67, 27, 0x0300 + 0x2000 + 0x0C00)$button7 = GUICtrlCreateButton("Resolution",315, 1, 67, 27, 0x0300 + 0x2000 + 0x0C00)$button8 = GUICtrlCreateButton("TimeStamp",383, 1, 67, 27, 0x0300 + 0x2000 + 0x0C00)$button9 = GUICtrlCreateButton(" Logout Unicenter",450, 1, 57, 27, 0x0300 + 0x2000 + 0x0C00)$button10 = GUICtrlCreateButton(" Hide Toolbar",508, 1, 57, 27, 0x0300 + 0x2000 + 0x0C00)GUISetState()endfunc;================================Now this is really odd. I'm testing the script from home, and I get 2 errors. I test it at work, and get 28. I fixed the errors being reported from home, and it now checks out. Have to see what breaks when I try it from work.Most of the errors I get at work are variables are not declaired. I will post my error messages tomorrow when I'm in the office. The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
MHz Posted March 15, 2006 Share Posted March 15, 2006 I get 2 errors, and both are the same with syntax. Missing () ? case $msg1 = $button5 _F5A_Func endselect Link to comment Share on other sites More sharing options...
Bert Posted March 15, 2006 Author Share Posted March 15, 2006 I fixed the 2 errors, and here is the AU3CHeck from my work PC. It now shows 30 errors! CODE>C:\Program Files\AutoIt3\SciTE\CompileAU3\CompileAU3.exe /beta /AU3Check /in "C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3" >Running AU3Check...C:\Program Files\AutoIt3\SciTE\Defs\Unstable\Au3Check\au3check.dat C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(319,10) : ERROR: syntax error $msg ~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(70,38) : ERROR: _F6_Func(): undefined function. $keyA = HotKeySet($keySET, "_F6_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(71,38) : ERROR: _key1_Func(): undefined function. $keyB = HotKeySet("^!x", "_key1_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(134,16) : ERROR: _win3_func(): undefined function. _win3_func() ~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(139,16) : ERROR: _win4_func(): undefined function. _win4_func() ~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(144,17) : ERROR: _win4a_func(): undefined function. _win4a_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(149,16) : ERROR: _win5_func(): undefined function. _win5_func() ~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(154,17) : ERROR: _win5a_func(): undefined function. _win5a_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(159,16) : ERROR: _win6_func(): undefined function. _win6_func() ~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(164,17) : ERROR: _win6a_func(): undefined function. _win6a_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(169,17) : ERROR: _win7A_func(): undefined function. _win7A_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(174,17) : ERROR: _win7B_func(): undefined function. _win7B_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(179,17) : ERROR: _win7C_func(): undefined function. _win7C_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(184,17) : ERROR: _win7D_func(): undefined function. _win7D_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(189,17) : ERROR: _win7E_func(): undefined function. _win7E_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(194,16) : ERROR: _win8_func(): undefined function. _win8_func() ~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(199,16) : ERROR: _win9_func(): undefined function. _win9_func() ~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(204,17) : ERROR: _win10_func(): undefined function. _win10_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(209,17) : ERROR: _win11_func(): undefined function. _win11_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(214,17) : ERROR: _win8a_func(): undefined function. _win8a_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(219,17) : ERROR: _win8b_func(): undefined function. _win8b_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(224,17) : ERROR: _win8c_func(): undefined function. _win8c_func() ~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(283,36) : ERROR: _F1A_Func(): undefined function. HotKeySet("{F1}", "_F1A_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(284,36) : ERROR: _F5A_Func(): undefined function. HotKeySet("{F5}", "_F5A_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(285,47) : ERROR: _key2a_Func(): undefined function. HotKeySet("{PRINTSCREEN}", "_key2a_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(289,54) : ERROR: SpecialEvents(): undefined function. GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(294,29) : ERROR: _ToolbarDocked(): undefined function. _ToolbarDocked() ~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(298,20) : ERROR: _key_clean_1(): undefined function. _key_clean_1() ~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(308,36) : ERROR: _F1B_Func(): undefined function. HotKeySet("{F1}", "_F1B_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3(310,46) : ERROR: _key2_Func(): undefined function. HotKeySet("{PRINTSCREEN}", "_key2_Func") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\a4mh3\Desktop\autoit scrips\9.6beta12_4_05.au3 - 30 error(s), 0 warning(s) >AU3Check Ended with Error(s). >Exit code: 0 Time: 1.149 The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
MHz Posted March 15, 2006 Share Posted March 15, 2006 On the 2nd line of output, I can see that you are still running an older version of Scite4AutoIt3. Please update to Scite4AutoIt3 03.14.06 and try your SyntaxCheck again. Link to comment Share on other sites More sharing options...
Bert Posted March 15, 2006 Author Share Posted March 15, 2006 I think I figured out the problem. I'm working with a idea of adding a toolbar. I had Opt('MustDeclareVars', 1) in my work code to make the toolbar work. I took the toolbar stuff out for I couldn't get it to work the way I wanted, and all the errors went away. my bad I will take my beating like a man now....... The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
Bert Posted March 15, 2006 Author Share Posted March 15, 2006 Has anyone made a updater tool for Scite? The Vollatran project My blog: http://www.vollysinterestingshit.com/ 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