Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
SlideShare a Scribd company logo

Database Operation di VB.NET

•Download as PPTX, PDF•
•
FgroupIndonesia
FgroupIndonesia

Dokumen ini memberikan panduan lengkap mengenai operasi database seperti insert, update, select, dan delete statements di VB.NET dengan menggunakan MySQL. Termasuk penjelasan tentang instalasi connector, konsep database, dan contoh kode untuk melakukan operasi database.

1 of 38
Database Operation di VB.NET Insert, Update, Select, Delete Statements terhubung dengan MySQL © FGroupIndonesia.com modul kelas khusus pemprograman VB.NET
• Menjelaskan praktek langsung interaksi Database dengan VB.net Programming di Visual Studio 2010. • .NET Frameworks v. 3,5 / 4.0 / 4.5 • Windows XP, Vista, 7, dan 8. • MySQL bundled via XAMPP v. 3,2
Connector • Bagian terpenting sebagai penghubung agar Visual Studio 2010 dapat berinteraksi dgn MySQL. • Download dari http://dev.mysql.com • 2 File tersebut: 1. mysql-for-visualstudio-1.1.4.msi 2. mysql-connector-net-6.9.7.msi
• Saat Instalasi Connector, pastikan : ▫ Visual Studio 2010 tidak sedang running. ▫ Instalasi program lain tidak dijalankan bersamaan. ▫ Lakukan instalasi satu per-satu dari no.urut file yang disebutkan.
Konsep Database • Untuk persiapan awal, perlu dibuat terlebih dahulu sebuah Database (Root directory) dan juga sebuah Table. • Sebuah Table dapat terdiri dari minimal satu Column atau lebih. • Suatu Column dapat menerapkan salah satu dari jenis Data Type yg terpilih. • Data tersimpan setiap satu Row pada Table. • Suatu Table dapat menerapkan PRIMARY KEY sebagai memudahkan index pembacaan.
• Setiap Table pada suatu Database dapat diciptakan dengan perintah : CREATE. • Setiap penyimpanan data ke dalam Table menggunakan perintah : INSERT. • Setiap editing data spesifik suatu Column tertentu menggunakan perintah : UPDATE. • Setiap menghapus data pada suatu Table menggunakan perintah : DELETE.
Penamaan Database • Penamaan Column, dan juga Table pada Database tidak diperbolehkan menggunakan karakter spasi. • Boleh menggunakan karakter selain alphabetical. • Contoh : ▫ Data Karyawan (salah) ▫ Data_Karyawan (benar) ▫ Alamat_1 (benar) ▫ Alamat 1 (salah)
Column Data Type • Setidaknya ada beberapa Data Type yg umum digunakan dalam pembuatan Column pertama kali. • Angka : DOUBLE, INT, LONG, atau pun TINYINT • Text : VARCHAR, CHAR, TEXT, BLOB • True/False : BOOLEAN • Tanggal : DATE, TIME
Database Name : Database_Hendro Table Name : Table_Formulir Column : 4 buah Data Row : 2 ID Nama Kelamin Alamat 1 Anthon Pria Jl. Pamekar 2 Budi Pria Jl. Mawar
phpmyadmin • Merupakan suatu Bundle dalam XAMPP yang memudahkan pengaturan database MySQL. • Pastikan Apache & MySQL running pada XAMPP. • Segera buka Browser lalu ketik pada URL : http://localhost/phpmyadmin
MySQL dan Apache running pada XAMPP Control Panel
Database Operation di VB.NET
Pembuatan Database Pertama Kali • Dalam phpMyAdmin tadi, klik pada Database menu. • Biarkan pilihan pada Collation sebagai pilihan Default. • Ketik nama yang sesuai, lalu klik CREATE. • Untuk kelengkapan materi ini, kita gunakan nama : databaseawal.
Database Operation di VB.NET
Create • Pada bagian ini sebuah Table akan langsung dibuat (di-CREATE) dengan jumlah Column yg fixed. • Untuk kelengkapan materi, maka Table ini kita beri nama : tab_formulir. • Pilih 4 sebagai Number of Column, lalu klik GO.
Database Operation di VB.NET
• Kemudian berikan 4 Column tadi dengan definisi sebagai berikut : • Column : id, jenis INT, Length 4, Default None, Attribute Unsigned, Index Primary, A_I (Auto Increment) • Column : nama, jenis VARCHAR, Length 45, Default None • Column : kelamin, jenis VARCHAR, Length 6, Default None • Column : alamat, jenis VARCHAR, Length 150, Default As Defined -. • Jika sudah klik GO / SAVE
Database Operation di VB.NET
Object MySQLConnection • Digunakan untuk menghubungkan koneksi dari VB.net ke MySQL Server • Lengkapi perintah IMPORTS pada bagian atas code VB.NET • Kemudian sertakan reference pada project VB.NET yang terkait.
Database Operation di VB.NET
Test Connection Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open() Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
Insert Statement • Langkah yg digunakan ialah: ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan INSERT STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait.
Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
perintahtext = "INSERT INTO tab_formulir VALUES(@id, @name, @password)“ perintah = New MySqlCommand(perintahtext , konektor) perintah.Parameters.AddWithValue(“id”, 0) perintah.Parameters.AddWithValue(“name”, “nilai”) perintah.Parameters.AddWithValue(“password”, “kunci”) perintah.ExecuteNonQuery()
Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
Update Statement ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan UPDATE STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait.
Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
perintahtext = “UPDATE tab_formulir SET name=@name, password=@password WHERE id=1“ perintah = New MySqlCommand(perintahtext , konektor) perintah.Parameters.AddWithValue(“name”, “nilaiBaru”) perintah.Parameters.AddWithValue(“password”, “kunciBaru”) perintah.ExecuteNonQuery()
Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
Delete Statement ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan DELETE STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait.
Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
perintahtext = “DELETE FROM tab_formulir WHERE id=1“ perintah = New MySqlCommand(perintahtext , konektor) perintah.ExecuteNonQuery() Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
Select Statement ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan SELECT STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait. ▫ Dengan menerapkan Return Value pada ArrayList / Object lain di dalam Function yang diperlukan.
Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Private obj_inc as New User Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
perintahText = "SELECT * FROM tab_formulir WHERE id=1” perintah = New MySqlCommand(perintahText, konektor) Dim sqlAdapter As New MySqlDataAdapter(perintah) Dim sqlData As New DataTable sqlAdapter.Fill(sqlData)
If (sqlData.Rows.Count <> 0) Then Dim row As DataRow = sqlData.Rows(0) obj_inc.Nama = row(“name”) obj_inc.Kunci = row(“password”) Else obj_inc = Nothing End If Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try Return obj_inc
• Terapkan Code INSERT, UPDATE, SELECT, dan DELETE Statement tersebut tadi ke dalam Form / GUI terkait langsung dengan Event pada Action yang diperlukan! • Good Luck!
FGroupIndonesia.com Jl. Parahyangan no.18, Komp. Panghegar Permai I Ujung Berung, Bandung 40614 (022) 92800446 / 95244964 BBM. 7DF95683 / 7CD59179 WA. 085795569337 / 085721261437

