Recomendado: ASP evita ataques, pós -injeção e ataques de servidor e registros IP % 'Prevenir o método de get, pós -injeção e ataque de servidor' para incluir esse arquivo no arquivo que precisa ser observado; portanto, observe que os ataques de postagem e recebem ataques aqui não são necessariamente ataques. Por favor, preste atenção ao uso da versão em inglês 'feng xu modificada session.abandon () dim fxjt111_attack_post, fxjt111_attack_get, fxjt111_attack_sysys
Devido a relações de trabalho, estamos trabalhando em um espaço do usuário. Para usar os visitantes mais recentes do espaço, consulte o código ASP:
<%
nome de usuário = request.QueryString (nome de usuário) 'O nome de usuário na coluna do solo é o seu nome de usuário
Se TRIM (request.cookies (user_name)) <> então 'a página inicial precisar determinar se o acesso está conectado, apenas o logado pode ser gravado no banco de dados.
Se o nome de usuário <> request.cookies (user_name) então 'basta determinar se o visitante é ele mesmo
f_username = Trim (request.cookies (user_name)) 'Acesse o nome de usuário acessado
f_time = agora ()
Call visitante () 'Função acessada
final se
final se
Sub visitante ()
'Autor: Fonte implacável:
sqlvisitor = (selecione TOP 1 * no visitante onde (nome de usuário = 'e nome de usuário &') e (f_username = '& f_username &'))
Set rsvisitor = server.createObject (adodb.recordset)
rsvisitor.open sqlvisitor, Conn, 1,1
Caso contrário, (rsvisitor.eof e rsvisitor.bof), então determine se existe um banco de dados. Se houver um tempo de atualização, insira o nome de usuário e a hora do visitante no ano
Conn.Execute (atualização do conjunto de visitantes f_time = '& agora () &' where (userName = '& username &') e (f_username = '& f_username &')))
Outro
Conn.Execute (inserir no visitante (nome de usuário, f_username, f_time) valores ('& username &', '& f_username &', '& f_time &')))
final se
rsvisitor.close ()
Definir rsvisitor = nada
Final sub
%>
Então eu chamo o acesso mais recente no espaço e o código é omitido.
Compartilhar: ASP substitui o último bit de endereço IP pelo código da instância do asterisco Primeiro, salve o endereço IP no banco de dados e depois retire -o. O efeito é como mostrado na figura: o código é o seguinte: % 'fonte ipstr = rs (cip) ipstr = split (ipstr ,.,-1,1) ipstrot = ipstr (0) .ipstr (1) .IPSTR (2).* Response.Write ipstrot %