BattleOfMoonShae

Thanks Bert. I missed GUICtrlListAddItem in the help file. To your question. I am toying with an idea to to bring up engineering detail/specs for aircraft faster and easier. We build turbofan engines for Corporate Jets.

I was wondering if anyone can teach me how to make data entered to the GUICtrlCreateInput add to the GUICtrlCreateList. #include <GuiConstants.au3> GUICreate("AIRCRAFT", 263, 875, 193, 115);, $WS_EX_ACCEPTFILES, (@DesktopWidth - 231) / 2, (@DesktopHeight - 903) / 2, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $List_1 = GUICtrlCreateList("Adam A700", 8, 8, 201, 825) GUICtrlSetData(-1, "Aerospace Industrial G100|Aerostar FJ100|Atkinson AJ2|BAE Jetstream 41|Beechcraft B200 King Air|Beechcraft Beechjet 400A|Boeing BBJ|Bombardier Challenger 300|Bombardier Lear 35|Bombardier Lear 45|Bombardier Learjet 60|Cessna Citation II 550|Cessna Citation Mustang|Cessna Citation X|Dassault Falcon|Eaglesoft Premier 1|Eclipse 500|Embraer 170|Falcon Twin Jet Executive Concept|Gulfstream 5|Gulfstream G100|Gulfstream IV|Hawker 400XP|Hawker 800XP|Hawker Siddeley HS125-700|Jetstar II|LearFan 2100|Lockheed Jetstar II|Maverick Personal|Rockwell Sabreliner T-39|SabreLiner FDE|Stratojet Excalibur|Vinair Falcon 900") $Button_2 = GUICtrlCreateButton("OK", 216, 16, 33, 809, 0) $Input1 = GUICtrlCreateInput("", 8, 848, 201, 21) GUICtrlSetState(-1,$GUI_DROPACCEPTED) $Button2 = GUICtrlCreateButton("ADD", 216, 848, 33, 17, 0) GUICtrlSetState($Button_2, $GUI_DEFBUTTON) ;GUICtrlSetState(-1,$GUI_FOCUS) GUISetState(@SW_SHOW) $msg = 0 While $msg <> $GUI_EVENT_CLOSE $msg = GUIGetMsg() Select Case $msg = $Button_2 ExitLoop EndSelect WEnd

Writing a script to calculate bank totals for the day but with the section of script I have pasted below I can not get it to calculate correctly because the mainframe incorps comma's (ie 00,000.00). If I manually remove the comma's from the text file it works perfectly. Can anyone help or give an idea with removing the comma's from the stringstrip. Thanks in advance for taking the time. FileWriteLine('file7.txt', ClipGet()) Sleep(250) $line = FileReadLine('file7.txt', 12) $Dollar1 = StringMid($line, 71, 88) FileWriteLine('file7.txt', ClipGet()) Sleep(250) $line = FileReadLine('file7.txt', 13) $Dollar2 = StringMid($line, 71, 88) FileWriteLine('file7.txt', ClipGet()) Sleep(250) $line = FileReadLine('file7.txt', 14) $Dollar3 = StringMid($line, 71, 88) FileWriteLine('file7.txt', ClipGet()) Sleep(250) $line = FileReadLine('file7.txt', 15) $Dollar4 = StringMid($line, 71, 88) FileWriteLine('file7.txt', ClipGet()) Sleep(250) $line = FileReadLine('file7.txt', 16) $Dollar5 = StringMid($line, 71, 88) FileWriteLine('file7.txt', ClipGet()) Sleep(250) $line = FileReadLine('file7.txt', 17) $Dollar6 = StringMid($line, 71, 88) $Total = Number ($Dollar1+$Dollar2+$Dollar3+$Dollar4+$Dollar5+$Dollar6)

Does anyone have a answer as to why a autoit compiled .exe when clicked on itself will execute immediately but when placed on the desktop as a short cut with a ctrl alt whatever key assigned and is activated with the key sequence it takes ten to fifteen seconds to respond to the command. I have tried several autoit compiled .exe’s on several different machines with all having the same problem. ( All were compiled using scite ) Thank in advance for your time.

& <---- Thats what I was missing. Thanks Ejoc. It never fails to amaze me how the simplist of answers blow right by ya because you are to busy looking for the hardest of answers. @CyberSlug Your Autobuilder is fine work. Thanks, once again for your help.

