Question

ASP获取用户ip并写入数据库-请人帮忙急！！！

我在网上找到一段读取当前用户IP地址并写入数据库的代码，如下：
<%Dim IP
IP=Request.ServerVariables("REMOTE_ADDR")
set rst=Server.CreateObject("ADODB.recordset")
set rst=conn.Execute("insert into ProductTable (ip) values ('"&IP&"')")%>
插入我的一个表单网页后 可以读取IP 但是写入数据库的时候在数据库里出现了两行数据 ：第一行只有“IP”字段有提取的IP地址，其余单元格全是空的；第二行表单提交的数据全有 但是“IP”字段是空的。
请高手帮忙看看该怎么放这个读取IP地址的代码，或者怎么修改？
我的ASP网页文件：http://www.huantai315.cn/IP.txt

问题解决可追加积分

Answer 1

<%Dim IP
IP=Request.ServerVariables("REMOTE_ADDR")
conn.Execute("insert into ProductTable (ip) values ("&IP&")")%>
你检查一下字段IP是什么数据类型，如果是文本或备注就用('"&IP&"')如果是数字，在插入的时候就要把单引号去掉，即("&IP&")
set rst=Server.CreateObject("ADODB.recordset") 这句去掉，execute方式不用这句

Answer 2

set rst=conn.Execute("insert into ProductTable (ip) values ('"&IP&"')")%>
你这行语句执行后就插入了一条记录，除了IP字段有值，其他字段都是NULL，那是肯定的。
你需要把网页上表单提交的数据与获取到的IP同时用一条语句来插入
如：dim sql
sql="insert into ProductTable (aa,bb,cc,dd,ip) values ('aa','bb','cc','dd','"&IP&"')"
conn.execute(sql)

Answer 3

<%
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then
userip = Request.ServerVariables("REMOTE_ADDR")
end if
%>
<%conn.execute("insert into ProductTable(ip) values('"&userip&"')")%>