Matt,
This is cut out of a much larger routine, but should point you in a possible
direction. It doesn't go anywhere near IE.
'set a project reference to ms xml 4, preferably with service packs
installed
Sub XMLPostToWebPage()
Dim oXML As MSXML2.XMLHTTP40
Dim strIp as string, strPost As String
Set oXML = New MSXML2.XMLHTTP40
strIP =
http://nnn.nnn.nnn.nnn/ ' or a web address
strPost = strIP & "index.html" 'change to your web page
'if the page takes parameters, add them here in the same way I have added
the dummy var below,
'and change the question mark before dummy to an ampersand
'append a dummy var to make sure the page refreshes
Randomize
strPost = strPost & "?Dummy=" & CInt(1000 * Rnd())
With oXML
.Open "POST", strPost, False
.send
If .Status < 200 Then
Call MsgBox("An error occured. " & _
"The error messages received we " & vbcrlf & vbcrlf & _
.responseText, vbInformation, msgTitle)
End If
End With
Set oXML = Nothing
End Sub
Robin Hammond
www.enhanceddatasystems.com
"matpj" wrote in
message ...
I need to run a URL usnig VBA (this in turn runs a Lotus Notes Agent).
This needs to happen in the back ground if possible, without displaying
Internet Explorer - or at least keeping IE in the background and then
closing it once run)
can anybody advise?
thanks in advance,
Matt
--
matpj
------------------------------------------------------------------------
matpj's Profile:
http://www.excelforum.com/member.php...o&userid=21076
View this thread: http://www.excelforum.com/showthread...hreadid=510508