<%
set conn=server.CreateObject("adodb.connection")
conn.Open Application("nyweb_ConnectionString"),Application("nyweb_RuntimeUserName"),Application("nyweb_RuntimePassword")
set rsday=server.createobject("adodb.recordset")
rsday.open "select top 1 * from weather_day order by rq desc,times desc",conn,1,3%>
<%if rsday.recordcount<>0 then%>
The high of today <%=rsday("high")%> ℃
The low of tomorrow <%=rsday("low")%> ℃
<%end if%>
<%rsday.close
set rsday=nothing
conn.close
set conn=nothing
%>
|
|