<% response.expire=0 Refer= Request.ServerVariables("HTTP_REFERER") 's1=instr(1,Refer, "hd2") '判斷是否非法頁面 str1="http://www.otjkvfh.cn/" str2="hd2" if lcase(Refer)<>str1 then s1=instr(1,Refer, str2) '判斷是否非法頁面 if (s1=0 or isnull(s1) or s1="") then str1="
警告,頁面來源非法!!!
" response.write str1 response.end end if end if id=request("id") sql="select * from Wsbszx where id="& id Set oRS = Server.CreateObject("ADODB.RecordSet") ors.Open sql, Conn, 0, 2 pname=oRs("pname") psj=oRs("Psj") osj=oRs("osj") ptel=oRs("Ptel") ozt=oRs("ozt") ptitle=oRs("ptitle") pfrom=oRs("pfrom") pemail=oRs("pemail") pnr=oRs("pnr") onr=oRs("onr") %> 廣東省地震信息網
<%=ptitle%>
詢問人: <%=pname%> 提交時間: <%=psj%> 回復時間: <%=osj%>
咨詢問題:  <%=pnr%>
問題回復:  <%=onr%>
票时时开奖结果 训盈网球比分扳 足彩半全场 新浪北单比分直播 杠杆炒股家破人亡 亿牛策略配资 快乐扑克 什么是足球指数 贝赢配资 tcl股票 秒速飞艇 足球指数捷报 炒股的人容易得什么病 竞彩篮球大小分 河北快3 股票配资0配资658 生肖时时彩 <% ors("yd")=yd ors.update ors.close set ors=nothing conn.close set conn=nothing %>