Recomendado: ASP evita Get, Post Inyection and Server Attacks, y Registros IP % 'Prevenir, después de la inyección y el ataque del servidor' para incluir este archivo en el archivo que debe tenerse en cuenta, por lo tanto, tenga en cuenta que los ataques posteriores y los ataques aquí no son necesariamente ataques. Preste atención a usarlos en la versión en inglés 'feng xu modificado session.abandon () dim fxjt111_attack_post, fxjt111_attack_get, fxjt111_attack_sys
Debido a las relaciones de trabajo, estamos trabajando en un espacio de usuario. Para usar los visitantes más recientes del espacio, consulte el código ASP:
<%
nombre de usuario = request.queryString (nombre de usuario) 'El nombre de usuario en la columna de tierra es su nombre de usuario
Si TRIM (request.cookies (user_name)) <> entonces 'La página de inicio debe determinar si el acceso está iniciado, solo se registra en la base de datos.
Si el nombre de usuario <> request.cookies (user_name), entonces 'simplemente determine si el visitante es él mismo
F_USERNAME = TRIM (request.cookies (user_name)) 'Se accede al nombre de usuario
f_time = ahora ()
Llamar al visitante () 'Función de consumo de llamadas
final si
final si
Sub visitante ()
'Autor: Fuente despiadada:
sqlvisitor = (seleccione Top 1 * del visitante donde (username = '& username &') y (f_username = '& f_username &'))
Establecer rsvisitor = server.createObject (ADODB.RecordSet)
RSVISITOR.OPEN SQLVISITOR, CONN, 1,1
Si no (RSVISITER.EOF y RSVISITER.BOF), entonces "simplemente determine si existe una base de datos. Si hay un tiempo de actualización, inserte el nombre de usuario y la época del visitante en el año
conn.execute (actualizar el conjunto de visitantes f_time = '& ahora () &' where (username = '& username &') y (f_username = '& f_username &'))
Demás
conn.execute (insertar en valores de visitante (nombre de usuario, f_username, f_time) ('& username &', '& f_username &', '& f_time &'))
final si
rsvisitor.close ()
Establecer RSVISITOR = nada
Final
%>
Luego llamo al último acceso en el espacio y se omite el código.
Compartir: ASP reemplaza el último bit de dirección IP con el código de instancia de Asterisk Primero guarde la dirección IP en la base de datos y luego sácala. El efecto es como se muestra en la figura: el código es el siguiente: % 'fuente IPSTR = RS (CIP) IPSTR = Split (IPSTR,.,-1,1) IPSTROUT = IPSTR (0) .IPSTR (1) .ipStr (2).* Respuesta.Write IPSTROUT %