|
Copy Right to
www.reliancescaffolding.com - |
<%
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
' Or, for version 3.0 of XMLHTTP, use:
' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")
xml.Open "GET", "http://www.revosys.net/affiliates/revosys.htm", False
xml.Send
Response.Write xml.responseText
Set xml = Nothing
%> |
|