T
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
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