Use ASP para criar um arquivo de log. você o site logfile.asp escreve automaticamente suas informações para logfile.txt, se o URL relacionado for o mesmo, não será gravado no arquivo
Arquivo: logfile.asp
O código é o seguinte:
<%
Variável de log da Dim Validentry
'Primeiro set que este log é válido
Validentry = Verdadeiro
'Se o login da variável de sessão não estiver vazio
'Isso significa que essa pessoa já foi registrada
'Então defina valor como false
Se não estiver sendo mpty (sessão (login)) então value = false
'Aqui você pode adicionar restrições diferentes
'Se o URL de referência for do mesmo site
'Não escreva no arquivo de log
Se deixado (request.servervariables (http_referr), 17)
= http://jzxue.com então
Validentry = Falso
Final se
Se deixado (request.servervariables (http_referr), 21)
= http://www.vevb.com Então
Validentry = Falso
Final se
'Agora, se Validentry for verdadeiro, digite o arquivo de log
Se Validentry então
Const forming = 8
Const Create = true
Dim FSO
Dim ts
Dim MyFileName
Dim Strlog
MyFileName = server.mappath (myLogfile.txt)
Set fso = server.createObject (script.filesystemoBject)
Definir ts = fso.opentExtFile (myFileName, forappender, criar)
'Armazene todo o valor necessário em strlog
strlog = <br> <p> <b> & agora & </b>
Strlog = strlog & request.Servervariables (remote_addr) &
Strlog = strlog & request.Servervariables (http_referr) &
Strlog = strlog & request.Servervariables (http_user_agent) & <br>
'Escreva informações atuais para registrar o arquivo de texto.
Ts.Write strlog
Ts.WriteLine
'Crie uma varial de sessão para verificar na próxima vez para avaliar
Sessão (login) = sim
Defina ts = nada
Definir FSO = nada
Final se
%>