Conexión a una base de datos Access y iterating a través de él
- righteous_trespasser
- Scuffle


- Registrado: Mar 12, 2007
- Mensajes: 6228
- Loc: South-Africa
- Status: Offline
Introducción
Este tutorial le mostrará cómo conectar a una base de datos de acceso con asp.net y luego iterar a través de los registros dentro de la base de datos y mostrarlos en una página. Para este tutorial voy a utilizar "Microsoft Visual Web Developer 2008 Express", que es un programa gratuito y se puede descargar por cualquier persona el derecho aquí .
Creación de la base de datos
Lo primero que tendrá que hacer es crear la base de datos que vamos a utilizar. Por defecto, vamos a crear la base de datos en la carpeta "App_Data" de nuestra web, así que si hemos creado un sitio web llamado "Tutorial1", la base de datos normalmente se creó en "Tutorial1 \ App_Data \ Database-name.mdb". Así que le permite navegar a esta carpeta y crear la base de datos, de modo que en la carpeta "App_Data", haga clic derecho y seleccionar "Nuevo> Microsoft Office Access Application" y darle el nombre que quieras. Permite añadir un cuadro a esta base de datos y lo llaman "clientes" y dentro de esa tabla y añadir las siguientes columnas: "CustomerID (Autonumérico)", "Nombre (Texto)", "Apellido (texto)", "NumeroTelefonico (número)", . A continuación, sólo rellenar esta tabla con información falsa.
Configurar la página
Vamos a crear la página siguiente para este ejemplo: "los clientes. aspx ", idioma de la página:" Visual Basic ", y el código va a estar en la misma página, no en la página de código subyacente.
Una vez que tenga la página abierta en el youd como para mostrar todos los datos de la base de datos, primero tenemos que agregar dos espacios de nombres que van a ser usados en este ejemplo tan a la derecha en la parte superior tendrá las siguientes
VBNET Código: [ Select ]
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
- <%@ Page Language="VB" %>
- <%@ Import Namespace="System.Data" %>
- <%@ Import Namespace="System.Data.OleDb" %>
Así que esta continuación, importa la "System.Data" espacio de nombres y la "System.Data. OleDb "namsepace, estos naspaces no son una necesidad para la importación en la parte superior de nuestra página, pero hace la vida un poco más fácil en el largo plazo.
Conexión a la base de datos
Ahora se agrega el código en algún lugar de su página con las etiquetas de código (<%%>) a su alrededor:
VBNET Código: [ Select ]
Dim ConString As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("App_Data\Customers.mdb")
Dim oCon As OleDbConnection = New OleDbConnection(ConString)
oCon.Open()
Dim sQuery As String = "SELECT * FROM Customers"
Dim oCommand As OleDbCommand = New OleDbCommand(sQuery, oCon)
Dim oDataReader As OleDbDataReader = oCommand.ExecuteReader()
oCon.Close
Dim oCon As OleDbConnection = New OleDbConnection(ConString)
oCon.Open()
Dim sQuery As String = "SELECT * FROM Customers"
Dim oCommand As OleDbCommand = New OleDbCommand(sQuery, oCon)
Dim oDataReader As OleDbDataReader = oCommand.ExecuteReader()
oCon.Close
- Dim ConString As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("App_Data\Customers.mdb")
- Dim oCon As OleDbConnection = New OleDbConnection(ConString)
- oCon.Open()
- Dim sQuery As String = "SELECT * FROM Customers"
- Dim oCommand As OleDbCommand = New OleDbCommand(sQuery, oCon)
- Dim oDataReader As OleDbDataReader = oCommand.ExecuteReader()
- oCon.Close
Así que este código es el siguiente:
ConString es la cadena de conexión a la base de datos seleccionada, y el servidor ". MapPath "mapas de la ruta a la" App_Data \ Customers.mdb "para cuando esta se carga en el servidor / host que no tiene que agregar una ruta fija, pero se trabajó para nosotros.
oCon es la conexión a la base de datos que crea una conexión a la base de datos utilizando la cadena de conexión proporcionada ( "ConString").
oCon.Open () Se abre la conexión a la base de datos.
sQuery es la consulta SQL que especifique que se ejecutan en este sentido, en este caso, se recogieron todos los campos de la tabla Clientes.
oCommand es un comando de base de datos, y en este caso se establece "sQuery" a "oCon" listos para su ejecución
oDataReader es un lector de datos que en este caso ejecuta "oCommand" y lee todos los datos de esa base de datos con la consulta seleccionada.
oCon.Close () cierra la conexión de base de datos.
Lectura de datos de la base de datos de
Ahora que hemos definido el "oDataReader" como un OleDbDataReader podemos usarla para recorrer el pensamiento de los registros. Lo hacemos agregando el siguiente código que se coloca entre "oDataReader As oCommand.ExecuteReader OleDbDataReader = ()" y "Ocón. Close () "
VBNET Código: [ Select ]
While oDataReader.Read
Response.Write("<p>Name: " & oDataReader("Name") & "</p>")
Response.Write("<p>Name: " & oDataReader("LastName") & "</p>")
Response.Write("<p>Name: " & oDataReader("TelephoneNumber") & "</p>")
End While
Response.Write("<p>Name: " & oDataReader("Name") & "</p>")
Response.Write("<p>Name: " & oDataReader("LastName") & "</p>")
Response.Write("<p>Name: " & oDataReader("TelephoneNumber") & "</p>")
End While
- While oDataReader.Read
- Response.Write("<p>Name: " & oDataReader("Name") & "</p>")
- Response.Write("<p>Name: " & oDataReader("LastName") & "</p>")
- Response.Write("<p>Name: " & oDataReader("TelephoneNumber") & "</p>")
- End While
La página completa y #39; s código será somethig como este
VBNET Código: [ Select ]
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server"></script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>First Db Connection</title>
<link rel='stylesheet' type='text/css' href='stylesheet.css' />
</head>
<body>
<h1>First Db Connection</h1>
<p>This is a tutorial I found on Ozzu</p>
<%
Dim ConString As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("App_Data\Customers.mdb")
Dim oCon As OleDbConnection = New OleDbConnection(ConString)
oCon.Open()
Dim sQuery As String = "SELECT * FROM Customers"
Dim oCommand As OleDbCommand = New OleDbCommand(sQuery, oCon)
Dim oDataReader As OleDbDataReader = oCommand.ExecuteReader()
While oDataReader.Read
Response.Write("<p>Name: " & oDataReader("Name") & "</p>")
Response.Write("<p>Name: " & oDataReader("LastName") & "</p>")
Response.Write("<p>Name: " & oDataReader("TelephoneNumber") & "</p>")
End While
oCon.Close
%>
</body>
</html>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server"></script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>First Db Connection</title>
<link rel='stylesheet' type='text/css' href='stylesheet.css' />
</head>
<body>
<h1>First Db Connection</h1>
<p>This is a tutorial I found on Ozzu</p>
<%
Dim ConString As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("App_Data\Customers.mdb")
Dim oCon As OleDbConnection = New OleDbConnection(ConString)
oCon.Open()
Dim sQuery As String = "SELECT * FROM Customers"
Dim oCommand As OleDbCommand = New OleDbCommand(sQuery, oCon)
Dim oDataReader As OleDbDataReader = oCommand.ExecuteReader()
While oDataReader.Read
Response.Write("<p>Name: " & oDataReader("Name") & "</p>")
Response.Write("<p>Name: " & oDataReader("LastName") & "</p>")
Response.Write("<p>Name: " & oDataReader("TelephoneNumber") & "</p>")
End While
oCon.Close
%>
</body>
</html>
- <%@ Page Language="VB" %>
- <%@ Import Namespace="System.Data" %>
- <%@ Import Namespace="System.Data.OleDb" %>
- <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
- <script runat="server"></script>
- <html xmlns="http://www.w3.org/1999/xhtml" >
- <head runat="server">
- <title>First Db Connection</title>
- <link rel='stylesheet' type='text/css' href='stylesheet.css' />
- </head>
- <body>
- <h1>First Db Connection</h1>
- <p>This is a tutorial I found on Ozzu</p>
- <%
- Dim ConString As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("App_Data\Customers.mdb")
- Dim oCon As OleDbConnection = New OleDbConnection(ConString)
- oCon.Open()
- Dim sQuery As String = "SELECT * FROM Customers"
- Dim oCommand As OleDbCommand = New OleDbCommand(sQuery, oCon)
- Dim oDataReader As OleDbDataReader = oCommand.ExecuteReader()
- While oDataReader.Read
- Response.Write("<p>Name: " & oDataReader("Name") & "</p>")
- Response.Write("<p>Name: " & oDataReader("LastName") & "</p>")
- Response.Write("<p>Name: " & oDataReader("TelephoneNumber") & "</p>")
- End While
- oCon.Close
- %>
- </body>
- </html>
Conclusión
Hemos visto aquí de cómo conectarse a una base de datos y leer datos de ella y mostrarla en nuestra página. Así que los pasos que siguieron fueron: nos conectamos a la base de datos, abrir la conexión, se utiliza un OleDbDataReader leer a través de los registros, como el lector lee que escribir los resultados en nuestra página, y cerrar la conexión.
Let's leave all our *plum* where it is and go live in the jungle ...
- Anonymous
- Bot


- Registrado: 25 Feb 2008
- Mensajes: ?
- Loc: Ozzuland
- Status: Online
Marzo 10th, 2008, 7:36 am
Página 1 de 1
Para responder a este tema que necesita para ingresar o registrarse. Es gratis.
Publicar Información
- Total de mensajes en este tema: 2 mensajes
- Moderador: Tutorial Writers
- Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 1 invitado
- No puede abrir nuevos temas en este Foro
- No puede responder a temas en este Foro
- No puede editar sus mensajes en este Foro
- No puede borrar sus mensajes en este Foro
- No puede enviar adjuntos en este Foro

