Solved

Connecting to Popup Web Page using VBA

Posted on 2010-11-13
7
605 Views
Last Modified: 2012-05-10
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

0
Comment
Question by:DonGarry
  • 4
  • 3
7 Comments
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 34149193
0
 

Author Comment

by:DonGarry
ID: 34151556
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
 
LVL 74

Accepted Solution

by:
Jeffrey Coachman earned 500 total points
ID: 34151616
That error, most likely, has to do with code syntax.

You get this error on all of the examples you posted?
0
Migrating Your Company's PCs

To keep pace with competitors, businesses must keep employees productive, and that means providing them with the latest technology. This document provides the tips and tricks you need to help you migrate an outdated PC fleet to new desktops, laptops, and tablets.

 

Author Comment

by:DonGarry
ID: 34151670
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
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 34152412
Remember that some of those links presume that you are using a webbrowser control...
Are you?
0
 

Author Closing Comment

by:DonGarry
ID: 34161058
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
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 34161541
;-)
0

Featured Post

Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The first two articles in this short series — Using a Criteria Form to Filter Records (http://www.experts-exchange.com/A_6069.html) and Building a Custom Filter (http://www.experts-exchange.com/A_6070.html) — discuss in some detail how a form can be…
Overview: This article:       (a) explains one principle method to cross-reference invoice items in Quickbooks®       (b) explores the reasons one might need to cross-reference invoice items       (c) provides a sample process for creating a M…
In Microsoft Access, learn the trick to repeating sub-report headings at the top of each page. The problem with sub-reports and headings: Add a dummy group to the sub report using the expression =1: Set the “Repeat Section” property of the dummy…
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …

820 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question