<html><head><meta http-equiv="Content-Type" content="text/htmlcharset=gb2312"><title>JavaScript获取客户端IP</title></head><body><script type="text/javascript" language="javascript"><!--function GetLocalIPAddress(){var obj = null var rslt = "" try{obj = new ActiveXObject("rcbdyctl.Setting") rslt = obj.GetIPAddress obj = null }catch(e){//异常发生}return rslt}document.write("你的IP是：" + GetLocalIPAddress())//--></script></body></html>在使用中可能会出现类似下图的警告，点击“是”，就可以运行了，也可以在【Internet 选项】中【安全】->【ActiveX
控件和插件】->【对没有标记为安全的 ActiveX 控件进行初始化和脚本运行】设置为【启用】，就不会
d出对话框了。有时候测试时因代码出错既不d出对话框，也不显示 IP，更正代码后也是一样的情况，这时你需要重新打开 IE 进行测试，在实际使用中，不会出现类似情况。用char()类型，因为IP地址基本定长，如114.114.114.114，为15个
字符，最少也是如8.8.8.8，为7个字符，但非常少用这样的IP，一般过都是12-15个字符长度，用varchar()变长类型的话会因此减慢数据库速度access中记录用户ip的方法：
'获取访问者的IP
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
set rs=server.CreateObject("adodb.recordset")
sql = "select * from xiaoyewl_yzm where yzip='"&ip&"' and DATEDIFF('d',now(),sj)=0" '先查询数据库里有没有
rs.open sql,conn,3,2
if rs.eof or rs.bof then '数据库无当天IP则写入
rs.addnew
now_time = now '获取登陆时间(服务器时间)
rs("yzip") = ""&ip&""
rs("yzcs") = 1
rs("sj") = now_time
rs.update
end if
rs.close
微信扫一扫
支付宝扫一扫
评论列表（0条）