<%
Session.Timeout = 500
if Session("txdc")="" then
'' Session("txdc") = "counted"
jldb="jialidata/tangxiao816.mdb"
connstr="driver={microsoft access driver (*.mdb)};dbq="&server.mappath(jldb)
set conn=server.createobject("adodb.connection")
conn.open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from visitdetail",conn,1,3
usrip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
if usrip = "" then
usrip = Request.ServerVariables("REMOTE_ADDR")
end if
rs.addnew
rs("地址")=usrip
