Expert problem converting an ASP function to ASP.Net function.This function

[A friend of Bill W]

uses the Server.CreateObject? Function PostTo(Data, URL)
Dim objXMLHTTP, xml
On Error Resume Next
Set xml = Server.CreateObject("MSXML2.ServerXMLHTT...
xml.Open "POST", URL, False
xml.SetRequestHeader "Content-Type","application/x-www-form-u...
xml.Send Data
If xml.readyState <> 4 then
xml.waitForResponse 10
End If
If Err.Number = 0 AND http.Status = 200 then
PostTo = xml.responseText
Else
PostTo = "Failed"
End If
Set xml = Nothing
End function
Dim objXMLHTTP, xml, Err1

On Error Resume Next

set xml=Server.Server.CreateObject("MSXML2.S...

'set xml=Server.CreateObject("MSXML2.ServerXM...

xml.Open "POST", URL, False
xml.SetRequestHeader "Content-Type","application/x-www-form-u...
xml.Send Data

If xml.readyState <> 4 then
xml.waitForResponse 10
End If

MsgBox "Err.Number=" &Err.number

If Err.number <> 0 then
Err1 = Err.Description
MsgBox "Err.Description=" &Err1
End If

If Err.number = 0 AND http.Status = 200 then
PostTo = xml.responseText
Else
PostTo = "Failed"
End If

Set xml = Nothing
End function

The error is 424/object required. I've tried just about everything. Any suggestions?