More Related Content

Database Operation di VB.NET

  • 1. Database Operation di VB.NET Insert, Update, Select, Delete Statements terhubung dengan MySQL © FGroupIndonesia.com modul kelas khusus pemprograman VB.NET
  • 2. • Menjelaskan praktek langsung interaksi Database dengan VB.net Programming di Visual Studio 2010. • .NET Frameworks v. 3,5 / 4.0 / 4.5 • Windows XP, Vista, 7, dan 8. • MySQL bundled via XAMPP v. 3,2
  • 3. Connector • Bagian terpenting sebagai penghubung agar Visual Studio 2010 dapat berinteraksi dgn MySQL. • Download dari http://dev.mysql.com • 2 File tersebut: 1. mysql-for-visualstudio-1.1.4.msi 2. mysql-connector-net-6.9.7.msi
  • 4. • Saat Instalasi Connector, pastikan : ▫ Visual Studio 2010 tidak sedang running. ▫ Instalasi program lain tidak dijalankan bersamaan. ▫ Lakukan instalasi satu per-satu dari no.urut file yang disebutkan.
  • 5. Konsep Database • Untuk persiapan awal, perlu dibuat terlebih dahulu sebuah Database (Root directory) dan juga sebuah Table. • Sebuah Table dapat terdiri dari minimal satu Column atau lebih. • Suatu Column dapat menerapkan salah satu dari jenis Data Type yg terpilih. • Data tersimpan setiap satu Row pada Table. • Suatu Table dapat menerapkan PRIMARY KEY sebagai memudahkan index pembacaan.
  • 6. • Setiap Table pada suatu Database dapat diciptakan dengan perintah : CREATE. • Setiap penyimpanan data ke dalam Table menggunakan perintah : INSERT. • Setiap editing data spesifik suatu Column tertentu menggunakan perintah : UPDATE. • Setiap menghapus data pada suatu Table menggunakan perintah : DELETE.
  • 7. Penamaan Database • Penamaan Column, dan juga Table pada Database tidak diperbolehkan menggunakan karakter spasi. • Boleh menggunakan karakter selain alphabetical. • Contoh : ▫ Data Karyawan (salah) ▫ Data_Karyawan (benar) ▫ Alamat_1 (benar) ▫ Alamat 1 (salah)
  • 8. Column Data Type • Setidaknya ada beberapa Data Type yg umum digunakan dalam pembuatan Column pertama kali. • Angka : DOUBLE, INT, LONG, atau pun TINYINT • Text : VARCHAR, CHAR, TEXT, BLOB • True/False : BOOLEAN • Tanggal : DATE, TIME
  • 9. Database Name : Database_Hendro Table Name : Table_Formulir Column : 4 buah Data Row : 2 ID Nama Kelamin Alamat 1 Anthon Pria Jl. Pamekar 2 Budi Pria Jl. Mawar
  • 10. phpmyadmin • Merupakan suatu Bundle dalam XAMPP yang memudahkan pengaturan database MySQL. • Pastikan Apache & MySQL running pada XAMPP. • Segera buka Browser lalu ketik pada URL : http://localhost/phpmyadmin
  • 11. MySQL dan Apache running pada XAMPP Control Panel
  • 13. Pembuatan Database Pertama Kali • Dalam phpMyAdmin tadi, klik pada Database menu. • Biarkan pilihan pada Collation sebagai pilihan Default. • Ketik nama yang sesuai, lalu klik CREATE. • Untuk kelengkapan materi ini, kita gunakan nama : databaseawal.
  • 15. Create • Pada bagian ini sebuah Table akan langsung dibuat (di-CREATE) dengan jumlah Column yg fixed. • Untuk kelengkapan materi, maka Table ini kita beri nama : tab_formulir. • Pilih 4 sebagai Number of Column, lalu klik GO.
  • 17. • Kemudian berikan 4 Column tadi dengan definisi sebagai berikut : • Column : id, jenis INT, Length 4, Default None, Attribute Unsigned, Index Primary, A_I (Auto Increment) • Column : nama, jenis VARCHAR, Length 45, Default None • Column : kelamin, jenis VARCHAR, Length 6, Default None • Column : alamat, jenis VARCHAR, Length 150, Default As Defined -. • Jika sudah klik GO / SAVE
  • 19. Object MySQLConnection • Digunakan untuk menghubungkan koneksi dari VB.net ke MySQL Server • Lengkapi perintah IMPORTS pada bagian atas code VB.NET • Kemudian sertakan reference pada project VB.NET yang terkait.
  • 21. Test Connection Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open() Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
  • 22. Insert Statement • Langkah yg digunakan ialah: ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan INSERT STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait.
  • 23. Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
  • 24. perintahtext = "INSERT INTO tab_formulir VALUES(@id, @name, @password)“ perintah = New MySqlCommand(perintahtext , konektor) perintah.Parameters.AddWithValue(“id”, 0) perintah.Parameters.AddWithValue(“name”, “nilai”) perintah.Parameters.AddWithValue(“password”, “kunci”) perintah.ExecuteNonQuery()
  • 25. Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
  • 26. Update Statement ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan UPDATE STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait.
  • 27. Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
  • 28. perintahtext = “UPDATE tab_formulir SET name=@name, password=@password WHERE id=1“ perintah = New MySqlCommand(perintahtext , konektor) perintah.Parameters.AddWithValue(“name”, “nilaiBaru”) perintah.Parameters.AddWithValue(“password”, “kunciBaru”) perintah.ExecuteNonQuery()
  • 29. Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
  • 30. Delete Statement ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan DELETE STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait.
  • 31. Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
  • 32. perintahtext = “DELETE FROM tab_formulir WHERE id=1“ perintah = New MySqlCommand(perintahtext , konektor) perintah.ExecuteNonQuery() Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try
  • 33. Select Statement ▫ Membuka Object dari MySQLConnection, ▫ Menyisipkan SELECT STATEMENT ke dalamnya, ▫ Menjalankan STATEMENT tersebut pada Form terkait. ▫ Dengan menerapkan Return Value pada ArrayList / Object lain di dalam Function yang diperlukan.
  • 34. Imports MySql.Data.MySqlClient Private konektor As MySqlConnection Private perintah As MySqlCommand Private perintahtext As String Private obj_inc as New User Try konektor = New MySqlConnection konektor.ConnectionString = "server='localhost'; user='root'; database=namadb';" konektor.Open()
  • 35. perintahText = "SELECT * FROM tab_formulir WHERE id=1” perintah = New MySqlCommand(perintahText, konektor) Dim sqlAdapter As New MySqlDataAdapter(perintah) Dim sqlData As New DataTable sqlAdapter.Fill(sqlData)
  • 36. If (sqlData.Rows.Count <> 0) Then Dim row As DataRow = sqlData.Rows(0) obj_inc.Nama = row(“name”) obj_inc.Kunci = row(“password”) Else obj_inc = Nothing End If Catch ex As Exception MsgBox("Error Connection! " & ex.Message) End Try Return obj_inc
  • 37. • Terapkan Code INSERT, UPDATE, SELECT, dan DELETE Statement tersebut tadi ke dalam Form / GUI terkait langsung dengan Event pada Action yang diperlukan! • Good Luck!
  • 38. FGroupIndonesia.com Jl. Parahyangan no.18, Komp. Panghegar Permai I Ujung Berung, Bandung 40614 (022) 92800446 / 95244964 BBM. 7DF95683 / 7CD59179 WA. 085795569337 / 085721261437