Recommandé: ASP Instance Apprentissage: fonction qui génère aléatoirement les noms de fichiers Ce qui suit est le contenu cité: <html> <meta http-equiv = Refresh Content = 2> <! - Placez ceci
Active Server Pager (Dynamic Server Home Page, appelé ASP), peut facilement réaliser la fonction de compteur de page en lisant et en écrivant des fichiers de serveur, en combinant le langage de script (VBScript ou JScript) et le code HTML. Les manuels ASP populaires et les tutoriels ASP sur Internet ont parlé des problèmes de conception des compteurs ASP, mais ils sont trop simples, comme ne mentionnant pas comment séparer le script de compteur et la page principale et l'implémentation des compteurs d'image. Vous trouverez ci-dessous l'expérience de l'auteur dans la création de sites Web NT pour les unités, et donner des exemples pour parler de la conception des compteurs ASP étape par étape. J'espère que cela pourra inspirer les débutants de l'ASP et des internautes qui s'intéressent à la programmation Web ASP.
(I) compteur simple
ASP contient cinq composants de serveur actif intégré, à savoir le composant d'accès à la base de données, le composant d'accès à fichiers, le composant AD Rotator, le composant Capacités Brower et le composant de liaison de contenu. Le compteur que nous souhaitons concevoir ci-dessous est de lire et d'écrire des fichiers de serveur via le composant d'accès à fichiers (composant d'accès au fichier). L'idée de l'algorithme est: utilisez un fichier texte (ASCII) sur le serveur pour stocker des valeurs comptées. Chaque fois que la page est accessible, la valeur est lue à partir du fichier, affichée à l'utilisateur, et la valeur est ajoutée par 1, et la valeur ajoutée est réécrite dans le fichier.
L'instruction ASP et la description de l'écriture de données dans un fichier de comptage de serveurs sont les suivantes:
Counfile = server.mappath (le nom de fichier utilisé pour stocker la valeur du compteur)
Méthode d'accès au serveur Mappath (chemin) convertit le chemin d'accès où le fichier qui stocke la valeur de compteur est situé en chemin physique.
Set fileObject = server.createObject (scripting.filesystemObject)
Utilisez la méthode createObject pour définir l'objet FileSystemObject
Définir outstream = server.createTextFile (fileObject, true, false)
Utilisez l'objet FileSystemObject pour fournir la méthode CreateTextFile pour générer un fichier texte, où le paramètre True signifie écraser le fichier d'origine, et faux signifie que le fichier est de type ASCII
Données outstream.writeline à écrire
Outstream.writeline écrit une ligne de données au fichier
La syntaxe ASP pour la lecture des données d'un fichier serveur est la suivante:
Counfile = server.mappath (le nom de fichier utilisé pour stocker la valeur du compteur)
Set fileObject = server.createObject (scripting.filesystemObject)
Set insiteam = server.OpenTExtFile (fileObject, 1, false, false)
Utilisez l'objet FileSystemObject pour fournir la méthode OpenTextFile pour générer du texte? Lorsque le paramètre True signifie écraser le fichier d'origine, FAUX signifie que le fichier est ASCII Type pour lire Data = Instream.Readline, où Instream.Readline est une ligne de données lue dans le fichier.
Ce qui suit est un exemple de compteur qui utilise ASP pour implémenter la fonction de compteur de page (SimpleCounter.asp). J'ai commenté la déclaration en détail dans le code. Vous pouvez coller le code suivant dans le code de page que vous devez compter. Bien sûr, votre serveur doit prendre en charge ASP et vous avez créé un fichier texte SimpleCounter.txt avec le contenu 0 dans le répertoire où se trouve la page d'accueil.
Counter ASP simple SIMPLESCOUNTER.ASP CODE ET COMMENTAIRES:
| Ce qui suit est le contenu cité: $ # @ 60;% CountFile = server.mappath (SimpleCounter.txt) Le fichier aspconter.txt est un fichier texte utilisé pour stocker les numéros. Le contenu initial est généralement 0. Set fileObject = server.createObject (scripting.filesystemObject) Set Out = fileObject.OpenTExtFile (CountFile, 1, false, false) compteur = out.readline |
Lisez la valeur dans le fichier de compteur
Enjoutant
Fermez le fichier
| Ce qui suit est le contenu cité: Set fileObject = server.createObject (scripting.filesystemObject) Set Out = fileObject.CreateTextFile (CountFile, True, False) Application.lock |
Méthode Application.LOCK interdit aux autres utilisateurs de modifier la valeur de compteur
compteur = compteur 1
La valeur du compteur est augmentée de 1
Out.writeline (compteur)
Écrivez une nouvelle valeur de compteur dans le fichier
Application.unlock
Après avoir utilisé la méthode application.unlock, permettez à d'autres utilisateurs de modifier la valeur de compteur
| Ce qui suit est le contenu cité: Réponse.Write (vous êtes le premier) Response.Write ($ # @ 60; Font Color = Red $ # @ 62;) Response.Write (compteur) |
Transférer la valeur de comptoir vers le navigateur et l'afficher à l'utilisateur en couleur rouge
| Ce qui suit est le contenu cité: Réponse.write ($ # @ 60; / font $ # @ 62;) Response.Write (un visiteur) Enjoutant |
Fermez le fichier
% $ # @ 62;
(Ii) compteur séparé de la page
Dans les applications réelles, la page principale et le programme de comptoir sont séparés. Le comptage des pages peut être réalisé en ajoutant un code cité à la page qui doit être comptée. Ce sont les comptoirs gratuits que nous appliquons souvent pour une utilisation en ligne, mais ils sont généralement fabriqués par CGI. Ici, nous avons juste besoin de modifier légèrement le compteur simple que nous avons fait avec ASP auparavant, puis d'ajouter une instruction JavaScript à la page pour la référencer, ce qui réalisera la fonction de compteur distincte de la page. De cette façon, il est très pratique que ce soit un compteur pour la page principale ou un décompte pour une page spécifique. De toute évidence, vous devez simplement modifier le nom du fichier et contre-ASP Code source Nom du fichier qui stocker les valeurs de compteur pour implémenter plusieurs compteurs.
Counter txtCounter.asp Code séparé de la page:
| Ce qui suit est le contenu cité: $ # @ 60;% CountFile = server.mappath (txtcounter.txt) Set fileObject = server.createObject (scripting.filesystemObject) Set Out = fileObject.OpenTExtFile (CountFile, 1, false, false) compteur = out.readline Enjoutant Set fileObject = server.createObject (scripting.filesystemObject) Set Out = fileObject.CreateTextFile (CountFile, True, False) Application.lock compteur = compteur 1 Out.writeline (compteur) Application.unlock Réponse.writedocument.write (& compter &) |
Afin d'afficher correctement la valeur de compteur sur la page, appelez le document de fonction VBScript.Write
Enjoutant
% $ # @ 62;
Ajoutez le code suivant à la page pour compter:
$ # @ 60; p $ # @ 62;
Tu es le premier
$ # @ 60; Font Color = Red $ # @ 62;
$ # @ 60; Script Language = JavaScript src = http: //202.101.209.75/asptemp/counter/txtcounter.asp$#@62;
// lors de la référence au serveur et au chemin du répertoire où se trouve le compteur ASP.
$ # @ 60; / script $ # @ 62;
$ # @ 60; / font $ # @ 62;
Un visiteur
$ # @ 60; / p $ # @ 62;
(Iii) Compteur d'image séparé de la page
La poursuite des gens est infinie, vous avez peut-être besoin d'un compteur de numéros graphiques plus personnalisé au lieu d'un simple compteur de numéro de texte. Pas de problème, examinons maintenant comment implémenter la fonction de compteur graphique à l'aide d'ASP. Pour implémenter un compteur de graphiques, le point clé est de savoir comment convertir la valeur de données dans le fichier de compteur en représentation graphique correspondante. Étant donné que le numéro décimal a dix nombres différents, dont 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, nous devons avoir dix images correspondantes et que le nom de fichier de l'image doit correspondre au numéro affiché. Par exemple, le nom de fichier de l'image correspondant à 0 est 0.gif, et 1 est 1.gif, ... (l'image peut être faite en utilisant des outils tels que Photoshop ou téléchargés à partir d'Internet). Ici, nous voulons utiliser les fonctions VBScript Len (String | VarName) et Mid (String, Start [, Longueur]). Le nombre de bits de la valeur de compteur peut être obtenu à partir de Len (compteur), et le nombre sur le i-tth bit de la valeur de compteur peut être obtenu à partir du milieu (compteur, i, 1). Nous pouvons utiliser cette valeur pour appeler l'image numérique correspondante. En utilisant l'instruction FOR LOOP, il n'est pas difficile d'obtenir les nombres sur chaque bit de la valeur du compteur et de les convertir en image numérique correspondante, afin que nous puissions réaliser la transformation de la valeur du texte au numéro d'image. Vous trouverez ci-dessous un exemple de compteur d'image écrit en ASP. Étant donné que la plupart du code a été analysé auparavant, seules certaines instructions sont annotées dans le code.
Counter d'image ImgCounter.asp Code isolé de la page:
$ # @ 60;% @ language = vbscript% $ # @ 62;
$ # @ 60;%
Images DIM (20)
Définissez un tableau pour stocker des instructions qui affichent chaque image de chiffre
| Ce qui suit est le contenu cité: CountFile = server.mappath (imgcounter.txt) Set fileObject = server.createObject (scripting.filesystemObject) Set Out = fileObject.OpenTExtFile (CountFile, 1, false, false) compteur = out.readline Enjoutant Set fileObject = server.createObject (scripting.filesystemObject) Set Out = fileObject.CreateTextFile (CountFile, True, False) Application.lock compteur = compteur 1 Out.writeline (compteur) Application.unlock countlen = len (compteur) |
Obtenez le nombre de bits de la valeur de comptoir
| Ce qui suit est le contenu cité: pour i = 1 au comté images (i) = $ # @ 60; img src = & http: //202.101.209.75/asptemp/counter/images/&/ & mid (compteur, i, 1) & .gif $ # @ 62; $ # @ 60; / img $ # @ 62; |
Le code d'affichage (HTML) de l'image correspondant à la valeur numérique dans chaque bit est obtenu à partir de l'instruction LOOP et stocké dans le tableau. Veuillez prêter attention au serveur réel et à un chemin de répertoire de l'image lorsque vous l'utilisez spécifiquement.
Response.WriteDocument.Write (& Images (i) &);
Appelez le document de fonction.Write pour sortir le code HTML qui affiche des images numériques
suivant
Enjoutant
% $ # @ 62;
Ajoutez le code suivant à la page pour compter:
$ # @ 60; p $ # @ 62;
Tu es le premier
$ # @ 60; Script Language = JavaScript Src = http: //202.101.209.75/asptemp/counter/imgcounter.asp$##@62;
// lors de la référence au serveur et au chemin du répertoire où se trouve le compteur ASP.
$ # @ 60; / script $ # @ 62;
Un visiteur
$ # @ 60; / p $ # @ 62;
Remarque: Tous les compteurs ASP ci-dessus ont été testés et passés sous Windows NT Server 4.0 (chinois) / IIS3.0. L'un des environnements suivants peut exécuter ASP:
1. Windows NT Server 4.0 / IIS3.0 ou supérieur
2. Windows NT Workstation 4.0 / Microsoft Peer Web Service 3.0 ou supérieur
3. Windows 95/98 / Microsoft Personal Web Server 1.0A ou plus
Partager: Exemple ASP Explication: Utilisez les pauses de la page pour réaliser l'affichage de la pagination de l'article long Les pages de longs articles sont affichées avec des pauses de page. Si vous souhaitez utiliser ASP pour implémenter cette fonction, vous pouvez constater que seule la méthode de pagination est basée sur le nombre de mots. Cependant, cette méthode a un bogue, c'est-à-dire s'il y a un code UBB ou HTML dans le contenu de votre article, il peut facilement le faire passer entre [Code] [/ Code]