Koneksi vb dengan mysql dengan odbc

Membuat Koneksi Database MySQL ODBC #tutorialvb.net - priacoding. Pada postingan kali ini priacoding akan membahas tentang bagaimana cara membuat koneksi MySQl pada VB.Net. ODBC [Open Database Connectivity] merupakan sebuah standar terbuka untuk menghubungkan antar mesin database. Standar ini menyediakan API yang dapat digunakan untuk menjalankan dan mengoneksikan sebuah aplikasi dengan sebuah sistem database.

Langsung saja ikuti langkah-langkah berikut..

1. Install ODBC Connector terlebih dahulu

2. Buka ODBC Connector

Pada Control Panel → Administrative Tools → ODBC Connector, dan tampilanya seperti gambar

3. Klik Add dan pilih "MySQL ODBC 5.1 Driver" → "Finish"

4. Tahap pembuatan DSN [Data Source Name]

Isikan DSN dan Database, seperti gambar

db_test → database yang telah dibuat pada MySQL
Klik tombil "Test", jika ada jendela "koneksi sukses", maka pembuatan DSN berhasil → OK

5. Membuat module koneksi pada VB.Net

Tambahkan OdbcConnection pada project anda

Pada jendala Properties pada menu ConnectionString, klik "New Connention", tambahkan DSN "Test" yang telah kita buat tadi → OK

6. Pembuatan Module Koneksi

klik kanan pada project → add → Module. Seperti gambar..

Pada jendela code editor pastekan coding dibawah


Imports System.Data.Odbc
Module module_koneksi
    Public CONN As OdbcConnection
    Public CMD As OdbcCommand
    Public DR As OdbcDataReader
    Public DA As OdbcDataAdapter
    Public QUERY As String
    Public DS As DataSet
    Public DT As DataTable

    Sub KONEKSI[]
        Dim str As String = "Dsn=Test"
        CONN = New OdbcConnection[str]
        If CONN.State = ConnectionState.Closed Then
            CONN.Open[]
            MsgBox["Koneksi Berhasil"]
        Else
            MsgBox["Koneksi Gagal"]
        End If
    End Sub
End Module
   

7. Pada Form1_Load panggil koneksi, yang kita buat tadi


Private Sub Form1_Load[sender As Object, e As EventArgs] Handles MyBase.Load
        Call KONEKSI[]
    End Sub

Hasil

Unduh Sourcecode
Pass: priacoding.com

Terimakasih, semoga bermanfaat..

Baca Juga:

  • Cara Mencari Nilai Terbanyak, Tertinggi, Terendah, Rata-rata dan Total
  • Koneksi Database Ms. Access [.Mdb]


Note
Himbauan : Jika artikel ini memang berguna untuk teman-teman, MOHON artikel ini dibagikan kepada yang lain AGAR teman-teman kita juga mendapat manfaatnya. Terimakasih..

08 October 2020 05:34 2621 View

Hallo teman-teman di kesempatan kali ini saya akan menjelaskan cara membuat sebuah CRUD [Create Read Update dan Delete] atau di dalam bahasa Indonesia simpan, edit dan hapus di visual basic.Net  2010 dengan database MySQL dan Connector ODBC 

Terlebih dahulu teman-teman bisa siapkan Tools ini
1.    Anda sudah menginstall Visual Basic atau Visual Studio 2010 atau versi baru
2.    Anda sudah menginstall database MysQL XAMPP
3.    Anda sudah menginstall Connector MySQL ODBC

Jika tools diatas belum ada harap download terlebih dahulu disini

Langkah - 1 Jalankan XAMPP

Pastikan Apache actionnya posisi Stop dan MySQL stop 

Setelah Apache dan MysQL dalam keadaan running seperti gambar diatas,

Langkah - 2 Buat Database


Jika sudah silahkan buka browser anda. Kemudian masuk ke PHP MyAdmin : //localhost/phpmyadmin/
Maka akan muncul tampilan dibawah ini :

Langkah - 3 Import Database

Jika sudah memiliki database yang di download di GITHUB  jika tidak harap jalankan query dibawah ini di menu SQL

-- phpMyAdmin SQL Dump
-- version 4.9.0.1
-- //www.phpmyadmin.net/
--
-- Host: 127.0.0.1
-- Waktu pembuatan: 08 Okt 2020 pada 07.03
-- Versi server: 10.4.6-MariaDB
-- Versi PHP: 7.3.8

SET SQL_MODE = "NO_AUTO_VALUE_ON_ZERO";
SET AUTOCOMMIT = 0;
START TRANSACTION;
SET time_zone = "+00:00";


