<% ptype=request("p") if isnull(request("p")) or request("p")="" then ptype=2 select case ptype case 1 px="hd2.jpg" case 2 px="hd3.jpg" case 3 px="hd4.jpg" end select %> 北京pk10计划软件三码
領導信箱
投訴建議
 


<% Set oRS = Server.CreateObject("ADODB.RecordSet") dim azxozt(2) azxozt(2)=array("未答復","已答復") sSql = "SELECT * FROM Wsbszx where ptype="& ptype&" and ozt<>1 ORDER BY Psj desc " oRs.Open sSql, Conn, 0, 2 i=0 if ors.eof and ors.bof then else do while not ors.eof i=i+1 id=ors("id") pname=oRs("pname") psj=oRs("Psj") osj=oRs("osj") ptel=oRs("Ptel") ozt=oRs("ozt") ptitle=oRs("ptitle") pfrom=oRs("pfrom") pemail=oRs("pemail") if (ozt="" or isnull(ozt)) then ozt=1 sozt=azxozt(2)(ozt-1) if ozt=1 then sozt=""&sozt&"" strxg=""& ptitle &"" spsj=FormatDateTime(psj,2) sosj=FormatDateTime(osj,2) %> <% ors.movenext loop end if %>

序號

標題
回復時間
詢問人

<%=i%>

<%=strxg%> <%=sosj%> <%=pname%>
 

新建內容


 
北京pk10开奖网址平安 重庆快乐10分开奖结果 玩彩票 什么样的倍投最好 星力正版捕鱼平台 体育彩票11选5助手 凤凰彩票带计划的app 宝来娱乐怎么找不到了 分分彩人工计划软件手机版 买时时彩怎样稳赚 排列三走势图体彩 经典单机麻将免费下载 开心农场2破解版 赌大小只赢不输方法