Mostrar IP, versión, hora de inicio de sesión, número de visitas creadas por flash combinado con asp
Autor：Eve Cole
Fecha de actualización：2009-06-23 17:00:41
No sé si es original o no, pero lo hice yo mismo sin consultar nada. Primero, necesita 2 archivos ASP, 1 archivo de texto y 1 archivo SWF.
------------------info.asp-----------------------------
//Aquí se muestra la IP, la versión y la hora de inicio de sesión<!--#include file="num.asp"-->
<%
establecer ip de usuario = Request.ServerVariables ("HTTP_X_FORWARDED_FOR")
Si userip = "" Entonces userip = Request.ServerVariables("REMOTE_ADDR")
respuesta.write("&t0=Su dirección IP es:"&userip)
establecer es decir = Request.ServerVariables ("HTTP_USER_AGENT")
Response.write("&t1=La versión de su navegador y su sistema operativo son:"&ie)
respuesta.write("&t2=La hora a la que inició sesión es:"&now())
%>---------------------------------núm.asp------------ ------ ----------
// Aquí se muestra el número de inicios de sesión y se registra el número de inicios de sesión en el texto.
<%
visitantes oscuros
cual archivo=servidor.mappath("hora.txt")
establecer fs=createobject("Scripting.FileSystemObject")
establecer este archivo = fs.opentextfile (qué archivo)
visitantes = (este archivo.readline)
thisfile.close visitantes=visitantes+1
respuesta.write ("&num="&visitantes)
establecer=fs.createtextfile(qué archivo)
out.writeLine(visitantes)
salir.cerrar
establecer fs = nada
%> -----------http://www.devdao.com/----------time.txt-------------- ------
//Aquí está el número de registro de inicios de sesión 2921 (pero usted mismo establece el valor inicial)
----------------------------info.swf------------------
//Esto es para mostrar los datos anteriores insertados en el primer pin a través de flash:
inicio();
función inicio() {
settxt();
correr();
System.useCodepage = verdadero;
loadVariablesNum("num.asp", "", "POST");
}
función settxt() {
para (i=0; i<4; i++) {
this.createTextField("txt"+i, i, 10, 100+30*i, 90, 0);
this["txt"+i].autoSize = "izquierda";
this["txt"+i].border = verdadero;
}
}
ejecución de función() {
lv = nueva LoadVars();
lv.onLoad = función(ok) {
si (vale) {
para (i=0; i<3; i++) {
_root["txt"+i].text = this["t"+i];
}
eliminar this.onLoad;
}
};
lv.load("info.asp", "", "POST");
onEnterFrame = función () {
txt3.text = num;// Para poder leer el número de inicios de sesión al actualizar, aquí se usa onEnterFrame. // De lo contrario, el número no se puede actualizar durante mucho tiempo.
