Private Sub btudeletecom_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndeletecom.Click
Dim sql As String
sql = "delete from Durable goods where member_id = " & txtid.Text
Dim cm As OleDbCommand
cm = New OleDbCommand(sql, con)
cm.ExecuteNonQuery()
MessageBox.Show("ลบข้อมูลเรียบร้อย")
Call CreateDataSet()
End Sub
Private Sub btudeletecom_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndeletecom.Click
Dim sql As String
sql = "delete from Durable goods where member_id = '" & txtid.Text & "'" <---- ตรงนี้นะครับ
Dim cm As New OleDbCommand (sql, con)
cm.ExecuteNonQuery()
MessageBox.Show("ลบข้อมูลเรียบร้อย")
Call CreateDataSet()
End Sub
Load balance : Server 03
