Advertisement
stevennathaniel

Sub Routine Untuk Update Tabel MYSQL Menggunakan VB .NET

Oct 3rd, 2013
166
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.81 KB | None | 0 0
  1.  Private Sub tombolEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tombolEdit.Click
  2.  
  3.         ' perintah = New MySqlCommand("UPDATE pegawai SET (NIK,NamaPegawai) VALUES (@NIK,@NamaPegawai) WHERE (id) VALUES (@id)", koneksi)
  4.  
  5.         perintah = New MySqlCommand("UPDATE pegawai SET NIK=@NIK, NamaPegawai=@NamaPegawai WHERE id=@id", koneksi)
  6.  
  7.         perintah.Parameters.AddWithValue("@id", textID.Text)
  8.  
  9.         perintah.Parameters.AddWithValue("@NIK", textNIKPegawai.Text)
  10.  
  11.         perintah.Parameters.AddWithValue("@NamaPegawai", textNamaPegawai.Text)
  12.  
  13.         koneksi.Open()
  14.  
  15.         perintah.ExecuteNonQuery()
  16.  
  17.         koneksi.Close()
  18.  
  19.         koneksi.Dispose()
  20.  
  21.  
  22.         textID.Text = ""
  23.         textNIKPegawai.Text = ""
  24.         textNamaPegawai.Text = ""
  25.  
  26.  
  27.     End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement