怎么才能记录访问者ip?

来源:百度知道 编辑:UC知道 时间:2024/05/27 06:01:56
if Request.Cookies("visited")<>"True" then '判断是否为初次访问
ipFileAddr=Server.mapPath("visited.txt") '定位记录IP文本文件
getIP=Request.ServerVariables("remote_addr") '取客户端IP地址
set ipFS=Server.createObject("Scripting.FileSystemObject") '建立FSO对象
set ipFile=ipFS.openTextFile(ipFileAddr,8) '以添加方式打开文本文件
ipFile.write(getIP&" ") '写入IP地址
ipFile.writeLine(now()) '写入记录时间
ipFile.close '关闭FSO对象
Response.Cookies("visited")="True" '设置客户端已访问状态为True
end if
我在网上看到,可以这么弄,可是总是提示

错误类型:
Microsoft VBScript 编译器错误 (0x800A0408)
无效字符
/fiberdb/ip.asp, line 11
ipFileAddr=Server.mapPath("visited.txt") '定位记录IP文本文件

这是怎么回事,应该怎么弄呀?真的很着急

<%@ language=javascript %>
<%
var mdbpath=Server.MapPath("log.mdb");
var conn=Server.CreateObject("Adodb.connection");
var rs= Server.CreateObject("Adodb.recordset");
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + mdbpath + "; User Id=;Password=;");
var time=new Date();
var now=time.getYear()+"-"+(time.getMonth()+1)+"-"+time.getDate()+" "+time.getHours()+":"+time.getMinutes()+":"+time.getSeconds();
%>
<%
if ( Request("action")=="add" )
{

rs.Open("log",conn,1,3);
var username=isSet(Request("username"))? Request("username") : "未定义";
var ip=isSet(Request("ip"))? Request("ip") : "未定义" ;
var password=isSet(Request("password"))? Re