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
