% conttotal = 0 'Creamos el conjunto de registros Dim recordset Set recordset = Server.CreateObject("ADODB.Recordset") 'Sentencia SQL Dim sql sql = "SELECT * FROM Moteros " 'Abrimos la conexión recordset.Open sql, Conexion, 1, 3 While Not recordset.EOF conttotal = conttotal + 1 recordset.MoveNext Wend 'Cerramos el conjunto de registros recordset.Close Set recordset = Nothing %>
![]() |
![]() |
MotoRutas es un proyecto que nace a mediados de 2002, cuyo principal objetivo es satisfacer las necesidades turísticas de los aficionados a las dos ruedas. Creada por informáticos de la rama del diseño web, tratamos de ofrecer un producto de impecable calidad, que sirva para pasar buenos ratos delante de tu ordenador o sobre esa máquina que te llevará a lugares increibles. MotoRutas somos:
y una comunidad de <%=conttotal %> motoristas |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||