Forum Discussion

mesg2anil's avatar
mesg2anil
Regular Contributor
15 years ago

Calling any URL throughout the script

Hi, I have a query on how to call a URL through the script? For example: If i'm writting the script using www.yahoo.com and the script pass the script, if I want to run the same script using...
tristaanogre's avatar
tristaanogre
Esteemed Contributor
15 years ago
You have several problems with your code.



First, you're not "dimming" your variables so scope is rather messed up.

Secondly, you're not returning any value for your function so any calls to the function simply execute the function and don't return anything.



I modified your code and came up with the following.



Function page(URL)





Set page = Sys.Process("iexplore").Page("*")

Call page.ToURL(URL)

Call page.Wait





End Function





sub tester

dim PageObj

Call TestedApps.iexplore.Run

Set PageObj = page("http://server1/login.asp")

PageObj.document.all.Item("txtLoginId").Value = "UID"

PageObj.document.all.Item("txtPassword").Value = "Pwd"

PageObj.document.all.Item("cmbLogin").Click





end sub