Archive for 2010

Disconnected melalui SQLDataAdapter dan DataTable

undefined
undefined. undefined

Anda ingin tahu bagaimana caranya untuk connection string (disconnect) khususnya untuk inserting data,updating data, dan deleting data pada VB.net???ni saya tunjukkan caranya.....





Pada Button Simpan :
'deklarasi row baru untuk dimasukkan ke dalam table dt
dim row as datarow = dt.newrow
'isi setiap kolom dari baris row
row("[nama kolom]") = ...
'masukkan baris row ke dalam table dt
dt.rows.add(row)

Pada Button Ubah :
'cari dulu, baris mana yang akan diupdate
dim find as datarow = dt.rows.find([property control atau variable yang mengandung primary key])
'jika data ditemukan, lakukan perubahan data
if not isnothing(find) then
find.BeginEdit()
find("[Nama Kolom]") = ...
'setelah selesai melakukan update, simpan perubahan ke dalam dt
find.EndEdit()
end if

Pada Button Hapus :
'Cari Dulu, baris mana yang akan dihapus
dim find as datarow = dt.rows.find([property control atau variable yang mengandung primary key])
'jika data ditemukan, lakukan penghapusan data
if not isnothing(find) then
dt.rows.remove(find)
end if

kemudian simpan ke dalam database SQL Server dengan cara :
dim cb as new sqlcommandbuilder(da)
da.update(dt)


semoga bermanfaat ya........ ^_^