Los amigos que están aprendiendo asp necesitan entender <%
establecer conexión=servidor.createobject(adodb.conexión)
connstr=Provider=Microsoft.jet.oledb.4.0;data source=&server.mappath(cou.mdb) //cou es el nombre de la base de datos
conn.open connstr
si sesión (visitada) <> sí, entonces
aplicación.Lock()
conn.execute(actualizar el conjunto de contadores hits=hits+1 donde kid=1) //el contador es el nombre de la tabla utilizada para almacenar datos en la base de datos
aplicación.Desbloquear()
sesión (visitada) = sí
terminar si
establecer rs=conn.execute(seleccione * de kuo donde niño=1)
si rs.eof y rs.bof entonces
contadores=0
demás
contadores=rs(golpes)
terminar si
rs.cerrar
con.cerrar
establecer rs = nada
establecer conexión = nada
%>