<% if err<>0 then response.write("
無法連接數據庫
") else strlb=request("strlb") %> 小悟空彩金 <% set rs=server.createobject("adodb.recordset") sql = "select name,shijian,id ,yd from dzfagui where jibie like '%"&strlb &"%' order by shijian desc" rs.Open sql,Conn,0,2 if rs.eof and rs.bof then str="沒有紀錄" else dim name,sj,id i=0 do while not rs.eof i=i+1 name=rs("name") sj=rs("shijian") id=int(rs("id")) yd=rs("yd") sj=now() sj1=FormatDateTime(dateadd("d",-98,sj),2) str="" ' response.write id select case id case 69 strurl="http://www.cea.gov.cn/publish/dizhenj/125/234/237/100551/index.html" 'response.write strurl str= ""& name &"("&sj&")" case 70 strurl="http://www.cea.gov.cn/publish/dizhenj/125/234/237/100552/index.html" str= ""& name &"("&sj&")" case 71 strurl="http://www.cea.gov.cn/publish/dizhenj/125/234/237/100553/index.html" str= ""& name &"("&sj&")" case 72 strurl="http://www.cea.gov.cn/publish/dizhenj/125/234/237/100554/index.html" str= ""& name &"("&sj&")" case 73 strurl="http://www.cea.gov.cn/publish/dizhenj/125/234/237/100555/index.html" str= ""& name &"("&sj&")" case else str=""& name &"("&yd&") ("&sj1&")" end select %> <% rs.movenext loop rs.close set rs=nothing conn.close set conn=nothing end if %>
 
<%=str %>
 
小悟空 青海十一选五 山东十一体选五走势 雅休配资 麻将app 信康配资 福州沐足的地方 麻将来了猜猜乐怎么玩 广东十一选五* 欧州a片 江西余干麻将规则 篮球比分直播007 腾讯麻将来了猜猜乐怎么玩麻将来了礼包大全 山东十一选五开奖结果新浪 金点子配资 贵阳红灯区站街女 老11选五5开奖结 <% end if %>