<%
p=Left(Replace(p&"",",",""),howlong)
uname=server.htmlencode(request("uname")&"")
tel=server.htmlencode(request("tel")&"")
bAddr=server.htmlencode(request("bAddr")&"")
uAddr=server.htmlencode(request("uAddr")&"")
Set rs=server.CreateObject("adodb.recordset")
rs.open "select * from s_log where p='"&p&"'",conn,1,3
If Not rs.eof Then
p=Rs("p")
uname=Rs("uname")
tel=rs("tel")
bAddr=rs("bAddr")
uAddr=rs("uAddr")
End If
rs.close
%>
<%if p <> "" then%>
您查詢的防偽碼為：
<%=p%>
<%if myfind = false then%>
該防偽碼不存在或被查詢次數過多，請謹防假冒!
<%elseif times=0 then%>
恭喜，您查詢商品的是原裝正品
商品信息如下： <%=pinpai%>
<%=conn.execute("select MyClassName from Class where ClassName='"&pinpai&"'")(0)%>
<%else%>
已被查詢過<%=times%>次，請謹防假冒!最后一次查詢<%=cxtime%>
姓名:<%=uname%>
電話:<%=tel%>
購買地:<%=baddr%>
使用地:<%=uaddr%>
<%end if%>
<%end if%>
主站蜘蛛池模板：
饶河县|
淮阳县|
新化县|
宝坻区|
齐河县|
祁东县|
湟源县|
嘉荫县|
工布江达县|
屯门区|
金乡县|
拜泉县|
吉林省|
娄底市|
新野县|
高陵县|
宣恩县|
天柱县|
海兴县|
镇沅|
唐山市|
武威市|
清涧县|
达州市|
邵东县|
高清|
溧水县|
收藏|
丰台区|
分宜县|
平塘县|
克拉玛依市|
讷河市|
遵化市|
碌曲县|
富源县|
淅川县|
灵台县|
嘉善县|
黑山县|
叙永县|