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