I am toying with the example GUICreateList from the help file and have modified it to use a group with a input box. I want to use the input box to add to the list but I can not figure out how to get the line break to work on the GUICtrlSetData($mylist, GUICtrlRead($Input_2)). ( pipe | ) I have a script on the server already using the create list but I want the tellers to be able to add new names to the list. I am a learning but I am stumped. #include <GUIConstants.au3> GLOBAL $MESSAGE = "The following buttons have been clicked" GUICreate("My GUI list"); will create a dialog box that when displayed is centered $add=GUICtrlCreateButton ("Add", 64,32,75,25) $clear=GUICtrlCreateButton ("Clear", 64,72,75,25) $mylist=GUICtrlCreateList ("buttons that have been clicked", 176,32,121,97) GUICtrlSetLimit(-1,200); to limit horizontal scrolling GUICtrlSetData(-1,$MESSAGE) $close=GUICtrlCreateButton ("my closing button", 64,160,175,25) $group_1 = GUICtrlCreateGroup ("Group 1", 30, 210, 165, 70) GUIStartGroup() $Input_2 = GuiCtrlCreateInput("", 32, 240, 161, 20) GUISetState () $msg = 0 While $msg <> $GUI_EVENT_CLOSE $msg = GUIGetMsg() Select case $msg = $add ;~ GUICtrlSetData($mylist,"You clicked button No1|") *original* GUICtrlSetData($mylist, GUICtrlRead($Input_2)) ;~ GUICtrlSetData($mylist, GUICtrlRead($Input_2),"|") ;~ GUICtrlSetData($mylist, "|") case $msg = $clear GUICtrlSetData($mylist,"") Case $msg = $close MsgBox(0,"", "the closing button has been clicked",2) Exit EndSelect Wend

Thanks guys. That is exactly what I was looking for. A golden Autoit OSCAR awarded to both of you.

I tried that code already and it gives me the same date 00/00/0000 as the style 12 does. I need 00/00/00

Could anyone tell me what the style number would be for the GUICtrlCreateDate that would show the date in a 00/00/00 instead of 00/00/0000 and still show the calander. I went through the default -1 to 50 with no luck. Our main frame only excepts a six digit date. Thanks in advance for your time. #include <GUIConstants.au3> GUICreate("DUNNING INFORMATION", 320, 155, @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, -1, 0x00000018) WinSetState("DUNNING INFORMATION -", "", @SW_SHOW) $Action=GUICtrlCreateDate ("", 10, 5, 300, 20, 12 ) ; $Action = GUICtrlCreateInput("Enter The Action Date", 10, 5, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $Dun = GUICtrlCreateInput("Enter The Dun Number", 10, 35, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $Dollar = GUICtrlCreateInput("Enter the Dollar Amount PD", 10, 65, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $Add = GUICtrlCreateInput("Add Extra Comment - 60 Characters Max", 10, 95, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $btn = GUICtrlCreateButton("PROCEED", 135, 125, 60, 20) GuiCtrlSetState($btn, $GUI_DEFBUTTON) ;GUICtrlSetState(-1,$GUI_FOCUS) ; the focus is on this button GUISetState() $msg = 0 While $msg <> $GUI_EVENT_CLOSE $msg = GUIGetMsg() Select Case $msg = $btn ExitLoop EndSelect WEnd

Yes, GUIDelete() is the next step in the script after the GUICtrlReads from the GUICtrlCreateInputs are placed in the mainframe fields. Next is at the end of the script Next ProgressSet(100, "Complete", "Next Process Input") Sleep(10) ProgressOff() Edit: Downloaded Scite from this site. It found the error of my ways. Most excellent program. My congrads to the developers.

Can anyone tell me why? When the script is first executed the guicreate executes then when it goes for the the second, third and so on through the progresson the guicreate fails to execute. Opt ("WinWaitDelay", 100) Opt ("WinTitleMatchMode", 1) Opt ("WinDetectHiddenText", 1) Opt ("MouseCoordMode", 0) Opt ("SendKeyDelay", 0) HotKeySet( "{ESC}", "MyExit") #include <GUIConstants.au3> ;Verify window is open and ready Opt ("WinTitleMatchMode", 2) WinWait("Microsoft Word", "") If Not WinActive("Microsoft Word", "") Then WinActivate("Microsoft Word", "") WinWaitActive("Microsoft Word", "") ;Verify window is open and ready Opt ("WinTitleMatchMode", 1) WinWait("MVS - RUMBA Mainframe Display") If Not WinActive("MVS - RUMBA Mainframe Display") Then WinActivate("MVS - RUMBA Mainframe Display") WinWaitActive("MVS - RUMBA Mainframe Display") ProgressOn("Progress Meter", "Increments every pass", 1030, 64, "0 percent") For $i = 1 To 100 Step 1 Sleep(10) ProgressSet($i, $i & " percent") GUICreate("DUNNING INFORMATION", 320, 155, @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, -1, 0x00000018); WS_EX_ACCEPTFILES WinSetState("DUNNING INFORMATION -", "", @SW_SHOW) $Action = GUICtrlCreateInput("Enter The Action Date", 10, 5, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $Dun = GUICtrlCreateInput("Enter The Dun Number", 10, 35, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $Dollar = GUICtrlCreateInput("Enter the Dollar Amount PD", 10, 65, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $Add = GUICtrlCreateInput("Add Extra Comment - 60 Characters Max", 10, 95, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES) $btn = GUICtrlCreateButton("PROCEED", 135, 125, 60, 20) ;GUICtrlSetState(-1,$GUI_FOCUS); the focus is on this button GUISetState() $msg = 0 While $msg <> $GUI_EVENT_CLOSE $msg = GUIGetMsg() Select Case $msg = $btn ExitLoop EndSelect WEnd blah, blah, blah If you need the whole script I will post it.

