Simpan Data Visual Basic

Posted on
Cara menyimpan data ke dalam database menggunakan visualbasic vb.net

Cara menyimpan data ke dalam database menggunakan Visualbasic .Net kali ini membahas bagaimana cara membuat script atau coding untuk menyimpan data yang ada di program kita kedalam database yang telah kita buat.Dalam tutorial kali ini tidak akan dijelaskan cara membuat databasenya, Saya harap Anda sudah membaca artikel Cara membuat database dengan microsoft access. Agar pada tutorial kali ini Anda lebih memahami script atau coding yang Saya buat.

Artikel Lain: Membuat Backsound Visual Basic

Untuk menyimpan data kita membutuhkan beberapa komponen yang harus disiapkan yaitu module sebagai file koneksi kita kedalam database, lalu deklarasi koneksi di form yang akan kita gunakan sebagai variabel inputan data, agar lebih jelas Saya sarankan lihat juga Video tutorialnya dibawah.

Cara menyimpan data ke dalam database menggunakan Visualbasic .Net:

1. Dalam kasus ini kita punya database dengan nama [mudamers.mdb], database tersebut berformat .mdb atau Format access 2003 jika menggunakan access 2007 bisa Anda Save As dan Pilih formatnya ke yang 2003, lalu database tersebut berisi tabel bernama tbmudamers.

2. Dalam tabel tbmudamers kita punya dua Field yang bertype Text semua, yaitu nomudamers dan mudamu.

3. Strukturnya seperti ini Database=[mudamers.mdb], Tabel=[tbmudamers], Field=[nomudamers],[mudamu].

4. Paste database yang sudah Anda buat ke direktori bindebug Project Anda, sekarang buka project Visualbasic .Net Anda, Tambahkan satu Button, satu buah ListView, dua buah Textbox.

5. Klik kanan pada ListView >> Edit Columns.

6. Karena tabel database yang kita buat kita hanya memiliki dua buah Field jadi tambahkan kolom sebanyak dua buah saja.

7. Setelah Edit Columns tadi, klik Add sebanyak dua kali, untuk menambahkan dua kolom.

8. Edit Text ColumnHeader Propertiesnya beri nama ColumnHeader1=nomudamers, Columnheader2=mudamu.

9. Klik Ok jika sudah selesai.

10. Masih pada ListView, di Window Properties sebelah kanan ubah GridLines dari False set menjadi True.

11. Ubah juga pada Properties View set dari LargeIcon menjadi Details.

12. Beralih ke Solution Explorer yang berada di window pojok kanan Project Anda.

13. Klik kanan pada project Anda Pilih Add >> New Folder, rename folder tersebut dengan nama accessdata, didalam folder inilah kita akan membuat module koneksi.

14. Klik Kanan pada Folder tersebut pilih Add >> Module, beri nama koneksidata lalu klik Add.

15. Setelah module dibuat, hapus semua kode di module dan pastekan kode atau scriptnya seperti ini:

Imports System.Data.OleDb
Namespace accessdata
    Public Class koneksidata
        Dim conect As New OleDbConnection(“Provider=Microsoft.Jet.OLEDB.4.0; Data Source=mudamers.mdb;”)
        Public Function open() As OleDbConnection
            conect.Open()
            Return conect
        End Function
        Public Function close() As OleDbConnection
            conect.Close()
            Return conect
        End Function
    End Class
End Namespace
Module koneksidata
End Module

16. Beralih ke Form Project Anda, Klik dua kali pada Project Anda.

17. Taruh kode dibawah ini diatas sendiri (Ingat paling atas, bukan di event load form).

Imports System.Data.OleDb

18. Pastekan juga kode dibawah ini dibawah kode “Public Class Form1” yang berada di bawah kode yang Anda taruh tadi.

