<% Session("visitado") DIM ACCION3,CONEXION3,SQL3,modificar Set conexion3 = Server.CreateObject ("ADODB.Connection") Conexion3.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" &server.mappath("../datos/BITACORA.mdb") sql3 = "SELECT * FROM contador" Set accion3 = Server.CreateObject ("ADODB.RecordSet") accion3.Open sql3, conexion3 if Session("visitado") <> 1 then 'para que no este contando visitas cada vez que se actualiza la pagina MODIFICAR="UPDATE contador SET CONTADOR=CONTADOR+1" Session("visitado") = 1 CONEXION3.EXECUTE(MODIFICAR) end if %>




Número de Visitas: <%Response.write accion3("contador")%>        
        
 
Introduzca su nombre ususario y clave de acceso
 
Usuario
Clave
 
 
 
Si no dispone de su nombre de usuario o clave de acceso, pongase en contacto con nuestro departamento de administración o envíe un mensaje de correo electrónico a la dirección central@tdcsport.com
 
 
 
 
Desplace el ratón por el menú para ver información más detallada
 




           Usuario
      


              Si no dispone de sus
              claves de acceso, por favor
              póngase en contacto con
              central@tdcsport.com

       
         Para cualquier consulta sobre
         nuestro sitio web contacte con central@tdcsport.com