capture URL after POST

[p3plyr]

i am working with this code (a sample)

Public objHTTP  As New MSXML.XMLHttpRequest
Private Sub example()

Dim strWebPage As String
strWebPage = "http://anysite.com"
objHTTP.Open "POST", strWebPage, False
objHTTP.setRequestHeader "Connection", "Keep-Alive"
objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
submurl = "siteId=&uname=hello&pwd=there"
objHTTP.send submurl

Do While objHTTP.readyState <> 4
DoEvents
Loop

End Sub

anyone know the code for this?

thanks