Crear base datos ado y OleDb
Publicado por Ricardo (8 intervenciones) el 18/11/2010 10:08:40
Hola: Les pido a ver si me pueden ayudar.
Siempre he trabajado con VB6 y DAO.
Creaba mis Bases de Datos con DAO en código de VB6, creaba la bases de datos, las tablas, los campos, etc.
Ahora he empezado a trabajar con VB 2010 Express y me voy adaptando poco a poco.
He empezado a trabajar con un programa que utiliza una base de Datos y me conecto a ella sin problemas con OleDb como pueden ver en el código siguiente que utilizo.
Dim ConexionConBD As OleDbConnection
Dim strConexion As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\archivo.mdb;"
Dim dsDataSet As DataSet
Dim daDataAdapter As OleDbDataAdapter
Abrir Base de Datos.
ConexionConBD = New OleDbConnection(strConexion)
daDataAdapter = New OleDbDataAdapter("SELECT * FROM Clientes", ConexionConBD)
dsDataSet = New DataSet
daDataAdapter.Fill(dsDataSet)
Mi problema es el siguiente :
Quiero encontrar el código en VB 2010 Express y OleDb para crear la Base de Datos.
He utilizado el siguiente, pero no la crea y me da error en la conexión pues la base de datos no existe.
'Crear la Base de Datos.
ConexionConBD = New OleDbConnection(strConexion)
strSQL = "CREATE DATABASE archivo.mdb"
Command = New OleDbCommand(strSQL, ConexionConBD)
ConexionConBD.Open()
Command.ExecuteNonQuery()
ConexionConBD.Close()
Me pueden ayudar con el código.
Muchas Gracias.
Ricardo
[email protected]
Siempre he trabajado con VB6 y DAO.
Creaba mis Bases de Datos con DAO en código de VB6, creaba la bases de datos, las tablas, los campos, etc.
Ahora he empezado a trabajar con VB 2010 Express y me voy adaptando poco a poco.
He empezado a trabajar con un programa que utiliza una base de Datos y me conecto a ella sin problemas con OleDb como pueden ver en el código siguiente que utilizo.
Dim ConexionConBD As OleDbConnection
Dim strConexion As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\archivo.mdb;"
Dim dsDataSet As DataSet
Dim daDataAdapter As OleDbDataAdapter
Abrir Base de Datos.
ConexionConBD = New OleDbConnection(strConexion)
daDataAdapter = New OleDbDataAdapter("SELECT * FROM Clientes", ConexionConBD)
dsDataSet = New DataSet
daDataAdapter.Fill(dsDataSet)
Mi problema es el siguiente :
Quiero encontrar el código en VB 2010 Express y OleDb para crear la Base de Datos.
He utilizado el siguiente, pero no la crea y me da error en la conexión pues la base de datos no existe.
'Crear la Base de Datos.
ConexionConBD = New OleDbConnection(strConexion)
strSQL = "CREATE DATABASE archivo.mdb"
Command = New OleDbCommand(strSQL, ConexionConBD)
ConexionConBD.Open()
Command.ExecuteNonQuery()
ConexionConBD.Close()
Me pueden ayudar con el código.
Muchas Gracias.
Ricardo
[email protected]
Valora esta pregunta


0