Insert Data Dari Aplikasi VB.Net Ke Database MySQL
Insert Data Dari Aplikasi VB.Net Ke Database MySQL – Ok setelah pada tutorial sebelumnya kita telah membuat desain interface dan juga module koneksi dari vb.net ke MySQL. Sekarang kita lanjut ke tahap selanjutnya. Disini kita akan mencoba membuat perintah untuk memasukan data dari txtNama, txtNoTelp dan seterusnya kedalam database sekolah di MySQL. Untuk melakukan perintah insert data dari VB.Net ke database di MySQL, langkah pertama adalah import terlebih dahulu MySQL.Data.MySqlCLient seperti berikut :
Imports MySql.Data.MySqlClient
Lalu selanjutnya klik dua kalik btnSimpan, karena trigger dari perintah ini akan dilaksanakan jika btnSimpan diklik. Selanjutnya ketikan perintah seperti berikut ini :
Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSimpan.Click Call koneksi() Try Dim str As String str = "insert into siswa values ('" & txtNip.Text & "','" & txtNama.Text & "', '" & txtNoTelp.Text & "', '" & rtbAlamat.Text & "')" cmd = New MySqlCommand(str, conn) cmd.ExecuteNonQuery() MessageBox.Show("Insert Data Siswa Berhasil Dilakukan") Catch ex As Exception MessageBox.Show("Insert data siswa gagal dilakukan.") End Try End Sub
Logic dari perintah diatas adalah, pertama kita memanggil Subroutine koneksi yang ada pada module koneksi ke MySQL yang sebelumnya sudah dibuat, lalu membuat sebuah variable string dengan nama str dimana variable str ini merupakan variable yang akan digunakan untuk menampung perintah MySQL yang akan digunakan. Selanjutnya mengeksekusi perintah pada variable str dengan menggunakan perintah MySQLCommand.
Jika sukses maka data akan tersimpan di database MySQL. Berikut ini adalah source lengkap dari sistem atau aplikasi yang sedang kita buat :
Imports MySql.Data.MySqlClient Public Class Form1 Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSimpan.Click Call koneksi() Try Dim str As String str = "insert into siswa values ('" & txtNip.Text & "','" & txtNama.Text & "', '" & txtNoTelp.Text & "', '" & rtbAlamat.Text & "')" cmd = New MySqlCommand(str, conn) cmd.ExecuteNonQuery() MessageBox.Show("Insert Data Siswa Berhasil Dilakukan") Catch ex As Exception MessageBox.Show("Insert data siswa gagal dilakukan.") End Try End Sub End Class
Oke sekarang coba jalankan programnya, jika berhasil nanti akan keluar message box dengan informasi bahwa data siswa sudah berhasil ditambahkan dan jika gagal juga akan menampilkan message box yang memberikan informasi bahwa data siswa gagal ditambahkan.
Nah pada contoh diatas data siswa berhasil ditambahkan, sekarang kita coba cek di database yang ada di MySQL apakah data siswa dengan nama Muhammad Ammar yang baru ditambahkan tersebut apakah benar benar sudah masuk kedalam database atau tidak dengan menggunakan perintah select seperti berikut :
mysql> select * from siswa; +----------+--------------------+--------------+-------------------------------+ | NIP | NAMA | NOTELP | ALAMAT | +----------+--------------------+--------------+-------------------------------+ | 10108822 | Virdane Ardiansyah | 123456789101 | JL. KH. Atim II Rangkasbitung | | 10108823 | Muhammad Ammar | 081211223321 | JL. Depag No 13 L. | +----------+--------------------+--------------+-------------------------------+ 2 rows in set (0.00 sec) mysql>
Oke data siswa yang baru sudah berhasil ditambahkan kedalam tabel siswa yang ada didalam database sekolah.
Seperti itulah cara bagaimana melakukan insert data dari VB.Net ke dalam database MySQL. Pada kesempatan selanjutnya kita akan membahas mengenai bagaimana cara menampilkan data siswa kedalam datagridview yang sudah dibuat.
Jangan lupa untuk terus berkunjung ke lebakcyber.net untuk mendapatkan tutorial mengenai visual basic.net lainnya.
bang, msh gagal juga kenapa ya? padahal udh sama semua caranya. to;ong bantuan nya
Keterangan errornya apa ya mas? modul koneksinya sudah di buat belum?
bisa dipelajari di https://lebakcyber.net/membuat-module-koneksi-vb-net-dan-mysql/
maaf mas kalo yang muncul notif gagal disimpan itu periksa dimananya ya yang salah input?
terimakasih
Mau nanya dong, kalo simpan ke dalam 2 tabel sekaligus gimana? Soalnya saya sudah coba sperti gini
Dim simpan as string = “Insert into siswa(NIS, Nama) (select NIS, Nama from siswa1) values ?,?”
Trus parameternya dibawah, tp tetep gak bisa terus udh di otak atik kodingnya tetap aj gk bs, mohon penjelasannya
Terima kasih
Mas mau nanya, klo error nya karena Authentication method ‘caching_sha2_password’ not supported by any of the available plugins. Itu solusi nya bgaimna?
mas mau nanya untuk data bases y menggunakan phpmyadmin , cmd = new mysqlcommand y sama aja apa cmd y di ganti
makasih sebelumnya
sama saja bisa, mau di ganti juga ga apa2 mas.
bang itu buat connect ke mysql kenapa gak di taruh di modul
Dibuat di modul juga ko, bisa dilihat disini : https://lebakcyber.net/membuat-module-koneksi-vb-net-dan-mysql/