<% 'the Currency Exchange Calculator asp code On Error Resume Next rqst=Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("PATH_INFO") url="http://www.onyoursite.com/data/cxc.htp?rqst="&rqst set Http = server.CreateObject("Msxml2.ServerXMLHTTP.3.0") Http.Open "GET", url, False Http.Send Dim cxc cxc = Http.responseText response.write (cxc) Set Http = nothing %>