Manual básico de ASP (VII)
por Mauro, Web Master de elguruprogramador.com

Acceso a bases de datos mediante ASP.-

Esta es una breve explicación de como utilizar ASP para tener acceso a una base de datos. Lo primero que debemos crear es la base de datos, en este caso de Access, con el nombre de 'temas.mdb'. Ahora, dentro de esta base de datos, crearemos una tabla llamada 'TemasMusicales' y que tenga los siguientes campos...

CAMPOS	TIPOS DE DATOS
Id	Autonumerico
Titulo	Texto
Genero	Texto

Ingrésale algunos datos para poder utilizarla. Bueno ya tenemos la base de datos con informacion adentro. Lo que vamos a hacer ahora es, desde ASP, ver todo el contenido de la tabla que hemos creado. Para ello creamos un archivo ASP con el nombre 'muestra_temas.asp' y en su interior agregamos el siguiente código...

<% Dim BDD ' variable que se encargara de la base de datos Dim TABLA ' variable que se encarga de la tabla 'creamos los objetos que manejan la base de datos y la tabla Set BDD = Server.CreateObject("ADODB.Connection") Set TABLA = Server.CreateObject("ADODB.Recordset") 'abrimos la base de datos BDD.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("temas.mdb")) 'abrimos la tabla TABLA.Open "TemasMusicales", BDD ' indicamos el nombre de la tabla y la base de datos 'ahora recorremos toda la tabla y mostramoslos datos While NOT TABLA.EOF 'recorre la tabla hasta que EOF sea verdadero Response.Write "titulo:" & TABLA("Titulo") & "<br>" Response.Write "genero:" & TABLA("Genero") & "<br>" Wend 'cerramos todo y liberamos los objetos TABLA.Close BDD.Close Set BDD = Nothing Set TABLA = Nothing %>

Bueno, con este código se pueden ver todos los datos que contiene nuestra base de datos.

Introduccion al SQL

Esta es una breve introducción al lenguaje de consultas estructuradas SQL. Sólo veremos como realizar consultas sobre una tabla de una base de datos. Primero veamos el formato de la tabla de Access con la que vamos a trabajar

CAMPOS	TIPOS DE DATOS
Id	Autonumerico
Marca	Texto
Color	Texto

Esta tabla llevará el nombre de 'Autos', y en su interior contendrá la información de una cantidad X de autos. Te recomiendo que llenes la tabla con datos, pudiendo repetir las marcas y los colores.

<% Dim BDD ' variable que se encargara de la base de datos Dim TABLA ' variable que se encarga de la tabla Dim SQL 'variable que contendra la consulta SQL 'creamos los objetos que manejan la base de datos y la tabla Set BDD = Server.CreateObject("ADODB.Connection") Set TABLA = Server.CreateObject("ADODB.Recordset") 'abrimos la base de datos BDD.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("autos.mdb")) %>

Noten que declaramos una variable llamada 'SQL', en la cual vamos a poner la cadena que forme la consulta a la tabla 'Autos', así que entre el código anterior y el que está a continuación deben asignarle a la variable 'SQL' la consulta a realizar.

<% TABLA.Open SQL, BDD ' hacemos la consulta 'ahora recorremos toda la tabla y mostramoslos datos While NOT TABLA.EOF 'recorre la tabla hasta que EOF sea verdadero Response.Write "marca:" & TABLA("Titulo") & "<br>" Response.Write "color:" & TABLA("Genero") & "<br><br>" Wend 'cerramos todo y liberamos los objetos TABLA.Close BDD.Close Set BDD = Nothing Set TABLA = Nothing %>

Bueno, realizaremos nuestra primer consulta, seleccionaremos todos los autos de color rojo, para esto tenemos que armar la consulta, recuerden que el codigo que hay a continuación va entre medio de los 2 anteriores

SQL = "SELECT * FROM Autos WHERE Color = 'Rojo'"

Bien, expliquemos esto, "SELECT * ..." significa seleccionar todos los campos (*), "FROM Autos..." desde la tabla Autos "WHERE Color = 'Rojo'" donde color es igual a Rojo.

Como ves es bastante intuitivo y legible, si sabes ingles mucho más. Ahora realizaremos una consulta buscando todos los autos de marca BMW.

SQL = "SELECT * FROM Autos WHERE Marca = 'BMW'"

Facil no. Ahora veamos como hacer si queremos seleccionar todos los autos BMW de color Rojo

SQL = "SELECT * FROM Autos WHERE Color = 'Rojo' AND Marca = 'BMW'"

Noten que agregamos el operador AND (Y) es decir, Color igual a rojo Y con la marca BMW. Ahora veamos lo contrario, buscaremos todos los BMW, pero que no sean de color rojo

SQL = "SELECT * FROM Autos WHERE Marca = 'BMW' AND NOT Color = 'Rojo'"

Y si queremos que todo esto aparezca ordenado debemos agregar la palabra 'ORDER BY' y especificar el campo por el cual queremos ordenar

SQL = "SELECT * FROM Autos WHERE Marca = 'BMW' AND NOT Color = 'Rojo' ORDER BY Marca"

Podemos especificar más de un campo para ordenar, para esto debemos separarlos por comas

SQL = "SELECT * FROM Autos WHERE Marca = 'BMW' AND NOT Color = 'Rojo' ORDER BY Marca, Color"

Y la forma de mostrarlos, ascendente o descendente

SQL = "SELECT * FROM Autos WHERE Marca = 'BMW' AND NOT Color = 'Rojo' ORDER BY Marca, Color DESC"