<% Dim srcFile srcFile = "http://www.historictours.com/trusted-tours/trustedtours.xml" 'Nothing Below Here Has To Change Response.Buffer = True Dim objXMLHTTP, xml ' Create an xmlhttp Object and Get it! Set xml = Server.CreateObject("Microsoft.XMLHTTP") xml.Open "GET", srcFile, False xml.Send 'Write Text to File Response.Write xml.responseText 'set fs=Server.CreateObject("Scripting.FileSystemObject") 'set fname=fs.CreateTextFile("C:\websites\historictours_com\trusted-tours\xml\incoming.xml",true) 'fname.WriteLine(xml.responseText) 'fname.Close Set xml = Nothing 'set fname = Nothing 'set fs = Nothing %>