1: 
2: 
3: 
4: 
5: 
6: 
7: 
8: 
9: 
10: 
11: 
12:

<% 
Const Request_GET = 2 
Set TearObj = Server.CreateObject("SOFTWING.ASPtear") 
strResult = TearObj.Retrieve("http://62.27.49.73/engine/lose/lose_trans.php?id=[id]&lpasswd=[pwd]&type=alles&limit=5", Request_GET, "", "", "") 
response.write "<table border=1><tr><td>" 
strResult = Replace(strResult,"|","</td><td>") 
strResult = Replace(strResult,chr(10),"</td></tr><tr><td>") 
response.write strResult 
response.write "</tr></table>" 
Set TearObj= Nothing 
%>