Connecting to Popup Web Page using VBA

Hello Experts, we are trying to automate connecting to a website, logging in and performing certain  tasks using VBA. All is working well till we get to a particular submit button that when clicked on manually brings up a popup webpage.
The code below shows the IE source code and snippets of what we are doing in VBA. Any assistance here would be greatly appreciated.
'Here is what part of the IE source code of the submit button looks like:
<td>
<input type="submit" name="_ctl7:_ctl4:btnMemberLookup" value="Select Players For Ballot" onclick="return btnMemberLookup_onclick();if (typeof(Page_ClientValidate) == 'function') Page_ClientValidate(); " language="javascript" id="_ctl7__ctl4_btnMemberLookup" style="width:170px;" />
</td>

'Here is how we are connecting to the URL:
strURL = "the location of the webpage we are trying to automate"
' Create an object of type InternetExplorer
    Set objIE = CreateObject("InternetExplorer.Application")

    ' Use the Navigate method to make our IE object visit a web page (strURL=Your web page)
    objIE.navigate strURL

    ' Make the InternetExplorer window visible    objIE.Visible = True

'We are not having any problems doing other things on the form such as clicking on the following button:
'Click on View/Add Ballot
 objIE.Document.all("_ctl7:_ctl4:btnViewBallot:imgbtn").Click
    While objIE.ReadyState <> 4 Or objIE.Busy = True
        DoEvents
    Wend
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'However when we try to use VBA o the Member Lookup button it fails. We tried .submit and it doesn't work either.
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
objIE.Document.all("ctl7:_ctl4:btnMemberLookup").Click
    While objIE.ReadyState <> 4 Or objIE.Busy = True
        DoEvents
    Wend

Open in new window

DonGarryAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Jeffrey CoachmanConnect With a Mentor MIS LiasonCommented:
That error, most likely, has to do with code syntax.

You get this error on all of the examples you posted?
0
 
DonGarryAuthor Commented:
Hello boag2000:

Thanks for you reply....
I've looked at your links and still cannot find a solutions.

Here is what I have tried and still no luck:
objIE.Document.all("ctl7:_ctl4:btnMemberLookup").Click
objIE.Document.all("_ctl7__ctl4_btnMemberLookup").Submit
objIE.Document.Form("_ctl7__ctl4_btnMemberLookup").Click
objIE.Document.Form("ctl7:_ctl4:btnMemberLookup").Submit

I'm getting the error: object doesn't support this property or method (438)

Any other suggestions?
0
Easily Design & Build Your Next Website

Squarespace’s all-in-one platform gives you everything you need to express yourself creatively online, whether it is with a domain, website, or online store. Get started with your free trial today, and when ready, take 10% off your first purchase with offer code 'EXPERTS'.

 
DonGarryAuthor Commented:
Yes I do as a matter of fact...and I've looked at the syntax 100 times at least and am not spotting anything obvious....hmmmm
0
 
Jeffrey CoachmanMIS LiasonCommented:
Remember that some of those links presume that you are using a webbrowser control...
Are you?
0
 
DonGarryAuthor Commented:
Well as it turns out you were right! It was a syntax problem...I guess I'm going blind.

The correct syntax to open up the popup window is indeed:
objIE.Document.all("_ctl7:_ctl4:btnMemberLookup").Click
(I was missing an underscore)

Thanks for the help!
0
 
Jeffrey CoachmanMIS LiasonCommented:
;-)
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.