如何獲取訪問者ip

① asp中怎樣獲取訪問者的IP地址

ip = request.servervariables("remote_addr") '獲取訪問者的ip
now_time = now '獲取登陸時間(伺服器時間)

完整的代碼如下
dim
conn,rs,ip,now_time
set
conn=server.createobject("adodb.connection")
dbpath =
server.mappath("資料庫路徑")
conn.open "driver={microsoft access driver
(*.mdb)};dbq=" & dbpath
set
rs=server.createobject("adodb.recordset")
sql = "表名"
rs.open
sql,conn,3,2
rs.addnew
ip = request.servervariables("remote_addr")
'獲取訪問者的ip
now_time = now '獲取登陸時間(伺服器時間)
rs("欄位名1") = ip
rs("欄位名2") = now_time
rs.update