LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #13   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 133
Default Capture values from a web page drop-down list


Thanks, Tim. I've tried the following code, but get stuck as per
comments in code. Any suggestions what I'm doing wrong?

Paul

================================================== =================
Private Const HTTP_PATH As String = "http://192.120.13.77/
viewtable.aspx?region=E_AUST&report=int924"
Private Const HTTPREQ_SUCCESS As Integer = 200
Private Const BUTTON_AGREE As String =
"ctl00_ContentPlaceHolder1_imgAgree"
Private Const DROPDOWN_RECENTREPORT As String =
"ctl00_ContentPlaceHolder1_dpRecentReport"

Sub GetHtmlPage()
Dim HttpReq As New MSXML2.XMLHTTP
Dim HtmlDoc As New MSHTML.HTMLDocument
Dim HtmlBtnAgree As MSHTML.HTMLButtonElement
Dim HtmlOpt As MSHTML.HTMLOptionElement

HttpReq.Open "GET", HTTP_PATH, False
HttpReq.send

If HttpReq.Status = HTTPREQ_SUCCESS Then
HtmlDoc.body.innerHTML = HttpReq.responseText
Set HtmlBtnAgree = HtmlDoc.all(BUTTON_AGREE)
Debug.Print TypeName(HtmlBtnAgree) ' Returns
HTMLInputElement, appears to work

HtmlBtnAgree.Value = True ' Emulate button click
Debug.Print HtmlDoc.body.innerHTML ' <<< STILL RETURNING
DISCLAIMER PAGE

For Each HtmlOpt In HtmlDoc.forms("aspnetForm").Item
(DROPDOWN_RECENTREPORT) ' << FAILS, page hasn't loaded
Debug.Print HtmlOpt.Text
Next HtmlOpt
End If
End Sub
'================================================= ==================
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Importing Drop down list into new page ConfusedKip Excel Discussion (Misc queries) 2 October 23rd 08 11:20 AM
How to create a drop down list with different values excelnovice New Users to Excel 1 June 20th 07 10:54 PM
Drop down list with different values. Honey Excel Worksheet Functions 3 January 14th 07 08:24 PM
Mask Drop Down List values DangerMouse Excel Discussion (Misc queries) 1 June 12th 06 01:05 PM
Clearing the Values in a Drop - Down List Sagu Excel Discussion (Misc queries) 4 March 31st 06 03:32 AM


All times are GMT +1. The time now is 09:39 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"