<% Const Request_POST = 1 Const Request_GET = 2 Set xobj = CreateObject("SOFTWING.ASPtear") Response.ContentType = "text/html" On Error Resume Next ' URL, action, payload, username, password strRetval = xobj.Retrieve("http://194.8.136.102/iisdev/asptear/formpost.asp", Request_POST, "test=wille", "", "") If Err.Number <> 0 Then Response.Write "" If Err.Number >= 400 Then Response.Write "Server returned error: " & Err.Number Else Response.Write "Component/WinInet error: " & Err.Description End If Response.Write "" Response.End End If Response.Write strRetval %>