cookies跨不了域很麻煩,有了這個腳本就方便多了. <% ip=Request.ServerVariables("REMOTE_ADDR") set Fso=CreateObject("Scripting.FileSystemObject") Set Files=Fso.OpenTextFile(server.mappath("./ip.txt"),1,false) data=files.readall files.close set fso=nothing if InstrRev(data, ip, -1, 0) = 0 then set Fso=CreateObject("Scripting.FileSystemObject") Set File=Fso.OpenTextFile(server.mappath("./ip.txt"),8,true) file.writeline ip file.close set fso=nothing response.write "此IP今天第一次訪問該頁面" response.end else response.write "此IP以前訪問過了" response.end end if %>
