lunes, 31 de octubre de 2016
jueves, 13 de octubre de 2016
CONEXION DE BD DENTRO DE UN PROYECTO
octubre 13, 2016
No comments
CREAR UN MODULO DENTRO DEL PROYECTO
Imports System.Data.OleDb
Module funcionesDb
' CREAR CONEXION
Private ConecBD As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=BDInventario.accdb;")
Public Sub Conectarse()
Try
ConecBD.Open()
MsgBox("Conexion exitosa")
Catch ex As Exception
MsgBox("Conexion fallida")
End Try
End Sub
End Module
CÓDIGO EN EL FORMULARIO
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Conectarse()
End Sub
Imports System.Data.OleDb
Module funcionesDb
' CREAR CONEXION
Private ConecBD As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=BDInventario.accdb;")
Public Sub Conectarse()
Try
ConecBD.Open()
MsgBox("Conexion exitosa")
Catch ex As Exception
MsgBox("Conexion fallida")
End Try
End Sub
End Module
CÓDIGO EN EL FORMULARIO
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Conectarse()
End Sub
