#region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000409) --- #region --- Internal functions Au3Recorder Start --- Func _Au3RecordSetup() Opt('WinWaitDelay',100) Opt('WinDetectHiddenText',1) Opt('MouseCoordMode',0) Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '') If $aResult[1] <> '00000409' Then MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000409->' & $aResult[1] & ')') EndIf EndFunc Func _WinWaitActivate($title,$text,$timeout=0) WinWait($title,$text,$timeout) If Not WinActive($title,$text) Then WinActivate($title,$text) WinWaitActive($title,$text,$timeout) EndFunc _AU3RecordSetup() #endregion --- Internal functions Au3Recorder End --- ;;_WinWaitActivate("Intergy - Aegis Sciences Corporation - John Quigley","Patient Information:") $hWnd=WinGetHandle("[ACTIVE]") ControlFocus($hWnd,"", "[CLASS:Edit; INSTANCE:52]") ControlSetText($hWnd,"", "[CLASS:Edit; INSTANCE:52]", "Hello World!") ConsoleWrite($hWnd & @CRLF) MsgBox(0, "Got ", "Here") ;MsgBox(0, "Handle is " & $hWnd, "Hola") ;Local $hwnd=WinGetHandle("Edit Patient","") ;$vReturn=ControlGetText("Edit Patient", "","") ;ConsoleWrite("Return value is " & $vReturn & ", @error: " & @error & @CRLF) ;MsgBox(0, "Edit Pat handle is ", $hwnd) ;_WinWaitActivate("Intergy - Aegis Sciences", "Edit Patient Information") ;;WinWaitActive("Edit Patient Info") ;ControlSetText("Edit Patient Information", "", "[CLASS:Edit; INSTANCE:52]", "Jabber") ;Local $frmAddress1=ControlGetText($hwnd, "", "[CLASS:Edit; INSTANCE:52]") ;MsgBox(0, "See if...", $frmAddress1) ;Local $frmAddress1=ControlGetText("Edit Patient Information", "", "[Class:Edit; Instance: 52; ID:1031]") ;$frmAddress1=ControlGetText("Edit Patient Information", "", "[CLASS:Edit; INSTANCE:52]") ;ConsoleWrite($frmAddress1) ;MouseClick("left",352,618,1) #endregion --- Au3Recorder generated code End ---