Jump to content

hmsSurprise

Active Members
  • Posts

    151
  • Joined

  • Last visited

Everything posted by hmsSurprise

  1. Sorry to bother folks, was just proceeding based on a reply to an earlier post. I just tried ControlCommand and was going to say Never Mind but you guys are too smart and too quick for us old farts. jh
  2. Tried to read a check button using the following but the GUICtrlRead always returns a zero. Is this the wrong approach? jh ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Func autoLogon() Run("c:\WINDOWS\system32\cmd.exe /c control userpasswords2") WinWait("User Accounts","") $hWnd = WinGetHandle ("User Accounts") Sleep(800) $hCont = ControlGetHandle($hWnd, "", "Button1") MsgBox(0, "User Accts should be open, handle = ", $hCont) $result = GUICtrlRead($hCont) MsgBox(0, "checkboxValue", $result) EndFunc
  3. The way eBlvd works ( at least here) is I point to a page on our server. It re-directs to eblvd and fills in the long user ID. Then when "Download Software" is clicked the installer pops up. Therefore I am not sure that the installer is freely or easily available. I admit I have no inkling of how to grab it. As you may perceive I am pretty much out of my element here. Thanks, jh
  4. -Thanks for responding. What happens when the installer is run without automation? - It advances to the next window that has a pull down menu, two text boxes, two radio buttons, the first of which activates two more text fill in boxes for password and confirm. Buttons are Next and Cancel. Subsequent Window is for folder selection with Browse, Next, and Cancel. Also for the I Agree You may want to take a look at how many Tabs have to be sent to get to the I Agree radio control and use Send("{TAB} <the number of tabs>,{Space}) - Cycling all the way around, I verifed that this is the default position tho not highlighted. Also take a look at If WinExists($hWnd,"") Then WinActivate($hWnd'"") - Will do so as soon as I finish this post, thanks. EDIT: Whose installer is it? Some installers will accept a -s or -q switch for Silent or Quiet installs. - I am guessing MS, it displays the little box and CD at the top. Not sure how to verify. Do silent installs run from a cmd line? This installer pops up after clicking a download link on the eBlvd webpage. Thanks, jh
  5. I am running an eBlvd setup wizard. I wait for the window to be active then I am able to click on the accept radio button(Button1). Next I try to Control Click the Next button, it has an ID of 12325 and a className of Button5. When the controlclick is executed the window either goes away or minimizes(tho there is no button for doing that) or goes away completely. Any ideas? I noticed after the script executed Window Info says the text = "Finish", but that text is not on the subsequent window, nor the next. Thanx. ~~~~~~~ Func eBlvd() $sURL = "http://eint.com/eblvd" $oIE = _IECreate($sURL) $oForm = _IEFormGetObjByName($oIE, "Form1") $oButton = _IEFormElementGetObjByName($oForm, "_setupbutton") _IEAction($oButton, "click") _IELoadWait($oIE) ;Downloaded at this point Opt("WinTitleMatchMode", 1) $hWnd = WinGetHandle ("eBLVD Host Setup Wizard 3.1") WinWaitActive($hWnd, "") ControlClick($hWnd, "", "Button1") Sleep(800) ;This is the problem line........... ControlClick($hWnd, "", "Button5") EndFunc
  6. Hey, even an old blind hogs find an acorn every now and then. Great links on your reply sigline. jh
  7. In examples of _IEFormGetObjByName I see "f" and "Form1" used for $s_name. Looking in "Window Info Tool" I do not see "Form1" for an IE page. How is this name obtained? thanks again, jh
  8. Thanks, he sure is! jh
  9. Great, works like a hose. Thanks for researching my source page. I opened the source and think I have a pretty good handle on what you did. Only change I made was change _IEAction($oInput, "click") to _IEAction($oButton, "click"). Sure beats the heck out of the newbie trash I generated: unc eBlvd() Run("C:\Program Files\Internet Explorer\IEXPLORE.EXE") Opt("WinTitleMatchMode", 4) WinWait("Classname=IEFrame") ;Msgbox(0,"First Window Wait is over", "") $Hwnd = WinGetHandle("Classname=IEFrame") Sleep(800) ControlSetText("Classname=IEFrame", "", "Edit1", "http://dvint.com/eblvd") Sleep(800) ;MsgBox(0,"Text is set", "") ControlClick("Classname=IEFrame", "", "ToolbarWindow321") Opt("WinTitleMatchMode", 1) WinWait("eBLVD", "") ;MsgBox(0,"Done waiting for eBLVD","") $Hwnd = WinGetHandle("eBLVD") MsgBox(0,"handle", $Hwnd) Sleep(800) ;Stuck here trying to click link for Download Software..... ControlClick("eBLVD", "","Internet Explorer_Server1") Sleep(800) $result = _IELinkClickByText ($Hwnd, "Download Software") MsgBox(0, "CBT", $result) MsgBox(0,"@error", @error) EndFunc Thanks again, jh
  10. Is there something similar to GUICtrlRead that I could use for regular MS Window to read the state of a check box? Thanx, jh
  11. Thanks for the post. Yes, I should have phrased my question better. I should have asked how do I obtain the object variable for the page? Here's the page source (less the user ID on line 14). Thanks Again, jh (AKA goodTweetieBird when he loses his login ID and his mind....) ~~~~~~~~~~~~~~~~~~ <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="content-type" content="text/html;charset=iso-8859-1" /> <title>eBLVD - Access and share your PC from anywhere!</title> <link href="styles/main.aspx" rel="stylesheet" media="screen" /> </head> <body> <form name="Form1" method="post" action="ra.aspx?user=" id="Form1"> <input type="hidden" name="__VIEWSTATE" value="dDwtMTgyOTg2NTA1MTs7PrCkkapmTaLJMluIEvkzKbh6RQ3X" /> <div id="_header__standard"> <div style="height:26; background-image:url(images/top-bluebar.gif); " > <div style="width:800;text-align:right;padding-top:4;" ><img src="images/telephone-number.gif" alt="" border="0" style="height:17px;width:111px;" /></div> </div> <div style="height:88; background-image:url(images/top-orangebar.gif);" > <table width="800" border="0" cellspacing="0" cellpadding="0" > <tr> <td style="width:273;height:79;"><img src="images/top-logoblock.gif" alt="" border="0" /></td> <td><img src="images/top-orange-boxes.gif" alt="" border="0" style="height:79px;width:300px;" /></td> <td style="width:227;background-color:#7d8aa2; border-right: solid 1 #3d3d3d;" >&nbsp;</td> </tr> <tr> <td style="width:273; height:9; background-image:url(images/top-left-orangebar.gif);" ></td> <td colspan="2" style="height:9; background-image:url(images/top-middle-orangebar.gif);" ></td> </tr> </table> </div> </div> <div style="background-image:url(images/main-header-background-2.gif); height:20;" ></div> <div id="bodyback" > <table id="bodycontent" cellspacing="0" > <tr> <td id="content" > <p><img src="images/header-setupremoteaccess.gif" alt="" height="31" /></p> <noscript> <p class="error"> <b>Your browser does not have Javascript enabled.</b><br /> You must enable the use of Javascript for this browser to install the software.<br /><br /></p> </noscript> <table id="main2col" cellspacing="0" > <tr> <td id="leftcol" > <div id="_mainpanel"> <p> You have been requested to set up your PC for remote access by <span id="_name">dataVoice International, Inc.</span>. <br /><br /> The following process installs the eBLVD Host Applet, which manages connections to your PC over the eBLVD network. You may uninstall the software at any time from "Add/Remove Programs" in the Windows control panel. <br /><br /> </p> <p><b>1. Begin Download</b></p> <p>Click the button to download and launch the setup wizard.</p> <div style="text-align:center;margin-bottom:8px;margin-top:8px;"> <input name="_setupbutton" id="_setupbutton" type="button" value="Download Software" class="flat" style="cursor:pointer;" onclick="java script:setup('872A97C1-704C-4C09-B2CF-C2F13F0989BD');" /> </div> <p><i>Estimated download time - 56K: 33 sec,&nbsp;&nbsp;Broadband: 5 sec,&nbsp;&nbsp;T1: 1 sec</i><br /><br /><br /></p> <p><b>2. Set PC Access Details</b></p> <p><img align=right src="images/fig_setup1.gif" /> After you accept the license agreement, the setup wizard will prompt you to name the PC and set a password.<br /><br /> Only someone with this password can connect to the PC, otherwise you will have to be present to grant them permission when they attempt to connect.<br /><br /><br /></p> <p><b>3. Manage Software</b></p> <p><img alt="System Tray" src="images/fig_systray.gif" align="left" vspace="3" />Once the setup wizard has completed, if you see the icon in your system tray, the PC is ready for remote access.<br /><br /><br /></p> <p>You can start and stop the host software through<br /> Start -> Programs -> eBLVD -> eBLVD Options.<br /><br /> <p><b>Note:</b> <i>If the host is started in "Restricted Access" mode, screen savers and the Windows Login screen will prevent remote access.</i><br /><br /> </div> </td> <td id="rightcol"> <img src="images/header-sub-sysrequirements.gif" alt="" height="23" width="130" /><br /> <p class="rightcol"> <b>OS:</b> Windows 95, 98, ME, NT, 2000, XP <i>(2000/XP users must have Admin or Power User rights)</i><br /><br /> <b>Browser:</b> Internet Explorer (ver 5.5 or higher), Firefox 1.0, or Netscape 7.1<br /><br /> <b>Network:</b> Any working internet connection<br /><br /> </p> <img src="images/header-sub-hostdetails.gif" alt="" height="23" width="130" /><br /> <p class="rightcol"><b>Current Version:</b><br /><span id="Version1__version">6.1 (build 522)</span><br /><br /> <b>Release Date:</b><br /><span id="Version1__updated">Apr 4 2007 3:40PM</span></p> </td></tr> </table> </td></tr> </table> </div> <div class="footer"> <a target="_blank" href="http://eBLVD.com" title="Get a free trial"></a> <a id="_footer__home" href="default.aspx">Home</a> | <a id="_footer__company" href="about.aspx">Company</a> | <a id="_footer__products" href="products-om.aspx">Products</a> | <a id="_footer__support" href="support.aspx">Support</a> | <a id="_footer__contact" href="contact.aspx">Contact</a> <br /><br /> <a href="java script:footerWindowOpen('http://www.eBLVD.com/legal.aspx', 400, 400);" >&copy; 2007</a> eBLVD by ENC Technology Corp. <div id="_footer__prodlinks"> <a id="_footer_omfoot" href="products-om.aspx">Online Meetings</a> | <a id="_footer_rdfoot" href="products-rd.aspx">Remote Desktop</a> | <a id="_footer_scfoot" href="products-sc.aspx">Support Center</a> </div> </div> <script language="javascript" type="text/javascript"> function footerWindowOpen(url,width,height) { var str = "height=" + height + ",innerHeight=" + height; str += ",width=" + width + ",innerWidth=" + width; if (window.screen) { var ah = screen.availHeight - 30; var aw = screen.availWidth - 10; var xc = (aw - width) / 2; var yc = (ah - height) / 2; str += ",left=" + xc + ",screenX=" + xc; str += ",top=" + yc + ",screenY=" + yc; } str += "toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes"; myWindow = window.open(url,"",str); if (!mywindow.opener) mywindow.opener = self; } </script> <script language=javascript> strDest = "getcontrol.aspx?dest=www.eblvd.com/ra.aspx%3Fuser=872A97C1-704C-4C09-B2CF-C2F13F0989BD"; if (window.navigator.userAgent.indexOf("SV1") != -1 || window.navigator.userAgent.indexOf("MSIE 7") != -1) strDest += "&sp2=1"; try { var launchObj = new ActiveXObject("Ebie.Launcher.3"); } catch (e) { window.location = strDest; } // check for most current version of launcher if (launchObj.GetVersion() != "3.3.0.365") window.location = strDest; </SCRIPT> <script src="https://www.eblvd.com/include/LauncherFncs.js" language=javascript></SCRIPT> </form> </body> </html>
  12. I am an old timer but if I had it to do all over again I would learn C using a C++ compiler, the C++. For scripting I would prefer Tcl/tk over python as I find python's indentation rules maddening. Yes, I indent my code, but when moving segments in and out of functions while experimenting and debugging I really get frustrated with python. Compiled languages both have their places and I think you learn a lot of discipline and gain a lot of understainding by working with strongly typed languages such as C++. BTW, anyone doing any reading on the next generation of C++, which is named D? jh
  13. Thanks, and here they come... ;^) Trying to click the button that has no ID using this line: $result = _IELinkClickByText ($Hwnd, "Download Software") Is the first arg, $o_object, the same as the handle obtained by $Hwnd = WinGetHandle("Classname=IEFrame") ?
  14. Thanks for the quick reply. I see there is a large number of _IE functions, so I better get started wading thru them. jh
  15. Things were going better than expected. I started in earnest just this morning and I copied large directories from another server on the network, then I was able to open Internet Explorer (by classname=IEFrame, title depends on homepage) and set the page to our server page which re-directs to the eBLVD download page, and click the go button. Then there was a button in the middle of the new page labeled "Download Software" but the Info Window cannot see it, it has no control ID, and the className "Internet Explorer_Server1" applies to the whole page or frame. MouseClick may be an option but how reliable is it? Is Window or Client coordinate mode more reliable? Sorry to bombard you with so many newbie questions but I have a short deadline for proving that AutoIt is the way to go ( and I am betting it is). Thanks again, jh
  16. I have found MsgBox and SplashTextOn but I am looking for something like a logging window that can continually show progress (maybe in a scrolling window). SplashTextOn seems to be for oneshot messages. There are so many features in AutoIt I maybe I just haven't found it yet or maybe I am looking for the wrong names. Thanks, jh
  17. OK, thanks. There is a lot of great stuff here. I was looking under functions and now I see ControlSetText is under Windows Managerment/Controls. Thanx again, jh
  18. Hello again, When going thru setups I sometimes need to change the install directory. What is the best way to erase the default string b4 typing a new one. Thanx, jh
  19. Thanks! I felt that Inno Setup was not suited to what I wanted to do. However others here had insisted that it had been used to do the things I need to do, so I had a skewed perspective starting out, but the more I tried to put eh square peg in the round hole the more it hurt. Thanks for helping me pull my head out into the sunshine. jh
  20. Hello again, If you are familiar with Inno Setup what would you say are the situations for preferring AutoIt and Inno Setup? Thanx, jh
  21. Thanks, I''l give that a read. jh
  22. Oh, duh on me. Great idea. I see it is organized differently and you just saved us a post for here I see functions for file and directory copying. Thanks, all. jh
  23. Greetings, I need to do a lot of repetitive server setups. I cannot use imaging as each has different disk configurations in addition the fact there is already software loaded on them. One of the apps I add is MySQL. I worked the examples and was quite impressed but now I am stuck. The window selections have no alt keys defined and others need check boxes unchecked, etc. Before I go too far I would like to find out if the setup windows can all be handled. Please tell me if the following is doable. Thanx, jh First window - Next (Button1) is highlighted so sendining {Enter} should work, right? Second window - Three radio buttons, Typical, Complete, Custom, no alts defined. I need Custom(Control ID 73). Next(Button6) is default. Third window - Need to click "Change..." to change install directory. 3A - Need to select "Folder name" box, remove existing path, and replace with new one. Afterwards OK is default button. 3 - Next (Button4) is default again. 4- Install (Button1) is default. 5- Need to select third radio button (Skip Sign-Up) whose Control ID is different each time I run the program, but classNameNN = TTntRadioButton.UnicodeClass1. Click Next 6- Click Finish (Button 1) ;Next the instance config Setup starts. 1- Title: MySQL Server Instance Configuration Wizard. Next is default. 2- 7 Click default Next. 8- Need to check box with ClassName "TTntCheckBox.UnicodeClass1". Then click next. 9- Enter password in box with ClassName TTntEdit.UnicodeClass3" and box with ClassName "TTntEdit.UnicodeClass1". Click enter. 10- Click Execute - ClassName TTntButton.UnicodeClass3. 10E- At this point an Error pop-up may present itself. How do I check for its existance? 11 - Click Finish
×
×
  • Create New...