---
title: "Asptear"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/44208-asptear"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "pirro"
published: "2002-05-21T13:08:41.000Z"
updated: "2002-05-21T13:08:41.000Z"
replies: 0
views: 223
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/44208-asptear"
---

# Asptear

## #1 — pirro, 2002-05-21T13:08Z

VArför timas jag av med min asptear? har installerat gratis ver.... 

```
[red]
<%
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 "<b>"
    If Err.Number >= 400 Then
        Response.Write "Server returned error: " & Err.Number
    Else
        Response.Write "Component/WinInet error: " & Err.Description
    End If
    Response.Write "</b>"
    Response.End
End If

Response.Write strRetval
%>
[/red]
```

Permalänk: https://www.webforum.nu/p/44208

---

Tråden på webben: https://www.webforum.nu/amne/asp/44208-asptear