Conexion a Base de Datos con Visual Basic .Net

Luego de dar el salto desde visual basic 6.0 hasta Visual Basic .Net (con la finalidad de ir acorde con la tecnología) y por lo que demanda el mercado de desarrollo de aplicaciones, me encontré con la triste realidad de descubrir que la forma de realizar las conexiones a Base de datos en esta nueva plataforma era un poco diferente.

Busqué en muchos tutoriales  que en vez de aclararme lo que hacían era confundirme más, por fin pude ver la luz al final del camino, luego leer y leer y practicar logre lo que por fin deseaba “El Manejo de Base de Datos desde la plataforma de .Net”, he decidido compartir con ustedes amables lectores de forma sencilla y simple como conectarnos a una base de datos.
Lo primero es saber que existen múltiples formas de realizar una conexión. En esta oportunidad lo haremos desde un módulo, donde declaramos todos los objetos necesarios para que la misma funcione.

En primer lugar debemos importar los nombre de espacio necesarios para el acceso a datos, estos namespace (nombre de espacio) son:
Imports System.Data
Obligatorio para manejo de datos.
Dependiendo del tipo de base de datos a utilizar se utilizará:
Imports System.Data.OleDb (para base de datos Access)
Imports System.Data.SqlClient (para base de datos SQL SERVER)
Imports System.Data.ODBC (para base de datos mediante uin controlador ODBC).
Con lo que los namespace quedarian de la suguiente forma si es para una base de datos Access:
Imports System.Data
Imports System.Data.OleDb
Dentro del modulo precedemos a declarar una variable pública del tipo de conexión que hayamos declarado en el namespace,para que sea visible desde cualquier parte del proyecto
Module Conexion
' Declaración de la variable
Public conectarme As New OleDbConnection
Luego declaramos un procediemiento público desde donde manejaremos la variable que acabamos de crear.
Public Sub conexiones()
End Sub
End Module
Después asignamos a la variable la conectarme la cadena de conexión, la misma debe hacerce dentro de comilla dobles.
conectarme.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\data.mdb;"

En seguida hacemos uso del manejo de errores mediante la instrucción Try:
Try
If conectarme.State = ConnectionState.Open Then
MessageBox.Show("Ya está conectado")
Else
conectarme.Open()
' MessageBox.Show("Conectado a Access")
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
End Module
A continuación como quedaria el código completo para manejar la conexión, en otra entrega veremos como manejar las diferentes opciones de una base de datos como son : insertar, actualizar, buscar y eliminar un regitro.
Imports System.Data
Imports System.Data.OleDb
Module Conexion
Public conectarme As New OleDbConnection
Public Sub conexiones()
conectarme.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\data.mdb;"
Try
If conectarme.State = ConnectionState.Open Then
MessageBox.Show("Ya está conectado")
Else
conectarme.Open()
' MessageBox.Show("Conectado a Access")
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
'Aqui Mostraria un mensaje en caso de que se produsca un error.
End Try
End Sub
End Module