En Internet, los contadores escritos en ASP están por todas partes. Siento que no tiene sentido hablar aquí de contadores escritos en ASP. Más tarde pensé que era necesario hablar de ello, porque no se trata solo de escribir contadores, sino también de presentar el conocimiento y las habilidades de aplicación de ASP a todos.
El código original del programa es el siguiente:
$#@60 ;%countlong=8
'countlong define el número de dígitos mostrados del contador. En caso de error Reanudar siguiente
′ Ignorar todos los errores count=server.mappath(″count.txt″)
establecer cou = server.createobject(″scripting.filesystemobject″)
establecido = cou.opentextfile (recuento, 1, falso, falso)
contador=out.readline
salir.cerrar
′El código anterior es para abrir el archivo count.txt y leer una línea para leer el valor del contador actual if session(″in″)$#@60;$#@62;″in″ entonces
'Determine si el usuario ha ingresado a la página de inicio para asegurarse de que el contador no aumente en 1 cuando presione actualizar o vuelva a esta página.
sesión(″en″)=″en″
establecido = cou.createtextfile(recuento, verdadero, falso)
bloqueo.de.aplicación
contador=contador+1
'Contador más 1
out.writeline(contador)
aplicación.desbloquear
salir.cerrar
'El código anterior es para crear un nuevo archivo count.txt y escribir una línea, escribir el valor del contador después de agregar 1 extremo si
co=cstr(contador)
La función 'cstr se utiliza para convertir variables numéricas en tipos de caracteres para i = 1 para contarlong-len(co)
respuesta.escribir ″″
próximo
'La instrucción de bucle anterior es para completar la suma de las 0 imágenes delante del contador'La función len(co) es obtener la longitud de la variable co, countlong-len(co) obtiene el número de las 0 imágenes anteriores para i= 1 a len(co)
respuesta.escribir ″″
próximo
La función ′mid(co,i,1) se utiliza para leer un carácter % comenzando desde la i-ésima posición de la variable co $#@62 ;
La parte más exitosa de este contador es usar la sesión para evitar que los usuarios actualicen el contador varias veces; se usa un archivo de texto para registrar el valor del contador. Aunque el código es más largo de escribir, es mucho mejor que usar la aplicación. objeto, porque cuando el servidor se reinicia o cuando se cambia global.asa, el valor del objeto de la aplicación se borrará y se utilizarán imágenes en lugar de caracteres, ¡lo que se ve más hermoso!
Puede diseñar la imagen del contador usted mismo. Utilice el nombre de archivo 0.gif para 0, 1.gif para 1, etc.