Anzeige von IP, Version, Anmeldezeit, Anzahl der durch Flash in Kombination mit ASP erstellten Besuche
Autor：Eve Cole
Aktualisierungszeit：2009-06-23 17:00:41
Ich weiß nicht, ob es original ist oder nicht, aber ich habe es selbst gemacht, ohne mich auf irgendetwas zu beziehen. Zunächst benötigen Sie 2 ASP-Dateien, 1 Textdatei und 1 SWF-Datei.
----info.asp--------------
//Hier wird IP, Version und Anmeldezeit angezeigt<!--#include file="num.asp"-->
<%
set userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
Wenn userip = "", dann userip = Request.ServerVariables("REMOTE_ADDR")
Response.write("&t0=Ihre IP-Adresse ist:"&userip)
set ie=Request.ServerVariables("HTTP_USER_AGENT")
Response.write("&t1=Ihre Browserversion und Ihr Betriebssystem sind:"&ie)
Response.write("&t2=Die Zeit, zu der Sie sich angemeldet haben:"&now())
%>---------------------------------num.asp------------ ------ ----------
// Hier wird die Anzahl der Anmeldungen angezeigt und die Anzahl der Anmeldungen im Text aufgezeichnet.
<%
düstere Besucher
whichfile=server.mappath("time.txt")
set fs=createobject("Scripting.FileSystemObject")
setze thisfile=fs.opentextfile(whichfile)
Besucher=(thisfile.readline)
thisfile.close Visitors=Besucher+1
Response.write ("&num="&visitors)
set out=fs.createtextfile(whichfile)
out.writeLine(Besucher)
aus.schließen
setze fs=nichts
%> -----------http://www.devdao.com/----------time.txt-------------- ------
//Hier ist die Rekordzahl der Anmeldungen 2921 (aber Sie legen den Anfangswert selbst fest)
-------------info.swf-----------------
//Hiermit werden die oben genannten Daten angezeigt, die über Flash in den ersten Pin eingefügt wurden:
init();
Funktion init() {
settxt();
laufen();
System.useCodepage = true;
loadVariablesNum("num.asp", "", "POST");
}
Funktion settxt() {
für (i=0; i<4; i++) {
this.createTextField("txt"+i, i, 10, 100+30*i, 90, 0);
this["txt"+i].autoSize = "left";
this["txt"+i].border = true;
}
}
Funktion run() {
lv = new LoadVars();
lv.onLoad = function(ok) {
wenn (ok) {
für (i=0; i<3; i++) {
_root["txt"+i].text = this["t"+i];
}
lösche this.onLoad;
}
};
lv.load("info.asp", "", "POST");
onEnterFrame = function () {
txt3.text = num;//Um die Anzahl der Anmeldungen beim Aktualisieren ablesen zu können, wird hier onEnterFrame verwendet. //Ansonsten kann ich die Anzahl nicht aktualisieren.
