Empfohlen: ASP -Instanz -Lernen: Funktion, die zufällig Dateinamen generiert Das Folgende ist der zitierte Inhalt: <html> <meta http-äquiv = aktualisieren content = 2> <!-platzieren Sie diese
Active Server Pager (Dynamic Server Homepage, als ASP bezeichnet) kann die Seitenzählerfunktion durch Lesen und Schreiben von Serverdateien, die Kombination von Skriptsprachen (VBScript oder JScript) und HTML -Code problemlos realisieren. Die beliebten ASP -Lehrbücher und ASP -Tutorials im Internet haben über die Designprobleme von ASP -Zählern gesprochen, aber sie sind allzu einfach, z. Im Folgenden finden Sie die Erfahrung des Autors beim Erstellen von NT -Websites für Einheiten und geben Beispiele für die Gestaltung von ASP -Zähler Schritt für Schritt. Ich hoffe, dass es Anfängern von ASP und Internetnutzern, die an ASP -Webprogrammen interessiert sind, inspirieren können.
(I) Einfacher Zähler
ASP enthält fünf integrierte aktive Serverkomponenten, nämlich Datenbankzugriffskomponente, Dateizugriffskomponente, AD-Rotatorkomponente, Komponenten der Brower-Funktionen und die Komponente des Inhaltsverbindens. Der unten entworfene Zähler ist das Lesen und Schreiben von Serverdateien über die Dateizugriffskomponente (Dateizugriffskomponente). Die Idee der Algorithmus lautet: Verwenden Sie auf dem Server eine Textdatei (Text), um gezählte Werte zu speichern. Wenn auf die Seite zugegriffen wird, wird der Wert aus der Datei ausgelesen, dem Benutzer angezeigt, und der Wert wird durch 1 hinzugefügt und der Mehrwert wird in die Datei zurückgeschrieben.
Die ASP -Anweisung und Beschreibung zum Schreiben von Daten in eine Serverzähldatei sind wie folgt:
CounFile = server.mappath (der Dateiname zum Speichern des Zählerwerts)
Die Server -Server -Zugriffsmethode Mappath (Path) konvertiert den Pfad, in dem die Datei, die den Zählerwert speichert, in einen physischen Pfad befindet.
Set FileObject = server.createObject (scripting.filesystemObject)
Verwenden
Setzen Sie überstream = server.createTextFile (FileObject, True, False)
Verwenden Sie das Object FilesystemSystemObject, um die Methode createTextFile anzugeben, um eine Textdatei zu generieren, wobei der Parameter True bedeutet, die Originaldatei zu überschreiben, und falsch bedeutet, dass die Datei vom Typ ASCII vom Typ ist
Überstream.WriteLine -Daten zu schreiben
Outstream.WriteLine schreibt eine Datenzeile in die Datei
Die ASP -Syntax zum Lesen von Daten aus einer Serverdatei lautet wie folgt:
CounFile = server.mappath (der Dateiname zum Speichern des Zählerwerts)
Set FileObject = server.createObject (scripting.filesystemObject)
Setzen
Verwenden Sie das Object FilesystemSystemObject, um die Methode OpenTextFile bereitzustellen, um Text zu generieren? Wenn der Parameter true bedeutet, die Originaldatei zu überschreiben, bedeutet FALSE, dass die Datei ASCII -Typ zum Lesen von Data = instrenm.readline ist, wobei instrenm.readline eine Datenzeile aus der Datei gelesen wird.
Das Folgende ist ein Beispiel für einen Zähler, der ASP zum Implementieren der Seitenzählerfunktion (SimpleCounter.asp) verwendet. Ich habe die Aussage im Code ausführlich kommentiert. Sie können den folgenden Code in den Seitencode einfügen, den Sie zählen müssen. Natürlich muss Ihr Server ASP unterstützen, und Sie haben eine Textdatei SimpleCounter.txt mit Inhalt 0 im Verzeichnis erstellt, in dem sich die Startseite befindet.
Einfache ASP -Zähler simplecounter.asp Code und Kommentare:
| Das Folgende ist der zitierte Inhalt: $#@60;% CountFile = server.mappath (simimatecounter.txt) Die Datei Aspconter.txt ist eine Textdatei, mit der Nummern gespeichert werden. Der anfängliche Inhalt beträgt im Allgemeinen 0. Set FileObject = server.createObject (scripting.filesystemObject) SETOUS = FileObject.opentextFile (Countfile, 1, Falsch, Falsch) counter = out.readline |
Lesen Sie den Wert in der Zählerdatei
Out.close
Schließen Sie die Datei
| Das Folgende ist der zitierte Inhalt: Set FileObject = server.createObject (scripting.filesystemObject) SETOUS = FileObject.CreateTextFile (Countfile, Richtig, Falsch) Application.lock |
Method Application.lock verbietet es anderen Benutzern, den Zählerwert zu ändern
Zähler = Zähler 1
Der Wert des Zählers wird um 1 erhöht
Out.WriteLine (Zähler)
Schreiben Sie den neuen Zählerwert in die Datei
Application.unlock
Ermöglichen Sie anderen Benutzern nach der Verwendung der Methode Appluration.unlock, den Zählerwert zu ändern
| Das Folgende ist der zitierte Inhalt: Antwort.Write (Sie sind der erste) Antwort.Write ($#@60; font color = red $#@62;) Antwort.Write (Zähler) |
Übertragen Sie den Zählerwert in den Browser und zeigen Sie ihn dem Benutzer in roter Farbe an
| Das Folgende ist der zitierte Inhalt: Antwort.Write ($#@60;/font $#@62;) Antwort.Write (ein Besucher) Out.close |
Schließen Sie die Datei
%$#@62;
(Ii) Zähler von der Seite getrennt
In den tatsächlichen Anwendungen werden die Hauptseite und das Zählerprogramm getrennt. Die Seitenzählung kann erreicht werden, indem der Seite, die gezählt werden muss, einen zitierten Code hinzufügen. Dies sind die kostenlosen Zähler, die wir häufig für die Online -Verwendung beantragen, aber sie werden normalerweise von CGI hergestellt. Hier müssen wir nur den einfachen Zähler, den wir zuvor mit ASP hergestellt haben, leicht ändern und dann der Seite eine JavaScript -Anweisung hinzufügen, um sie zu verweisen, die die von der Seite getrennte Zählerfunktion realisiert. Auf diese Weise ist es sehr bequem, ob es sich um einen Zähler für die Hauptseite oder eine Zählung für eine bestimmte Seite handelt. Offensichtlich müssen Sie einfach den Dateinamen und den Counter -ASP -Quellcode -Dateinamen ändern, der Zählerwerte speichert, um mehrere Zähler zu implementieren.
Counter txtCounter.asp -Code von der Seite getrennt:
| Das Folgende ist der zitierte Inhalt: $#@60;% CountFile = server.mappath (txtCounter.txt) Set FileObject = server.createObject (scripting.filesystemObject) SETOUS = FileObject.opentextFile (Countfile, 1, Falsch, Falsch) counter = out.readline Out.close Set FileObject = server.createObject (scripting.filesystemObject) SETOUS = FileObject.CreateTextFile (Countfile, Richtig, Falsch) Application.lock Zähler = Zähler 1 Out.WriteLine (Zähler) Application.unlock Response.writitedocument.write (& counter &) |
Um den Zählerwert auf der Seite korrekt anzuzeigen
Out.close
%$#@62;
Fügen Sie der Seite den folgenden Code hinzu, um zu zählen:
$#@60; p $#@62;
Du bist der erste
$#@60; font color = Red $#@62;
$#@60; Skript Sprache = javascript src = http: //202.101.209.75/asptemp/counter/txtcounter.asp$#@62;
// Bei Bezug auf den Server- und Verzeichnispfad, auf dem sich der ASP -Zähler befindet.
$#@60;/script $#@62;
$#@60;/font $#@62;
Ein Besucher
$#@60;/p $#@62;
(Iii) Bildzähler getrennt von der Seite
Die Verfolgung der Menschen ist endlos, vielleicht benötigen Sie einen personalisierteren Grafiknummernzähler anstelle eines einfachen Textnummer -Zählers. Kein Problem. Schauen wir uns nun an, wie die Grafikzählerfunktion mit ASP implementiert werden kann. Um einen Graph -Zähler zu implementieren, ist der Schlüsselpunkt, wie der Datenwert in der Zählerdatei in die entsprechende grafische Darstellung umgewandelt wird. Da die Dezimalzahl zehn verschiedene Zahlen enthält, einschließlich 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, müssen wir zehn entsprechende Bilder haben und der Dateiname des Bildes muss der angezeigten Nummer entsprechen. Beispielsweise beträgt der Dateiname des Bildes, das 0 entspricht, 0.GIF, und 1 ist 1.gif, ... (Das Bild kann mithilfe von Tools wie Photoshop oder aus dem Internet heruntergeladen werden). Hier möchten wir die VBScript -Funktionen Len (String | VarName) und Mid (String, Start [, Länge]) verwenden. Die Anzahl der Bits des Zählerwerts kann aus Len (Zähler) erhalten werden, und die Zahl auf dem I-ten Bit des Zählerwerts kann von Mitte (Zähler i, 1) erhalten werden. Wir können diesen Wert verwenden, um das entsprechende digitale Bild aufzurufen. Unter Verwendung der For -Loop -Anweisung ist es nicht schwierig, die Zahlen auf jedem Bit des Zählerwerts zu erhalten und sie in das entsprechende digitale Bild umzuwandeln, damit wir die Transformation vom Textwert zur Bildnummer erkennen können. Unten finden Sie ein Beispiel für einen in ASP geschriebenen Bildzähler. Da der größte Teil des Code zuvor analysiert wurde, sind im Code nur einige Aussagen kommentiert.
Bildzähler imgcounter.asp -Code von Seite isoliert:
$#@60;%@Sprache = vbScript% $#@62;
$#@60;%
schwache Bilder (20)
Definieren Sie ein Array, um Anweisungen zu speichern, in denen jedes Ziffernbild angezeigt wird
| Das Folgende ist der zitierte Inhalt: CountFile = server.mappath (imgCounter.txt) Set FileObject = server.createObject (scripting.filesystemObject) SETOUS = FileObject.opentextFile (Countfile, 1, Falsch, Falsch) counter = out.readline Out.close Set FileObject = server.createObject (scripting.filesystemObject) SETOUS = FileObject.CreateTextFile (Countfile, Richtig, Falsch) Application.lock Zähler = Zähler 1 Out.WriteLine (Zähler) Application.unlock Countlen = Len (Zähler) |
Holen Sie sich die Anzahl der Bits des Zählerwerts
| Das Folgende ist der zitierte Inhalt: für i = 1 bis County Bilder (i) = $#@60; img src = & http: //202.101.209.75/asptemp/counter/images/&/ & mid (counter, i, 1) & .gif $#@62; $#@60;/Img $#@62; |
Der Anzeigecode (HTML) des Bildes, der dem numerischen Wert in jedem Bit entspricht, wird aus der Schleifenanweisung erhalten und im Array gespeichert. Bitte achten Sie auf den tatsächlichen Server- und Verzeichnispfad des Bildes, wenn Sie es speziell verwenden.
response.writitedocument.write (& images (i) &);
Rufen Sie das Funktionsdokument auf. Schreiben Sie, um den HTML -Code auszugeben, der digitale Bilder anzeigt
nächste
Out.close
%$#@62;
Fügen Sie der Seite den folgenden Code hinzu, um zu zählen:
$#@60; p $#@62;
Du bist der erste
$#@60; Skript Sprache = javaScript src = http: //202.101.209.75/asptemp/counter/imgcounter.asp$#@62;
// Bei Bezug auf den Server- und Verzeichnispfad, auf dem sich der ASP -Zähler befindet.
$#@60;/script $#@62;
Ein Besucher
$#@60;/p $#@62;
Hinweis: Alle oben genannten ASP -Zähler wurden getestet und unter Windows NT Server 4.0 (Chinese) / IIS3.0 übergeben. Eine der folgenden Umgebungen kann ASP ausführen:
1. Windows NT Server 4.0 / IIS3.0 oder höher
2. Windows NT Workstation 4.0 / Microsoft Peer Web Service 3.0 oder höher
3. Windows 95/98 / Microsoft Personal Web Server 1.0a oder höher
Share: ASP Beispiel Erläuterung: Verwenden Sie Seitenunterbrechungen, um die Anzeige von langen Artikeln zu realisieren Lange Artikelseiten werden mit Seitenpausen angezeigt. Wenn Sie ASP verwenden möchten, um diese Funktion zu implementieren, können Sie feststellen, dass nur die Paging -Methode auf der Anzahl der Wörter basiert. Diese Methode hat jedoch einen Fehler, dh, wenn in Ihrem Artikelinhalt UBB- oder HTML -Code enthält, kann er leicht dazu führen, dass er zwischen [Code] [/Code] wendet.