Manejo de Base de Datos en ASP

[El_Metallick]

Código:

Set conn = Server.CreateObject("ADODB.Connection")
set rs = CreateObject("ADODB.Recordset")
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("planbe/database/novelty.mdb"))
 
sql="Select * From tblCustomers"
rs.Open sql, Conn
 
If Not rs.eof Then
Do While Not rs.eof
Response.Write(rs.Fields("FirstName") & " " & rs.Fields("LastName") & 
"<br>"
rs.MoveNext
Loop
Else
Respone.write "no hay registros"
End If

Saludos y suerte