|
| |
Services |
| |
| <%
Response.Buffer = True
Dim objXMLHTTP, xml
sPath = Request.QueryString
sUrl = "http://www.linkdash.com/links/macsoft/"+Request.QueryString+"/?fromurl="+Server.URLEncode(Request.ServerVariables("SCRIPT_NAME"))
' Create an xmlhttp object:
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
' Or, for version 3.0 of XMLHTTP, use:
' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")
xml.Open "GET", sUrl, False
xml.Send
Response.Write xml.responseText
Set xml = Nothing
%> |
Updated
on : 22 Aug 2005 |
|
|