Is there a way to make the below step change from current system date to next day after, lets say 2:30 pm. $Process = GUICtrlCreateInput(_DateTimeFormat( _NowCalc(),2), 10, 95, 300, 20) GUICtrlSetState(-1, $GUI_ACCEPTFILES)

Thanks for the help. Got it figured out now. Greatly appreciate the help.

Could someone tell me how I did the msgbox wrong? When the cancel button is selected the script fails to exit and close out. ($__msgbox = 2) AutoItSetOption("WinTitleMatchMode", 4) AutoItSetOption("SendKeyDelay", 1) AutoItSetOption("WinWaitDelay", 100) HotKeySet("{ESC}", "Terminate") ; press pause key to exit script ProgressOn("Progress Meter", "Increments every percent", "0 percent", 600, 860) For $i = 10 To 100 Step 10 Sleep(50) ProgressSet($i, $i & " percent") WinWait('File List - Microsoft Internet Explorer') If Not WinActive('File List - Microsoft Internet Explorer', '') Then WinActivate('File List - Microsoft Internet Explorer') EndIf WinWaitActive('File List - Microsoft Internet Explorer') $Filename = InputBox("Question", "What is the file name you seek?", "Aircraft Name", "", _ -1, -1, 0, 0) WinWait('Quattro Pro 12') If Not WinActive('Quattro Pro 12', '') Then WinActivate('Quattro Pro 12') EndIf WinWaitActive('Quattro Pro 12') Send('{ALTDOWN}e{ALTUP}') Sleep(1) Send('f') Sleep(1) Send($Filename) Sleep(1) Do; Retry Send('{ALTDOWN}n{ALTUP}') Sleep(1) $__msgbox = MsgBox(3, 'FILE SELECTION', 'IS THIS THE FILE NAME YOU REQUIRE?') Until NOT ($__msgbox = 7) If NOT ($__msgbox = 2) Then If NOT ($__msgbox = 6) Then EndIf;; Close Exit EndIf;;;; Success Send('{ALTDOWN}c{ALTUP}') Sleep(1) Send('{ALTDOWN}e{ALTUP}') Sleep(1) Send('c') WinWait('File List - Microsoft Internet Explorer') If Not WinActive('File List - Microsoft Internet Explorer', '') Then WinActivate('File List - Microsoft Internet Explorer') EndIf WinWaitActive('File List - Microsoft Internet Explorer') Send('{ENTER}') WinWait('Copyright Notice - Microsoft Internet Explorer') If Not WinActive('Copyright Notice - Microsoft Internet Explorer', '') Then WinActivate('Copyright Notice - Microsoft Internet Explorer') EndIf WinWaitActive('Copyright Notice - Microsoft Internet Explorer') Send('{SHIFTDOWN}{TAB}{TAB}{TAB}{SHIFTUP}') Sleep(1) Send('{ENTER}') WinWait('Add new download') If Not WinActive('Add new download', '') Then WinActivate('Add new download') EndIf WinWaitActive('Add new download') Send('{TAB}{TAB}{TAB}{TAB}{TAB}') Sleep(1) Send('{CTRLDOWN}v{CTRLUP}') Sleep(1) Send('{ENTER}') WinWait('Copyright Notice - Microsoft Internet Explorer') If Not WinActive('Copyright Notice - Microsoft Internet Explorer', '') Then WinActivate('Copyright Notice - Microsoft Internet Explorer') EndIf WinWaitActive('Copyright Notice - Microsoft Internet Explorer') Send('{ALTDOWN}v{ALTUP}') Sleep(1) Send('o') Sleep(1) Send('b') WinWait('File List - Microsoft Internet Explorer') If Not WinActive('File List - Microsoft Internet Explorer', '') Then WinActivate('File List - Microsoft Internet Explorer') EndIf WinWaitActive('File List - Microsoft Internet Explorer') Send('{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}') Send("{SHIFTDOWN}{TAB}{TAB}{TAB}{SHIFTUP}") ;EndIf;; Close ;Exit Next ProgressSet(100, "Done", "Complete") Sleep(50) ProgressOff() Exit Func Terminate() Exit 0 EndFunc ;==>Terminate

Thanks Cyberslug I will try the work around when I get back on the job tomorrow. I did notice that when I typed the post I did make a error $Cust_ID = StringMid($line, 16, 9) - the script at work is $Cust_ID = StringMid($line, 16, 8) I have tried moving or shorting the char. count. Same problem with the space between the Busn and the Cust # everytime.