本篇文章主要介绍了"用ASP创建网站日志文件",对于ASPjrs看球网直播吧_低调看直播体育app软件下载_低调看体育直播感兴趣的同学可以参考一下:
创建网站日志文件可以让你知道什么人访问过你的站点,什么时间,ip地址等等信息。下面使用一个例子来向大家来阐述一下。
先创建一个log.asp文件,功能是让用户的信息写入到一个log.txt文本文件中,然后语句放在网站的正常asp页面的顶端或底端。log.asp中的代码如下:
File: LogFile.asp
<%
Dim
ValidPara ' 日志参数
' 设置参数为true
ValidPara = True
'判断
Session("LogIn")是否为空,如果不为空,日志参数设置为fals,表示已经写过日志
If not IsEmpty(Session("LogIn")) then
ValidPara = False
'这里可以做一些限制,如果是同一个网站进来的,可以不写日志
If Left(Request.ServerVariables("HTTP_REFERER"), 17)="http://codes51.com" Then
ValidPara = False
End if
If Left(Request.ServerVariables("HTTP_REFERER"), 21)="http://www.codes51.com" Then
ValidPara = False
End If
' 如果
ValidPara为true,则进入写日志
If
ValidPara Then
Const ForAppending = 8
Const Create = true
Dim fso
DIM TS
DIM MyFileName
Dim strLog
MyFileName = Server.MapPath("LogFile.txt")
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set TS = FSO.OpenTextFile(MyFileName, ForAppending, Create)
'保存相关值
strLog = "
" & now & " "
strLog = strLog & Request.ServerVariables("REMOTE_ADDR") & " "
strLog = strLog & Request.ServerVariables("HTTP_REFERER") & " "
strLog = strLog & Request.ServerVariables("HTTP_USER_AGENT") & "
"
' 写入到日志文件
TS.write strLog
TS.Writeline ""
Session("LogIn") = "yes"
Set TS = Nothing
Set FSO = Nothing
End If
%>
以上就介绍了用ASP创建网站日志文件,包括了方面的内容,希望对ASPjrs看球网直播吧_低调看直播体育app软件下载_低调看体育直播有兴趣的朋友有所帮助。
本文网址链接:http://www.codes51.com/article/detail_314.html