Aquí hay un hermoso contador gráfico diseñado sin CGI.
Esto se divide en tres partes: 1. Crear archivos de gráficos.
2. Cree una base de datos.
3. Escribe código.
1. Cree archivos de gráficos.
Primero, use un software de gráficos para crear 10 gráficos para mostrar los diez números del contador: 1, 2, 3, 4, 5, 6, 7, 8, 9, 0. Si tienes talento artístico, podrás hacer mejores gráficos.
2. Cree una base de datos.
Úselo para crear una base de datos llamada. La base de datos contiene una tabla,
El nombre es, la estructura es: entero, hay un registro y el valor inicial es 0.
Se utiliza para almacenar el último número de visitas a esta página.
3. Escribe código.
——————número.asp————————————
<%@ idioma="vbscript" %>
<!--#include file="adovbs.inc"-->
<%
establecer objconn=server.createobject("adodb.conexión")
objconn.attributes=adxactcommitretain
dbpath=servidor.mappath("núm.mdb")
objconn.open "driver={controlador de acceso de Microsoft (*.mdb)};dbq=" & dbpath
Nota: Establezca una conexión con la base de datos.
sqlquery= "seleccionar * de numt"
establecer rsrecordset=server.createobject("adodb.recordset")
rsrecordset.open sqlquery,objconn,adopenkeyset,adlockoptimistic
Nota: Abra la base de datos.
bloqueo.de.aplicación
aplicación("nmb")=rsrecordset("número")
aplicación.desbloquear
Nota: Asigne el último recuento de acceso al objeto Aplicación
application.lock
aplicación("nmb")=aplicación("nmb")+1
aplicación.desbloquear
rsrecordset("número")=rsrecordset("número")+1
rsrecordset.actualización
rrecordset.cerrar
objconn.cerrar
establecer rsrecordset=nada
establecer objconn=nada
Nota: cierre la base de datos y libere el objeto
dim nmb1
cadena tenue()
nmb1=aplicación("nmb")
redimificar cadena (nmb1)
para i=1 a len(nmb1)
str(i)=medio(nmb1,i,1)
Nota: Para cada número, obtenga el archivo gráfico correspondiente,
seleccione case str(i)
caso "0"
imgF="0.gif"
caso "1"
imgF="1.gif"
caso "2"
imgF="2.gif"
caso "3"
imgF="3.gif"
caso "4"
imgF="4.gif"
caso "5"
imgF="5.gif"
caso "6"
imgF="6.gif"
caso "7"
imgF="7.gif"
caso "8"
imgF="8.gif"
caso "9"
imgF="9.gif"
finalizar seleccionar
Nota: Respuesta gráfica de salida.write
"<img src="&imgF&">"
próximo
%>