CRUD Sederhana - Insert Menggunakan MySqlCommand

<p><a href="http://pojokprogrammer.net/tags/crud"><strong>CRUD Sederhana</strong></a> | Aplikasi database memerlukan pemahaman yang cukup karena banyak konsep yang harus dipahami sebelumnya, belum lagi komponen dan driver yang harus di-install sebelumnya. Namun .NET framework memudahkan kita untuk membuat coding database atau dikenal sebagai <em><strong>CRUD</strong></em> (<em>Create Read Update Delete</em>). Artikel ini akan membahas proses <em><strong>INSERT </strong></em>data ke database MySql menggunakan <strong>MySqlCommand</strong>. Pertama-tama kita siapkan table yang akan digunakan untuk menyimpan data. Silakan buka <strong>phpMyAdmin </strong>dan jalankan <em>script </em>SQL berikut ini untuk membuat table-nya</p>
<pre class="brush:sql">
CREATE TABLE `pegawai` (
`id` int(11) NOT NULL AUTO_INCREMENT,
`nip` varchar(50) CHARACTER SET utf8 DEFAULT NULL,
`nama` varchar(50) CHARACTER SET utf8 DEFAULT NULL,
`alamat` varchar(50) CHARACTER SET utf8 DEFAULT NULL,
`tempat_lahir` varchar(50) CHARACTER SET utf8 DEFAULT NULL,
`tanggal_lahir` date DEFAULT NULL,
PRIMARY KEY (`id`)
);</pre>
<p>Berikutnya kita buatkan Form sederhana yang berisikan TextBox untuk input data dan DataGridView untuk menampilkan data yang sudah tersimpan di database. Mungkin kira-kira tampilannya seperti ini, namun silakan jika teman-teman punya selera desain yang lain.</p>
<p><img alt="Pojok Programmer - CRUD Sederhana - Insert Menggunakan MySqlCommand" src="/sites/default/files/tutorial/vbnet/crud01.png" style="width: 721px; height: 545px;" /></p>
<p>Pada awalprogram kita lakukan inisialisasi data dengan cara melakukan refresh terhadap isi grid, dengan menggunakan code seperti ini</p>
<pre class="brush:vbnet">
Public Sub New()
&#39; required by designer code
InitializeComponent()
&#39; required by this tutorial
RefreshDataGrid()
End Sub
Private Sub RefreshDataGrid()
' siapkan koneksi database
Dim cn As New MySqlConnection(cnString)
Dim da As New MySqlDataAdapter("SELECT * FROM pegawai", cn)
Dim dt As New DataTable
' coba ambil data
Try
' masukkan data ke datatable
da.Fill(dt)
' binding datatable ke grid
DataGridView1.DataSource = dt
Catch ex As Exception
' tampilkan error jika ada
MessageBox.Show(ex.Message)
End Try
End Sub
</pre>
<p>Sedangkan ini adalah <em>code </em>yang digunkan untuk meng-<em>handle event click </em>dari button Simpan.</p>
<pre class="brush:vbnet">
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
&#39; siapkan koneksi database
Dim cn As New MySqlConnection(cnString)
Dim cm As MySqlCommand
Try
&#39; siapkan perintah sql
cm = cn.CreateCommand
cm.CommandType = CommandType.Text
cm.CommandText = &quot;INSERT &quot; &amp; _
&quot;INTO pegawai(nip, nama, tempat_lahir, tanggal_lahir, alamat) &quot; &amp; _
&quot;VALUES (@nip, @nama, @tempat, @tanggal, @alamat)&quot;
&#39; gunakan parameter
cm.Parameters.AddWithValue(&quot;@nip&quot;, TextBox1.Text)
cm.Parameters.AddWithValue(&quot;@nama&quot;, TextBox2.Text)
cm.Parameters.AddWithValue(&quot;@tempat&quot;, TextBox3.Text)
cm.Parameters.AddWithValue(&quot;@alamat&quot;, TextBox4.Text)
cm.Parameters.AddWithValue(&quot;@tanggal&quot;, DateTimePicker1.Value.ToString(&quot;yyyy-MM-dd&quot;))
&#39; buka koneksi database (wajib)
cn.Open()
&#39; jalankan perintah insert
cm.ExecuteScalar()
&#39; tutup koneksi (kalau tidak, dosa!)
cn.Close()
&#39; refresh data grid kembali
RefreshDataGrid()
Catch ex As Exception
&#39; tampilkan error jika ada
MessageBox.Show(ex.Message)
End Try
End Sub
</pre>
<p>Dan Hasil akhirnya setelah dijalankan menjadi seperti ini</p>
<p><img alt="Pojok Programmer - CRUD Sederhana - Insert Menggunakan MySqlCommand" src="/sites/default/files/tutorial/vbnet/crud02.png" style="width: 720px; height: 370px;" /></p>
<p>Silakan <strong><a href="/sites/default/files/tutorial/vbnet/SampleCRUD1.rar">unduh source code di sini</a></strong>. Selamat Belajar</p>
<p>.</p>