Cara menulis fungsi di VB.net untuk terhubung ke Database Server MySQL – PHSARIT

1. Konsep Umum:

Ada banyak mesin database untuk menyimpan tabel data seperti MySQL Server, Microsoft SQL Server, SQLLite, dll. Mereka bekerja sebagai RDBMS yang merupakan singkatan dari Relational Database Management System. Jadi Bagaimana cara menghubungkan dari Pemrograman VB.net ke Database Server MySQL? Sebagai program tampaknya terpisah satu sama lain karena perbedaan perusahaan. VB.net atau Visual Basic Dot Net datang dari Microsoft Company dimana MySQL Server mungkin berasal dari berbagai sumber dari berbagai perusahaan. Oleh karena itu, untuk terhubung dari VB.net ke Database Server MySQL, silakan kunjungi tutorial kami sebelumnya Koneksi Database menggunakan pemrograman Vb.net, Anda dapat mengunduh pustaka file .DLL dan memulai langkah demi langkah untuk menginstalnya dan menghubungkan VB .net dan Database Server MySQL.

2. Persyaratan Perangkat Lunak

Untuk bekerja dengan tutorial ini, Anda harus memiliki:

  1. Microsoft Visual Studio 2015 hingga versi terbaru
  2. Server WAMP atau Server XAMPP (kedua perangkat lunak ini berisi Database Server MySQL otomatis)

Setelah instalasi WAMP Server, Anda akan melihat phpmyadmin di Peralatan setelah itu klik itu maka anda akan melihat seperti foto berikut

Secara Default dari Database Server MySQL, Nama Pengguna harus akar dan Password harus dikosongkan. Pilihan Server, Anda dapat memilih MySQL atau MariaDB.

3. Tutorial

LANGKAH 1: Masuk ke Database MySQL, lalu buat database. Beri nama sebagai kontrakan rumah. Di Database MySQL, silakan Pilih pada Database lalu beri nama dan klik Membuat

LANGKAH 2: Pergi ke Microsoft Visual Studio Buat proyek. Dalam proyek Anda, silakan buat formulir baru

Kemudian Klik oke. Setelah klik Ok, Anda bisa pergi ke Form1 dan mereka mengimplementasikan kode seperti di bawah ini:

Imports MySql.Data.MySqlClient
Public cn As New MySqlConnection
    Dim cm As New MySqlCommand
    Dim result As Boolean
    Dim conString As String
    Dim sql As String
    Public Function OpenDB() As Boolean
        Try
            If cn.State = ConnectionState.Closed Then
                conString = "server=localhost;user=root;password=;database=houserenting"
                cn.ConnectionString = conString
                cn.Open()
                result = True
                MsgBox("Connection Successfully", vbInformation)
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
            result = False
        End Try
        Return result
    End Function

pada Header Formulir, harap sertakan Mengimpor MySql.Data.MySqlClient. Kemudian masuk ke Form1 anda, pada Form_Load Event, silahkan tuliskan kode dibawah ini :

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        OpenDB()
    End Sub

Hasil dari kompilasi: