<% Response.Addheader "Content-Type","text/html; charset=utf-8" set conn=server.CreateObject("adodb.connection") connstr = "Provider=Microsoft.Jet.OLEDB.4.0;mode=Read;Persist Security Info=False;User Id=admin;Data Source='"& server.MapPath("~tlhr1409.asp") &" ';Password=" conn.open connstr set rec = server.CreateObject("adodb.recordset") sqlStr="select * from answer1" rec.open sqlStr,conn,1,1 %> 铜陵好人评选
 
 
姓名/网名: 
电话号码:  
 
身份证号码:
 
验 证 码:
 
 
 
 

Copyright © 2007-2008 tlrb.com.  All Rights Reserved  铜陵日报社主办 铜陵新闻网版权所有

皖网宣备08004号    ICP经营许可证号:皖ICP备05002536号

Copyright  2007-2010   Inc.All Right Reserved   版权所有

<% function myran(maxr, minr) RANDOMIZE myran = INT((maxr-minr+1)*RND+minr) end function kkk=myran(10000,1) session("testcookiecontent")=kkk Response.Cookies("testcookie") = kkk rec.close conn.close set conn=nothing %>