#Region “soni_connection”
    Dim sonikoneksi As New accessdata.koneksidata
    Dim sonitipekoneksi As New OleDbConnection
    Dim perintahsoni As New OleDbCommand
    Dim sonikoneksiadapter As OleDbDataAdapter
    Dim sonikoneksireader As OleDbDataReader
    Dim sonikoneksiset As New DataSet
    Dim koneksitablesoni As New DataTable
#End Region
#Region “mudamu_baca”
    Sub bacamudamers()
        Dim isi As ListViewItem
        ListView1.Items.Clear()
        perintahsoni = sonikoneksi.open.CreateCommand
        perintahsoni.CommandText = “select * from tbmudamers”
        sonikoneksireader = perintahsoni.ExecuteReader
        While sonikoneksireader.Read
            isi = ListView1.Items.Add(sonikoneksireader.Item(“nomudamers”).ToString)
            isi.SubItems.Add(sonikoneksireader.Item(“mudamu”).ToString)
        End While
        sonikoneksi.close()
    End Sub
#End Region

19. Setelah itu kembali ke Form Project Anda, Klik dua kali pada buttonnya, setelah itu tambahkan script di event clicknya button seperti ini:

perintahsoni.CommandText = “insert into tbmudamers values(‘” & Me.TextBox1.Text & “‘,'” & Me.TextBox2.Text & “‘)”
        perintahsoni.Connection = sonikoneksi.open
        perintahsoni.ExecuteNonQuery()
        sonikoneksi.close()
        bacamudamers()

20. Selesai seperti itulah kira-kira menyimpan data menggunakan Visualbasic .Net.

Penjelasan :

Code 1:Kode tersebut untuk menghubungkan program Kita dengan database mudamers.mdb (Bisa Anda sebut File Koneksi).

Code 2: Kode tersebut adalah kode pemanggilan untuk database kita yang bertype OleDB (Karena terbuat dari Access).

Code 3: #Region “soni_connection” deklarasi untuk koneksi yang akan kita pakai, #Region “mudamu_baca” untuk menampilkan data dari database kita kedalam ListView.

Code 4: Adalah perintah untuk menyimpan teks dari Textbox1 ke field nomudamers, Textbox2 ke field mudamu.

Sekali lagi lihatlah Video yang sudah Saya praktekkan dibawah agar Anda mudah dalam memahami dan lebih mengerti tentang strukturnya. Semoga bermanfaat.

Download Video
Download Code

 

Tags:

cara membuat program absensi rumit di vb net, kode menyimpan file dalam folder komputer dalam visual basic, cara save projec vb beserta database, cara menyimpan data dari vb 2008 ke excel, tidak bisa menyimpan pada vb, koding simpan password vb net ole db, cara menyimpan txtbok vb ke offics excel, coding visual basic 2008 untuk simpan data, cara menyimpan membuat foler untuk menyimpan data visual basic, coding vb 6 menyimpan satu form ke 2 tabel, cara menyimpan data di textbox vb net kedalam tabel di database, cara simpan data dengan listview, cara simpan textbox di listview vb 6, cara menyimpan data di vb6 kolom, menyimpan data dari listview ke database vb6, cara simpan data menggunakan while wend vb6, cara simpan data menggunakan while wend vb6, Menyimpan beberapa field dari satu textbox vb6, koding listview dengan simpan cari menggunakan visual basic, Menyimpan data ke access dengan visual basic 2008

22 thoughts on “Simpan Data Visual Basic

  1. mas mau tanya, aplikasi bisa dijalankan tetapi setelah saya klik tombol button “simpan” visual basic langsung close sendiri tanpa sebab dan saya coba lagi mulai baru tetap tidak bisa itu kenapa yah

    1. Lihat apakah ada kode “Hide()” atau “End” di Visual Basic Anda (Pada event yang dipanggil saat perintah di eksekusi)..

      Coba cari di event atau sub yang Herdi panggil, lalu kalau ada kode seperti itu silakan dihapus, kalau memang tidak ada, kirim link project Herdi biar saya lihat permasalahannya 🙂 dan nanti saya kirim hasilnya. Trm kasih.

Leave a Reply

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