Sub
perbaiki_data()
Dim perbaiki As String = ("UPDATE
kota SET nama='" & txt_nama_kota.Text & "',id_negara='"
& combo_id_negara.Text & "' WHERE id_kota='" &
txt_id_kota.Text & "'")
Cmd = New Odbc.OdbcCommand(perbaiki,
Conn)
Cmd.ExecuteNonQuery()
btn_simpan.Enabled = False
End Sub
No comments:
Post a Comment