Cara membuat Modul Koneksi SQL di VB.Net

Cara membuat Modul Koneksi SQL di VB.Net – Setelah kita tahu cara mengkoksikan sql server, selanjutnya saya akan membagikan cara untuk membuat modul koneksi nya. fungsi modul koneksi ini sebagai perantara atau cara untuk memanggil database yang kita miliki agar bisa terhubung dan bisa di pakai.

Langsung saja caranya sangat mudah, ikuti perintah berikut ini :

1. Buka Visual Studio yang anda miliki, saya asumsikan disini kita sudah membuat satu projek sehingga kita cukup mengklik kanan pada project kita lalu pilih add->module, lihat gambar

2. Lalu OK, dan kemudian kita isikan nama modul kite, misal Mkoneksi
3. Jika sudah maka kita berhasil menambahkan Mkoneksi ke dalam project kita
4. Selanjutnya Double Klik Mkoneksi kita dan masukkan Koding dibawah ini, sebagai koneksi untuk database ke project kita.

‘wajib untuk menggunakan SQL
Imports System.Data
Imports System.Data.SqlClient
Module MConnection
    ‘========= SQL CLIENT =======’
    Public conn As New SqlConnection
    Public cmd As New SqlCommand
    Public rd As SqlDataReader
    Public lst As ListViewItem
    Public connectionString, sql, str As String
    Public edit As Boolean
    Public Sub openConn()
        connectionString = “Data Source=LP3I-PCSQLEXPRESS;” & _
                            “Initial Catalog=DBPegawai; ” & _
                            “Integrated Security=True”
        conn = New SqlConnection(connectionString)
        Try
            If conn.State = ConnectionState.Closed Then
                conn.Open()
            End If
        Catch ex As Exception
            MsgBox(“Koneksi Gagal : ” & ex.Message)
        End Try
    End Sub
    Public Sub Exec(ByVal Query As String) ‘ untuk insert, update, delete
        Try
            cmd = New SqlCommand(Query, conn)
            cmd.ExecuteNonQuery()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
    Public Sub Read(ByVal Query As String) ‘untuk select
        Try
            cmd = New SqlCommand(Query, conn)
            rd = cmd.ExecuteReader() ‘nampung data
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
End Module

Tulisan yang saya birukan adalah untuk memanggil server yang kita miliki, dan nama database yang kita miliki dan sudah di buat sebelumnya.

Demikian Cara membuat Modul Koneksi SQL di VB.Net, semoga bermanfaat bagi anda yang sedang belajar program Visual Studio

Add a Comment

Your email address will not be published. Required fields are marked *