Koneksi Visual Basic.NET

Sekarang semakin banyak program yang dibuat menggunkan VB.NET terutama yang menggunkan koneksi database. ada bayak database yang dapt di gunakan di VB ini diantaranya:
=> Microsoft Access
=> SQL Server
=> Mysql
=> dll

disini akan menjelaskan koneksi ke beberapa database tersebut.
1. Microsoft Access
Access merupakan salah satu aplikasi database yang digunakan. untuk melakukan koneksi database. di bahak ini koneksi yang dapat dilakukan:
a. Microsoft Access 2003

strConn = "provider=microsoft.jet.oledb.4.0; data souce= (nama database)"

b. Microsoft Access 2007/ 2010

strConn = "provider=microsoft.ACE.oledb.12.0; data souce= (nama database)"

2.Sql Server
Sql Server juga merupakan produkan microsoft yang di peruntut untuk membuat data base. adapun koneksi yang dapat dilakukan yaitu:

a. koneksi biasa

strConn = "Server=" & dbServer & ";Database=" & dbName & ";Trusted_Connection=True;"

b. Koneksi yang menggunakan username dan password

strConn = "Database=" & dbName & ";server=" & dbServer & ";uid=" & dbUid & ";pwd=" & dbPass

c.koneki yang menggunakan port

strConn = "Database=" & dbName & ";server=" & dbServer & ":" & dbPort & ";uid=" & dbUid & ";pwd=" & dbPass

3. Mysql

strConn ="Driver= { MYSQL ODBC 3.51 criver}; database= (nama database); server=localhost;uid=root"

localhost yaitu sebagai nama server yang di pake.


untuk membuat koneksi yang lengkap sebagai berikut. kita harus membuat modul terlebih dahulu lalu isi modul tersebut dengan code di bawah ini:


Imports System.Data
Imports System.Data.OleDb

Module Module1
    Public Conn As OleDbConnection
    Public da As OleDbDataAdapter
    Public ds As DataSet
    Public cmd As OleDbCommand
    Public rd As OleDbDataReader
    Public strConn As String

    Public Sub Koneksi()
        strConn = "provider=microsoft.jet.oledb.4.0;data source=db1.mdb"
        Conn = New OleDbConnection(strConn)
        If Conn.State = ConnectionState.Closed Then
            Conn.Open()
        End If
    End Sub

End Module 

semoga membantu, selamat mencoba..............