|
Okweyo is daily closer to being a reality. Read about our
partners at IHoM below.
Do You Skype? Use it to call me!
|
<%
'Timeandweather for Uganda asp code
On Error Resume Next
rqst=Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("PATH_INFO")
url="http://www.timeandweather.com/data/wx.htp?code=afuga&rqst="&rqst
set Http = server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
Http.Open "GET", url, False
Http.Send
Dim wxafuga
wxafuga = Http.responseText
response.write (wxafuga)
Set Http = nothing
%>
<%
'Timeandweather for Uganda asp code
On Error Resume Next
rqst=Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("PATH_INFO")
url="http://www.timeandweather.com/data/wx.htp?code=afuga&rqst="&rqst
set Http = server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
Http.Open "GET", url, False
Http.Send
Dim wxafuga
wxafuga = Http.responseText
response.write (wxafuga)
Set Http = nothing
%><%
'Timeandweather for Uganda asp code
On Error Resume Next
rqst=Request.ServerVariables("HTTP_HOST")&Request.ServerVariables("PATH_INFO")
url="http://www.timeandweather.com/data/wx.htp?code=afuga&rqst="&rqst
set Http = server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
Http.Open "GET", url, False
Http.Send
Dim wxafuga
wxafuga = Http.responseText
response.write (wxafuga)
Set Http = nothing
%>
|