I am lost. Can you help?
Moderators: Dorian (MJT support), JRL
I am lost. Can you help?
I _think_ this program will do what I need.
I am attaching 2 screenshots of the program I need to automate. The first is the login screen. Password must be entered each time I login. The second is the update/download screen. The first radio button is the default and what I need but the date must be changed each day to update from the previous day. Then the software need to run and download all the new photos.
Target: "C:\Program Files\XMLSWeb\XMLSPhotos\XMLSPhoto.exe"
Any help would be greatly appreciated.
I am attaching 2 screenshots of the program I need to automate. The first is the login screen. Password must be entered each time I login. The second is the update/download screen. The first radio button is the default and what I need but the date must be changed each day to update from the previous day. Then the software need to run and download all the new photos.
Target: "C:\Program Files\XMLSWeb\XMLSPhotos\XMLSPhoto.exe"
Any help would be greatly appreciated.
Last edited by XCore on Thu Jan 06, 2005 10:53 pm, edited 1 time in total.
Ooooh, they have the Internet on computers now!
- Bob Hansen
- Automation Wizard
- Posts: 2475
- Joined: Tue Sep 24, 2002 3:47 am
- Location: Salem, New Hampshire, US
- Contact:
Rough skeleton, untested, to get you started:
Tab to fields using Send as necessary
Login and enter password to continue
Wiat for next window to open
Convert todays date to yesterday's date
Use Send to fill in fields as necessary
Press ALT-D to download.
==================================
Tab to fields using Send as necessary
Login and enter password to continue
Wiat for next window to open
Convert todays date to yesterday's date
Use Send to fill in fields as necessary
Press ALT-D to download.
==================================
Code: Select all
WaitWindowOpen>Login*
SetFocus>Login*
Tab
Send>cmls
Tab
Send>yourid
Tab
Send>yourpassword
Tab
Press ENTER
WaitWindowOpen>Download*
SetFocus>Download*
GetDate>Today
Sub>Today,1
Send>%Today%
Press ALT
Send>D
Release ALT
Hope this was helpful..................good luck,
Bob
A humble man and PROUD of it!
Bob
A humble man and PROUD of it!
- Bob Hansen
- Automation Wizard
- Posts: 2475
- Joined: Tue Sep 24, 2002 3:47 am
- Location: Salem, New Hampshire, US
- Contact:
Have a try. Should work.Let>MLSID=cmls
Let>UserID=yourid
Let>Password=BoBHansen
Run Program>C:\Program Files\XMLSWeb\XMLSPhotos\XMLSPhoto.exe
WaitWindowOpen>Login*
SetFocus>Login*
Tab
Send>%MLSID%
Tab
Send>%UserID%
Tab
Send>%Password%
Tab
Press ENTER
WaitWindowOpen>Download*
SetFocus>Download*
GetDate>Today
Sub>Today,1
Send>%Today%
Press ALT
Send>D
Release ALT
Thx to Bob who has created 99,99 % of the above script.
Guess Bob will be OK if you donate what you can afford to a charity org to help those who have survived the Tsunami in Asia. Do it!
Thx.
- Bob Hansen
- Automation Wizard
- Posts: 2475
- Joined: Tue Sep 24, 2002 3:47 am
- Location: Salem, New Hampshire, US
- Contact:
Opens first window and that's all?
What happens if you single step throught the macro?
Can you create a log and provide a copy of it?
Is Download* the real name of the second window as seen by Macro Scheduler?
Can you try using the window handle instead?
What happens if you single step throught the macro?
Can you create a log and provide a copy of it?
Is Download* the real name of the second window as seen by Macro Scheduler?
Can you try using the window handle instead?
Hope this was helpful..................good luck,
Bob
A humble man and PROUD of it!
Bob
A humble man and PROUD of it!
Hi, along the same lines, I want to log into a web page but can't make the macro do it. Would it be possible for anyone to point me in the right direction please?
VBSTART
Sub OpenPage(URL,Wait)
Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.visible = 1
IE.navigate URL
do while IE.Busy and Wait
loop
End Sub
VBEND
Input>URL,Enter URL of Page to Visit:,www.retaileyes.co.uk/home/userlogin.php
VBRun>OpenPage,%URL%,1
Let>Username="My username"
Let>Password="My password"
SetFocus>Microsoft Internet Explorer*
Tab
Send>"My username"
Tab
Send>"My password"
Tab
Press ENTER
VBSTART
Sub OpenPage(URL,Wait)
Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.visible = 1
IE.navigate URL
do while IE.Busy and Wait
loop
End Sub
VBEND
Input>URL,Enter URL of Page to Visit:,www.retaileyes.co.uk/home/userlogin.php
VBRun>OpenPage,%URL%,1
Let>Username="My username"
Let>Password="My password"
SetFocus>Microsoft Internet Explorer*
Tab
Send>"My username"
Tab
Send>"My password"
Tab
Press ENTER