Recommandé: Flash combiné avec ASP pour créer IP, version, temps de connexion, nombre de visites Je ne sais pas si c'est original, mais je l'ai fait moi-même sans faire référence à rien. Tout d'abord, vous avez besoin de 2 fichiers ASP, 1 fichier texte et 1 fichier SWF. -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Sur Internet, les compteurs écrits en ASP sont partout. Je pense que cela n'a pas beaucoup de sens de parler des compteurs d'écriture ASP ici. Plus tard, j'y ai réfléchi et il était nécessaire d'en parler, car il ne s'agit pas seulement d'écrire des compteurs, mais d'introduire des connaissances et des compétences d'application ASP à tout le monde.
Le code du programme d'origine est le suivant:
$ # @ 60;% countlong = 8
'CountLong définit le nombre de bits affichés par le comptoir
Sur l'erreur reprendre ensuite
′ Ignorer toutes les erreurs
count = server.mappath ("count.txt")
set cou = server.createObject ("scripting.filesystemObject")
Set Out = COU.OPENEXTFILE (COUNT, 1, FALSE, FAUX)
compteur = out.readline
enjoutant
′ Le code ci-dessus est d'ouvrir le Count Count.txt et de lire une ligne pour lire la valeur de compteur actuelle
Si session ("dans") $ # @ 60; $ # @ 62; "dans" alors
′ Déterminez si l'utilisateur est entré dans la page d'accueil pour s'assurer que le compteur ne sera pas ajouté par 1 lorsqu'il appuiera à actualiser ou revient à cette page.
Session ("dans") = "dans"
définir = cou.CreateTextFile (Count, True, False)
application.lock
compteur = compteur + 1
'Le compteur est augmenté de 1
out.writeline (compteur)
application.unlock
enjoutant
′ Le code ci-dessus est de créer un nouveau Count.txt de fichiers et d'écrire une ligne, et d'écrire la valeur du compteur après avoir ajouté 1.
terminer si
CO = CSTR (compteur)
'La fonction CSTR est utilisée pour convertir les variables numériques en caractère
pour i = 1 à Countlong-len (CO)
réponse.write ″ ″
suivant
′ L'énoncé de boucle ci-dessus est de terminer l'ajout de l'image 0 devant le comptoir
'Len (CO) La fonction obtient la longueur de la variable CO, CountLong-Len (CO) obtient le nombre des 0 images précédentes
pour i = 1 à Len (CO)
réponse.write ″ ″
suivant
La fonction 'mid (co, i, 1) est utilisée pour lire un caractère% $ # @ 62 à partir du i-th bit de la variable CO;
Le compteur le plus réussi est d'utiliser la session pour empêcher l'utilisateur de rafraîchir le compteur plusieurs fois; Utilisez des fichiers texte pour enregistrer la valeur du compteur. Bien que le code soit écrit plus longtemps, il est beaucoup mieux que d'utiliser l'objet d'application, car lorsque le serveur redémarre ou modifie Global.asa, la valeur de l'objet d'application sera effacée; Et utilisez également des images pour remplacer les personnages, qui sont plus beaux et généreux!
Vous pouvez concevoir vous-même l'image du compteur, utiliser le nom de fichier 0.gif, 1 utilise 1.gif, etc.
Partager: 20 conseils très utiles dans ASP 1. Comment utiliser ASP pour déterminer le chemin physique virtuel de votre site Web Réponse: Utilisez la méthode Mappath P Align = Center Font Size = 4 Face = Arial B Le chemin physique vers ce site Web virtuel est: / b / Font Font Color = # FF0000 SIZE = 6 FACE = ARAL% = Server.Mappath (/)% / Font / P 2. Comment savoir à l'utilisateur