10 replies to this topic

[surfbum3000]

The following code works as far as reading the .csv file, parsing, and sending the data to the data entry screen. What I need is for the loop to pause when the cursor reaches the Save button, send mouseclick on the Save button, reopen the screen, and then resume the loop. How can I insert a pause so I can send keystokes and then resume the loop?

WinWait, Individual Service Entry (Version Q),
IfWinNotActive, Individual Service Entry (Version Q), , WinActivate, Individual Service Entry (Version Q),
WinWaitActive, Individual Service Entry (Version Q),
MouseClick, left, 96, 55
Sleep, 100
Loop, Read, R:\AutoHotKey\Import\Test.csv
{
Loop, parse, A_LoopReadLine, CSV
{
WinActivate, Individual Service Entry (Version Q),
SetKeyDelay -1, 0
Send, {CAPSLOCK}%A_LoopField%{TAB}
Sleep, 500
}
}

[toralf]

How is the cursor getting to the save button? Do you move your mouse over that button?

[surfbum3000]

This code is close to what I need it to do but I'm not quite there yet. The code reads the text file, parses it, sends the variable to the correct field on the screen named Individual Service Entry (Version Q). After the first line of text, I need the code to pause, then click the Save button, and then reopen the window Individual Service Entry (Version Q) for the next line of data entry. The code below does this, but after the MouseClick on the Save button, the cursor jumps down the page for about 10 lines, then reopens the data entry window. I would like for it to stop clicking in each successive line on the screen before it reopens the Individual Service Entry (Version Q). Any idea as to why the cursor moves down the screen 10 times before the MouseClick works?
*********************************************

WinWait, Scheduler Live  [Single Day View], 
IfWinNotActive, Scheduler Live  [Single Day View], , WinActivate, Scheduler Live  [Single Day View], 
WinWaitActive, Scheduler Live [Single Day View], 
MouseClick, right,  275,  481
Sleep, 100
WinActivate  ; Uses the last found window.
MouseClick, left,  363,  526
Sleep, 100
WinWait, Individual Service Entry (Version Q), 
IfWinNotActive, Individual Service Entry (Version Q), , WinActivate, Individual Service Entry (Version Q), 
WinWaitActive, Individual Service Entry (Version Q), 
MouseClick, left,  96,  55
Sleep, 100
Loop, Read, R:\AutoHotKey\Import\Test.csv
{
   Loop, parse, A_LoopReadLine, CSV
   {
       WinActivate, Individual Service Entry (Version Q),
	SetKeyDelay -1, 0
	Send, {CAPSLOCK}%A_LoopField%{TAB}
	Sleep, 500
   }
ControlFocus, DFButton1, Individual Service Entry (Version Q); Set focus to the Save button
MouseClick, left,  313,  534
Sleep, 100
MouseClick, right,  303,  482
Sleep, 100
}

[surfbum3000]

Thank you not-logged-in-daonlyfreez. Your suggestions were very good. I had to modify the code a bit to get it to work, but it now does what I need it to do. I could never get the ControlFocus to work, so I just used MouseClick. I used AutoScriptWriter to discover what code AHK is using to perform some of the tasks I needed it to do since I am new to this.

MainWindowTitle = Scheduler Live  [Single Day View]
EntryWindowTitle = Individual Service Entry (Version Q)

WinActivate, %EntryWindowTitle%
; Activate your 'main' window

Loop, Read, R:\AutoHotKey\Import\Test.csv
{ 
   WinActivate, %EntryWindowTitle%
   MouseClick, left,  363,  526
   ; Opens the entry window I guess, can probably be done differently.
   ; Avoid using the mouse if possible.

   WinWaitActive, %EntryWindowTitle%,,10
      IfEqual, ERRORLEVEL, 1, MsgBox, Timeout...
   ; Wait until the entry window is active, show a message box if timed out.

   MouseClick, left,  96,  55
   ; first entry field? you can probably use Send, {Tab}
   SetKeyDelay -1, 0
   Loop, parse, A_LoopReadLine, CSV
   {
   Send, %A_LoopField%{TAB} ; {CAPSLOCK} ? Scriptrecorder ?
   Sleep, 500 ; try tweaking this for speed
   }
MouseClick, left,  303,  535; this opens a menu window
Sleep, 1000
MouseClick, right,  239,  354; this selects the menu option Individual Service Entry (Version Q)
Sleep, 1000
WinWait, Scheduler Live  [Single Day View], 
IfWinNotActive, Scheduler Live  [Single Day View], , WinActivate, Scheduler Live  [Single Day View], 
WinWaitActive, Scheduler Live  [Single Day View], 
MouseClick, left,  362,  395; Click on the Save button
Sleep, 1000
}

[toralf]

Does your app support keyboard shortcuts (e.g. Alt+s for save)?