<% dim LMURL, xml dim UID UID = 1251 if Request("page") <> "" then LMURL = "http://www.linksengineer.com/LEngineer.aspx?UID=" & UID & "&Page=" & Request("page") else LMURL = "http://www.linksengineer.com/LEngineer.aspx?UID=" & UID end if if Request("PageNumber") <> "" then LMURL = LMURL + "&PageNumber=" & Request("PageNumber") end if Set xml = Server.CreateObject("Microsoft.XMLHTTP") xml.Open "post", LMURL, False xml.Send ResponsePage = xml.responseText Response.write (ResponsePage) Set xml = Nothing %>