/*!40101 SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT */;
/*!40101 SET @OLD_CHARACTER_SET_RESULTS=@@CHARACTER_SET_RESULTS */;
/*!40101 SET @OLD_COLLATION_CONNECTION=@@COLLATION_CONNECTION */;
/*!40101 SET NAMES utf8mb4 */;

--
-- Database: `crud_vbnet`
--

-- --------------------------------------------------------

--
-- Struktur dari tabel `tbl_biodata`
--

CREATE TABLE `tbl_biodata` [
  `KODE` int[11] NOT NULL,
  `NAMA` varchar[50] NOT NULL,
  `ALAMAT` varchar[100] NOT NULL
] ENGINE=InnoDB DEFAULT CHARSET=latin1;

--
-- Dumping data untuk tabel `tbl_biodata`
--

INSERT INTO `tbl_biodata` [`KODE`, `NAMA`, `ALAMAT`] VALUES
[8, 'DELISMAN HULU', 'JLN GAHARU MEDAN NO.2'],
[11, 'AFRNI GEA', 'TERERERER'];

--
-- Indexes for dumped tables
--

--
-- Indeks untuk tabel `tbl_biodata`
--
ALTER TABLE `tbl_biodata`
  ADD PRIMARY KEY [`KODE`];

--
-- AUTO_INCREMENT untuk tabel yang dibuang
--

--
-- AUTO_INCREMENT untuk tabel `tbl_biodata`
--
ALTER TABLE `tbl_biodata`
  MODIFY `KODE` int[11] NOT NULL AUTO_INCREMENT, AUTO_INCREMENT=12;
COMMIT;

/*!40101 SET CHARACTER_SET_CLIENT=@OLD_CHARACTER_SET_CLIENT */;
/*!40101 SET CHARACTER_SET_RESULTS=@OLD_CHARACTER_SET_RESULTS */;
/*!40101 SET COLLATION_CONNECTION=@OLD_COLLATION_CONNECTION */;

Jika sudah selesai pastikan struktur tabel nya seperti gambar di bawah ini

Langkah - 4 Buat Koneksi ODBC

Di langkah ini pastikan sudah instal Connector ODBC dan lalu cari start ketik ODBC seprti gambar dibawah ini dan pilih versi odbc anda disini saya menggunkan windows 10 64 bit

Jika sudah di klik ODBC maka muncul tampilan seperti ini 

Lalu Klik Add untuk menambahkan data source DNS dan muncul tampilan seperti gambar di bawah ini

Lau cari Mysql ODBC 3.51 Driver tapi harap sesuikan dengan versi ODBC anda jika sudah double klik maka muncul tampilan seperti dibawah ini.

Setelah siap di ini form koneksinya lalu Ok

Langkah - 5 Buat Koneksi di VB.Net

Setelah buat koneksi di Connector ODBC lalu buatkan Project VB dan buat Module dan klik Button Add

Setelah di buat Add lalu buatkan koneksi dibawah ini  namun di bagian DNS=CRUD_VBNET pastikan sudah sesuai dengan nama yang di buat di Connetor ODBC 

Imports System.Data.Odbc
Module Module1

    Public Konek As OdbcConnection
    Public DA As OdbcDataAdapter
    Public DR As OdbcDataReader
    Public DS As DataSet
    Public CMD As OdbcCommand

    Sub KonekDB[]
        Try
            Konek = New OdbcConnection["DSN=CRUD_VBNET;MultipleActiveResultSets=True"]
            If Konek.State = ConnectionState.Closed Then
                Konek.Open[]
            End If
        Catch ex As Exception
            MsgBox["Koneksi Gagal", vbExclamation, "Koneksi Gagal"]
        End Try
    End Sub
End Module

Jika sudah siap ikut langkah-langkah diatas maka sekarang kita akan buat design FORM CRUD.

Tutorial CRUD - Cara Buat CRUD VB Net dan ODBC MySQL - Simpan Edit dan Hapus

Semoga berhasil dan dapat mengikuti tutorial ini. Terimakasih

Rekomondasi

Apa itu koneksi ODBC?

Konektivitas Database Terbuka [ODBC] adalah protokol yang dapat Anda gunakan untuk menyambungkan database Microsoft Access ke sumber data eksternal, seperti Microsoft SQL Server.

Bagaimana tahapan mengkoneksikan database menggunakan visual basic?

Cara Mengkoneksikan Visual Basic ke Database MySQL.
Download Connector/ODBC..
Install mysql-connector-odbc-8.0.19-winx64.msi..
Jalankan Connector/ODBC, cari dan klik ODBC Data Source..
Klik Add untuk menambahkan driver koneksi..
pilih MySql ODBC 8.0 ANSI Driver..

Bài mới nhất

Chủ Đề