<% if err<>0 then response.write("
數據連接錯誤
") else %> 江苏快3计划qq群
<%call wdim2()%>

地震快報

<% set rs=server.createobject("adodb.recordset") sql = "select top 12 * from dzkuaibao order by shijian desc" rs.Open sql, Conn, 0, 2 if not rs.eof or not rs.bof then i=0 do while not rs.eof i=i+1 qi=rs("qi") id=rs("id") nian=rs("nian") kbfile=rs("kbfile") kbfsize=rs("kbfilesize") kbfsize=FormatNumber(kbfsize/1024,2,-1) &" kb" ksj=FormatDateTime(rs("shijian"),2) strqi=nian&"年"&qi kyd=rs("yd") dname=""& strqi &" " %> <% rs.movenext loop else strkb="無快報文件" %> <% end if rs.close %>
快報:
<%=dname%> 時間:<%=ksj%> 大小:<%=kbfsize%> 下載:<%=kyd%>
 
  <%=strkb%>

<% dim yearint yearint=year(now) yearint=2018 y1=yearint-5 for i=yearint to y1 step -1 stryear=""& i &"年地震快報 " %> <%next%>
地震快報下載
<%response.write stryear%>
 


北京pk10开奖网址平安 棋牌天地? 广东南粤风采最新3 我要篮球即时比分 今天那些股票下跌 体彩湖南幸运赛车 北京麻将124怎么算钱 游戏美女捕鱼 和姚记差不多的棋牌app 好运彩票app官方版 3d定胆最准的方法 分分彩 华东15选5近30开奖结果查询 <% end if set rs=nothing set rs0=nothing conn.close set conn=nothing %>