Code to capture user IP address and date & put into SQL Server database

[melrose99]

Hello, I would like to know how to capture user IP addresses and then put them into a SQL Server database. Can someone help me.

[schizo]

Something like this...


<%
... Connection info

Dim userIP, sql

userIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")

If userIP = "" Then
userIP = Request.ServerVariables("REMOTE_ADDR")
End If

sql = "INSERT INTO tbl_users (userIP, userDateTime) VALUES "
sql = sql & "('" & userIP & "', '" & now & "')"

Conn.Execute(sql)
%>

[melrose99]

Thank you so much.