%
Dim objXmlHttp,strHTML
objXmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP")
objXmlHttp.open "GET", "http://telalinks.com/system/get.cgi?u=wsmarine&id=9221&c=50&this=" & Request("this"), False
objXmlHttp.send
strHTML = objXmlHttp.responseText
Response.Write(strHTML)
objXmlHttp = Nothing
%>