01.
Private
Sub
ButtonUpdate_Click(
ByVal
sender
As
System.
Object
,
ByVal
e
As
System.EventArgs)
02.
ds =
New
DataSet
03.
da =
New
SqlDataAdapter(
"UPDTA tb_book SET Title='"
& txtTitle.Text.Trim() &
"',Author='"
& txtAuthor.Text.Trim() &
"',Publisher='"
& txtPublisher.Text.Trim() &
"',Isbn='"
& txtIsbn.Text.Trim() &
"',fool='"
& txtfool.Text.Trim() &
"',ImagePath='"
& txtImagePath.Text.Trim() &
"','"
& DateTimeExpire.Text.Trim() &
"' WHERE Book_ID='"
& txtBook_ID.Text.Trim() &
"'"
, sqlcon)
04.
da.Fill(ds,
"tb_book"
)
05.
06.
MsgBox(
"แก้ไขข้อมูลเรียบร้อยแล้วครับ"
)
07.
Call
showdata()
08.
Call
cleardata()
09.
End
Sub
10.
End
Class