Code to execute a dropdown link on an asp web page

N

Nelson

I have the following code to navigate to a web page with asp code that works
fine:

Dim Ie As Object

Set Ie = CreateObject("InternetExplorer.Application")
With Ie
.Navigate "httpsaddress"
.left = 50
.top = 50
.Height = 650
.Width = 900
.Visible = True
End With
Do While Ie.Busy
DoEvents
Loop

Ie.Document.All("username").Value = "username"
Ie.Document.All("userpassword").Value = "password"
Ie.Document.loginForm.submit.Click
Do While Ie.Busy
DoEvents
Loop

At this point I need to insert the line to execute the following asp code (I
have tried Ie.ExecScript "upload.asp", "javascript" but I get "Object
doesn't support this property or method".):

<DIV style="PADDING-LEFT: 5px; LEFT: 1px; VISIBILITY: inherit; OVERFLOW:
hidden; WIDTH: 130px; CURSOR: hand; COLOR: black; PADDING-TOP: 2px;
POSITION: absolute; TOP: 1px; HEIGHT: 20px; BACKGROUND-COLOR: #cccc99;
TEXT-ALIGN: left" PrvMbr="null" Level="2" LinkTxt="upload.asp"
ChildCntnr="null" ro="0" rid ri2 ri1 value="Upload Claim File"
LoBck="#cccc99" LwFntClr="black" HiBck="#b0c4de" HiFntClr="black">Upload
Claim File</DIV>

Anyone know what the correct line is? Thanks!!
 
Top