zorg2000k Posted February 8, 2006 Share Posted February 8, 2006 Hi, New to this but what a great tool. Managed to use this on 8 program's I use at work so far but have become stumped with a problem on this install. Everything goes well untill I get to a setup page that requires a serial number to be entered. Now this hasn't been and issue with the other installs, but this program (Outside View v7.2) use's a unique serial key every install. So what I'm hoping to do is create a pop up box so the installer can add a serial number and then press enter and then it would script in the password entered into the serial box on the setup screen and then move onto the next setup screen. Script so far : ; Run the swift installer Run("setup.exe") WinWait('OutsideView32 - Installation Type', '') Sleep(800) ControlClick('OutsideView32 - Installation Type', '', 'Button1') WinWait('Welcome', '') Sleep(800) ControlClick('Welcome', '', 'Button1') WinWait('Software License Agreement', '') Sleep(800) ControlClick('Software License Agreement', '', 'Button2') WinWait('Information', '') Sleep(800) ControlClick('Information', '', 'Button1') Any help would be fantastic Stuart Link to comment Share on other sites More sharing options...
BigDod Posted February 8, 2006 Share Posted February 8, 2006 I am not familiar with the software you are trying to load but see below for a little example $pass = InputBox("Input", "Type in password") MsgBox(0,"Password typed", $pass) Replace msgbox line with either send or controlsend. Time you enjoyed wasting is not wasted time ......T.S. Elliot Suspense is worse than disappointment................Robert Burns God help the man who won't help himself, because no-one else will...........My Grandmother Link to comment Share on other sites More sharing options...
seandisanti Posted February 8, 2006 Share Posted February 8, 2006 another possible solution, if you're not installing on all machines at the same time, would be to have a list of serials, have your script grab the top serial, remove it from the list, and re-save. you could, if you wanted, even perform the install remotely, so that your script runs the installer on each machine, so there would be no chance of 2 instances of the script arguing over the file. Link to comment Share on other sites More sharing options...
zorg2000k Posted February 9, 2006 Author Share Posted February 9, 2006 I am not familiar with the software you are trying to load but see below for a little example $pass = InputBox("Input", "Type in password") MsgBox(0,"Password typed", $pass) Replace msgbox line with either send or controlsend. Hi Thanks for the reply. Having some difficulties adding this into my script. Here are some more details : Have added you code into script. Password box appears and I can enter password but I am struggling to get the number entered into the correct box. Here is a copy of the Active Window : >>>>>>>>>>>> Window Details <<<<<<<<<<<<< Title: User Information Class: #32770 Size: X: 88 Y: 135 W: 479 H: 364 >>>>>>>>>>> Mouse Details <<<<<<<<<<< Screen: X: 316 Y: 343 Cursor ID: 5 >>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<< RGB: Hex: 0xFFFFFF Dec: 16777215 >>>>>>>>>>> Control Under Mouse <<<<<<<<<<< Size: X: 209 Y: 166 W: 249 H: 21 Control ID: 303 ClassNameNN: Edit3 Text: >>>>>>>>>>> Status Bar Text <<<<<<<<<<< >>>>>>>>>>> Visible Window Text <<<<<<<<<<< Type your name below. You must also type the name of the company you work for and the product serial number. N&ame: NAG &Company: National Australia Group &Serial: < &Back &Next > Cancel CutWinName @10551 >>>>>>>>>>> Hidden Window Text <<<<<<<<<<< @10550,10551;1;1;0,128,128;0,128,128 Cheers Stuart Link to comment Share on other sites More sharing options...
zorg2000k Posted February 9, 2006 Author Share Posted February 9, 2006 Hi Thanks for the reply.Having some difficulties adding this into my script. Here are some more details :Have added you code into script.Password box appears and I can enter password but I am struggling to get the number entered into the correct box.Here is a copy of the Active Window :>>>>>>>>>>>> Window Details <<<<<<<<<<<<<Title: User InformationClass: #32770Size: X: 88 Y: 135 W: 479 H: 364>>>>>>>>>>> Mouse Details <<<<<<<<<<<Screen: X: 316 Y: 343Cursor ID: 5>>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<<RGB: Hex: 0xFFFFFF Dec: 16777215>>>>>>>>>>> Control Under Mouse <<<<<<<<<<<Size: X: 209 Y: 166 W: 249 H: 21Control ID: 303ClassNameNN: Edit3Text: >>>>>>>>>>> Status Bar Text <<<<<<<<<<<>>>>>>>>>>> Visible Window Text <<<<<<<<<<<Type your name below. You must also type the name of the company you work for and the product serial number.N&ame:NAG&Company:National Australia Group&Serial:< &Back&Next >CancelCutWinName@10551>>>>>>>>>>> Hidden Window Text <<<<<<<<<<<@10550,10551;1;1;0,128,128;0,128,128CheersStuartHi,Thanks for you helpManaged to get it working cheers$pass = InputBox("Input", "Type in password")Controlsend ('User Information', '', 'Edit3', $pass) 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