[英]VB.Net Updated All Data Not Selected Data
Dim con As New MySqlConnection
Dim cmd As New MySqlCommand
con.ConnectionString = "Data Source=localhost;Initial Catalog=lamberto;User id =lamberto;password=rahasia"
con.Open()
cmd.Connection = con
cmd.CommandText = "UPDATE tbl_data_pegawai SET nip = @nip, nama_pegawai = @nama_pegawai, tempat_lahir = @tempat_lahir, tanggal_lahir = @tanggal_lahir, jenis_kelamin = @jenis_kelamin, usia = @usia, status_pegawai = @status_pegawai, tanggal_pengangkatan_cpns = @tanggal_pengangkatan_cpns, alamat = @alamat WHERE nip = + @nip"
cmd.Parameters.AddWithValue("@nip", TextBox1.Text)
cmd.Parameters.AddWithValue("@nama_pegawai", TextBox2.Text)
cmd.Parameters.AddWithValue("@tempat_lahir", TextBox3.Text)
cmd.Parameters.AddWithValue("@tanggal_lahir", TextBox4.Text)
cmd.Parameters.AddWithValue("@jenis_kelamin", TextBox5.Text)
cmd.Parameters.AddWithValue("@usia", TextBox6.Text)
cmd.Parameters.AddWithValue("@status_pegawai", TextBox7.Text)
cmd.Parameters.AddWithValue("@tanggal_pengangkatan_cpns", TextBox8.Text)
cmd.Parameters.AddWithValue("@alamat", TextBox9.Text)
cmd.ExecuteNonQuery()
con.Close()
MsgBox("Data Updated")
這是我的更新代碼,但是當我單擊更新時,數據庫中的所有數據都會更新,而不是所選數據。 有什么解決辦法嗎?
您要將nip設置為@nip其中nip = + @nip ...刪除nip的設置...只需設置所有其他列,然后刪除WHERE部分中的+。
所以你有了:
UPDATE tbl_data_pegawai SET nama_pegawai = @nama_pegawai, tempat_lahir = @tempat_lahir,
tanggal_lahir = @tanggal_lahir, jenis_kelamin = @jenis_kelamin, usia = @usia,
status_pegawai = @status_pegawai, tanggal_pengangkatan_cpns = @tanggal_pengangkatan_cpns,
alamat = @alamat WHERE nip = @nip
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.