XMLHTTP

[Tom]

Hello,

I'm a newbie and have no experience with XMLHTTP. I found the following
script on the net which works fine:

Sub GetHTTPData()
Dim sURL As String, sHTML As String
Dim oHttp As Object

sURL = "http://www.blabla.com"

On Error Resume Next
Set oHttp = CreateObject("MSXML2.XMLHTTP")
If Err.Number <> 0 Then
Set oHttp = CreateObject("MSXML.XMLHTTPRequest")
MsgBox "Error 0 has occured while creating a MSXML.XMLHTTPRequest
object"
End If
On Error GoTo 0
If oHttp Is Nothing Then
MsgBox "For some reason I wasn't able to make a MSXML2.XMLHTTP object"
Exit Sub
End If

'Open the URL in browser object
oHttp.Open "GET", sURL, False
oHttp.Send
sHTML = oHttp.responseText
End Sub

But what I really want is to logon to a secure server. Does anybody know how
I need to enter the logon information? An example would be appreciated.

Regards,
Tom

 

[JP]

I use XMLHTTP as a one-way method to get information from the web. You
might need to automate Internet Explorer instead.

See http://www.codeforexcelandoutlook.com/excel-vba/automate-internet-explorer/
for sample code.

--JP

 

[Tom]

Hello JP,

Thank you for the answer. I followed your link and tried to work with the
shown example but I'm not able to create a reference to the "Microsoft
Internet Controls (shdocvw.dll)" library.

Tom




I use XMLHTTP as a one-way method to get information from the web. You
might need to automate Internet Explorer instead.

See
http://www.codeforexcelandoutlook.com/excel-vba/automate-internet-explorer/
for sample code.

--JP

 

[JP]

You'll have to browse for it. In the VBA IDE, Go to Tools >
References, click Browse and go to your local system32 folder.

Or you could declare the reference As Object and use CreateObject
("InternetExplorer.Application") instead.

--JP

 

[Tim Williams]

http://msdn.microsoft.com/en-us/library/ms757849(VS.85).aspx

Try the username/passowrd parameters in the Open method.

Tim