35 - SELECT (listado de una tabla de ACCESS)
Simulador
(Cuando presiona el botón "ejecutar el programa" se graban todos los cuadros de texto y se ejecuta el primero de la lista mostrando en una página el resultado.
)
Efectuar el listado completo de la tabla articulos.
pagina1.asp
<%option explicit%> <html> <head> <title>problema</title> </head> <body> <% dim conexion set conexion = Server.CreateObject("ADODB.Connection") conexion.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _ Server.MapPath( "/aspya/usuarios/administracion.mdb") conexion.Open dim registros set registros = Server.CreateObject("ADODB.RecordSet") registros.open "select codigo,descripcion,precio from articulos",conexion do while not registros.eof response.write("Código:" & registros("codigo")) response.write("<br>") response.write("Descripción:" & registros("descripcion")) response.write("<br>") response.write("Precio:" & registros("precio")) response.write("<br>") response.write("------------------------------------------------------------") response.write("<br>") registros.movenext loop conexion.close %> </body> </html>
Retornar