如何在网页中添加最近浏览网页的IP和时间的代码?

ip = Request.ServerVariables("REMOTE_ADDR") '获取访问者的IPnow_time = now '获取登陆时间(服务器时间)完整的代码如下dim conn,rs,ip,now_timeset conn=Server.CREATEOBJECT("ADODB.CONNECTION")DBPath = Server.MapPath("数据库路径")conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPathset rs=server.CreateObject("adodb.recordset")sql = "表名"rs.open sql,conn,3,2rs.addnewip = Request.ServerVariables("REMOTE_ADDR") '获取访问者的IPnow_time = now '获取登陆时间(服务器时间)rs("字段名1") = iprs("字段名2") = now_timers.update

添加

相关文章

发表评论 取消回复

电子邮件地址不会被公开。 必填项已用*标注