IanN1990 Posted August 9, 2016 Share Posted August 9, 2016 (edited) Hi, I am writing a script to automated IE in a controlled manner. For most of my scripting I have been able to use IE.au3 functions for this but some aspect this isn't enough and i am forced to use send commands. (Some inputs have no ID or Name or the website is using Javas elements) I need to move away from control send as the script can be running for long periods and it prevents me doing other functions (As control send in my aspect requires focus). The Code below is a hours of researching and is almost perfect but failing at the finial stage. I am hoping someone will be able to help. The script is an example 1. Opens a IE object and Embeds it into a GUI 2. Loads Google as a test website 3. Sends 8 _PostMessage Tab Commands to get Focus on the Input 4. Sends a _PostMessage Letter <--- Here is where it fails expandcollapse popup#include <WindowsConstants.au3> #include <GUIConstantsEx.au3> #include <WinAPI.au3> #include <Constants.au3> #include <IE.au3> Dim $hGUI, $oIE, $h_HWND $hGUI = GUICreate("Test", 1024, 768) $oIE = IECreatePseudoEmbedded(0, 0, 1024, 768, $hGUI) _IENavigate($oIE, "www.google.com") GUISetState(@SW_SHOWNOACTIVATE, $hGUI) SuperSend(19) _WinAPI_PostMessage($h_HWND, $WM_KEYDOWN, 0x41, 0); _WinAPI_PostMessage($h_HWND, $WM_KEYUP, 0x41, 0); Do Until GUIGetMsg() = $GUI_EVENT_CLOSE Exit Func IECreatePseudoEmbedded($i_Left, $i_Top, $i_Width, $i_Height, $h_Parent) Local $o_IE $o_IE = ObjCreate("InternetExplorer.Application") $o_IE.theatermode = True $o_IE.fullscreen = True $o_IE.statusbar = False $h_HWND = _IEPropertyGet($o_IE, "hwnd") _WinAPI_SetParent($h_HWND, $h_Parent) _WinAPI_MoveWindow($h_HWND, $i_Left, $i_Top, $i_Width, $i_Height, False) _WinAPI_SetWindowLong($h_HWND, $GWL_STYLE, $WS_POPUP + $WS_VISIBLE) Return $o_IE EndFunc ;==>IECreatePseudoEmbedded Func SuperSend($Ammount) For $i=1 to $Ammount _WinAPI_PostMessage($h_HWND, $WM_KEYDOWN, 0x09, 0); _WinAPI_PostMessage($h_HWND, $WM_KEYUP, 0x09, 0); _WinAPI_PostMessage($h_HWND, $WM_KEYDOWN, 0x09, 0); _WinAPI_PostMessage($h_HWND, $WM_KEYUP, 0x09, 0); Next EndFunc Would anyone know where i have gone wrong or how to correct it? Ian Edited August 19, 2016 by IanN1990 Link to comment Share on other sites More sharing options...
IanN1990 Posted August 10, 2016 Author Share Posted August 10, 2016 Does anyone have any ideas? I have spent the best of three days looking over the forums but from my understanding the code is correct. The only other thing i have tired is putting a delay between the key down and key. Up but that has had no effect Link to comment Share on other sites More sharing options...
BrewManNH Posted August 10, 2016 Share Posted August 10, 2016 Aren't you sending 38 tab keys to the window? You're doing 2 tabs per $ammount and you're doing 19 loops through that, so that would be 38 tab keys sent wouldn't it? If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag GudeHow to ask questions the smart way! I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from. Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays. - ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script. - Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label. - _FileGetProperty - Retrieve the properties of a file - SciTE Toolbar - A toolbar demo for use with the SciTE editor - GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI. - Latin Square password generator Link to comment Share on other sites More sharing options...
Bowmore Posted August 10, 2016 Share Posted August 10, 2016 This is the first IE automation that I have tried so this is probably not the best way to do it, but it worked for me. Tested on Windows 10 Pro 64Bit expandcollapse popup#AutoIt3Wrapper_UseX64=Y #include <WindowsConstants.au3> #include <GUIConstantsEx.au3> #include <WinAPI.au3> #include <Constants.au3> #include <IE.au3> Dim $hGUI, $oIE, $h_HWND $hGUI = GUICreate("Test", 1024, 768) $oIE = IECreatePseudoEmbedded(0, 0, 1024, 768, $hGUI) _IENavigate($oIE, "www.google.com") GUISetState(@SW_SHOWNOACTIVATE , $hGUI) WinActivate($h_HWND) WinWaitActive($h_HWND) Sleep(100) ControlSend($h_HWND,"",'',"{TAB 42}") Sleep(100) ControlSend($h_HWND,"",'',"TEST",1) Do Until GUIGetMsg() = $GUI_EVENT_CLOSE Exit Func IECreatePseudoEmbedded($i_Left, $i_Top, $i_Width, $i_Height, $h_Parent) Local $o_IE $o_IE = ObjCreate("InternetExplorer.Application") $o_IE.theatermode = True $o_IE.fullscreen = True $o_IE.statusbar = False $h_HWND = _IEPropertyGet($o_IE, "hwnd") _WinAPI_SetParent($h_HWND, $h_Parent) _WinAPI_MoveWindow($h_HWND, $i_Left, $i_Top, $i_Width, $i_Height, False) _WinAPI_SetWindowLong($h_HWND, $GWL_STYLE, $WS_POPUP + $WS_VISIBLE) Return $o_IE EndFunc ;==>IECreatePseudoEmbedded "Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the universe trying to build bigger and better idiots. So far, the universe is winning."- Rick Cook Link to comment Share on other sites More sharing options...
IanN1990 Posted August 11, 2016 Author Share Posted August 11, 2016 @BrewManNH That is correct That's because what i found is sending the tab command changes focus from IE Frame to (Address / Toolbars / etc). As It is in full screen / theater mode with no status bar it only has one thing it can tab to. That's why i send two tabs for every one tab i need @Bowmore The code you have posted is correct and would help most people. The issue i would have with Send and ControlSend is requires focus, as this script could spend hours setting up accounts this would lock down my system for that duration. Link to comment Share on other sites More sharing options...
BrewManNH Posted August 11, 2016 Share Posted August 11, 2016 6 hours ago, IanN1990 said: That is correct That's because what i found is sending the tab command changes focus from IE Frame to (Address / Toolbars / etc). As It is in full screen / theater mode with no status bar it only has one thing it can tab to. That's why i send two tabs for every one tab i need But you're sending 38 of them, do you NEED all 38 to get to one control? Also this UDF might be a better choice. If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag GudeHow to ask questions the smart way! I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from. Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays. - ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script. - Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label. - _FileGetProperty - Retrieve the properties of a file - SciTE Toolbar - A toolbar demo for use with the SciTE editor - GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI. - Latin Square password generator Link to comment Share on other sites More sharing options...
mLipok Posted August 11, 2016 Share Posted August 11, 2016 There is also an example made by @LarsJ Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
IanN1990 Posted August 19, 2016 Author Share Posted August 19, 2016 On 11 August 2016 at 4:12 PM, BrewManNH said: But you're sending 38 of them, do you NEED all 38 to get to one control? Also this UDF might be a better choice. During my long hours of researching i did come across this UDF but struggled to make heads or tails of it. I thought i would share the answer i found to get into better habits, as i am getting more active in coding. The problem was down to sending the Postmessage to a HWND of the window but not the HWND that could receive it. $avChildren = "" WinListChildren(wingethandle("IE Window Title"), $avChildren) Func WinListChildren($hWnd, ByRef $avArr) If UBound($avArr, 0) <> 2 Then Local $avTmp[10][2] = [[0]] $avArr = $avTmp EndIf Local $hChild = _WinAPI_GetWindow($hWnd, $GW_CHILD) While $hChild If $avArr[0][0]+1 > UBound($avArr, 1)-1 Then ReDim $avArr[$avArr[0][0]+10][2] $avArr[$avArr[0][0]+1][0] = $hChild $avArr[$avArr[0][0]+1][1] = _WinAPI_GetWindowText($hChild) $avArr[0][0] += 1 WinListChildren($hChild, $avArr) $hChild = _WinAPI_GetWindow($hChild, $GW_HWNDNEXT) WEnd ReDim $avArr[$avArr[0][0]+1][2] EndFunc I take no credit for the code but it displays all the control handles for the Window, then by using a For ... Next loop go through the way sending a message until it appeared on screen. Though things to note for anyone else that finds this. 1. The total control number can change depending on IE settings (I am rolling this out across a team who all have different Addons in IE, i got around this by using an embeeded browser though). 2. Some controls do require focus for this to work, even if it is only for a second. Example i needed to click a button which couldn't be tab focused to. So i used control click to give focus, actived back to past window and let the postmessages carry on. Hope this helps anyone else that comes across this one day. 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