Visual Basic.NET - Ayuda Conexion a BD de Acces

   
Vista:

Ayuda Conexion a BD de Acces

Publicado por noe velazquez  (3 intervenciones) el 21/07/2008 04:47:13
Hola foro !!

espero me puedan ayudar en mi problema, tengo estos dos codigo para conexion hacia Access
pero marca un error sobre OleDbConnection soy novato en VB Net no se NADA estoy tratando de aprender y estoy trabajando con Visual Studio 2005

Dim strConexion As String = ""
Dim miConexion As OleDbConnection = New OleDbConnection(strConexion)
Dim strComando As String = ""
Dim miComando As OleDbCommand = New OleDbCommand(strComando, miConexion)

Private cnConexion As OleDbConnection = New OleDbConnection()
Private dbaAdaptador As OleDbDataAdapter
Private dsDatos As DataSet
Private bmbEnlaceBase As BindingManagerBase
Private dbcComando As OleDbCommandBuilder

en que estoy mal ?

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda Conexion a BD de Acces

Publicado por P. J. (706 intervenciones) el 21/07/2008 17:03:50
Claro que te dara un error, porque no indicas nada en strConexion

Alli debe estar el proveedor, ruta del archivo. En esta pagina estan varias cadenas de conexion a diferentes manejadores de BD :

http://www.connectionstrings.com/
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda Conexion a BD de Acces

Publicado por RICARDO MANCILLA (23 intervenciones) el 28/07/2008 22:20:19
AMIGO AQUI TE ENVIO UNA CADENA DE CONEXION QUE FUNCIONA A LA PERFECCION

Imports Microsoft.VisualBasic
Imports System.Data
Imports System.Data.OleDb
Imports System
Imports System.IO
Imports System.Collections

Public Class base
Public conexion As OleDbConnection
Public consulta As oledbdataadapter
Public operacion As OleDbCommand
Public registros As DataSet
Public ruta
Public AppPath As String = System.IO.Directory.GetCurrentDirectory()

' CONTRUCTOR
Sub New()
Try ' POR SI QUIERES EVITAR EXCEPCIONES
conexion = New OleDbConnection("Provider=Microsoft.Jet.OleDB.4.0; data source="DIRECCION BD")
conexion.Open()
Catch ex As Exception
MsgBox("Error: No se encuentra la Base de Datos",MsgBoxStyle.Critical)
End
End Try
End Sub

Public Function cerrarbd() ' FUNCION PARA CERRAR LA BD
conexion.Close()
Return 0
End Function

Public Function ejecutar_consulta(ByVal cadena As String) As Object ' FUNCION PARA REALIZAR CONSULTAS
consulta = New OleDbDataAdapter(cadena, conexion)
registros = New DataSet
consulta.Fill(registros)
Return registros
End Function

Public Function ejecutar_operacion(ByVal cadena As String) As Boolean ' FUNCION PARA REALIZAR OPERACIONES (INSERT, UPDATE, DELETE)
Dim salida
operacion = New OleDbCommand(cadena, conexion)
salida = operacion.ExecuteNonQuery()
Return salida
End Function
End Class

ESPERO TE SIRVA DE ALGO
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar