Jump to content

Entering a Serial Number that changes every install


Recommended Posts

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 :lmao:

Stuart

Link to comment
Share on other sites

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

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

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

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

Hi,

Thanks for you help

Managed to get it working cheers

$pass = InputBox("Input", "Type in password")

Controlsend ('User Information', '', 'Edit3', $pass)

Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...