รบกวนผู้รู้หน่อยนะครับ พอดีผมเขียนโปรแกรมภาษา VB.NET ทำให้มันเชื่อมต่อฐานข้อมูลด้วยย Access แต่มันหามันอยู่ต้องที่ผมกดปุ่ม เพิ่มรายการครับ คือเวลาผมทดสอบรันโปรแกรม ครับแรกที่ผมกดเพิ่มรายการ แล้วกดบันทึกรายการ มันบันทึกลงใน ฐานข้อมูลให้ แต่พอผมกดเพิ่มรายการให้ มันกับลบ ฟิลนั้นทิ้งไปแล้ว (ไม่เชิงว่าลบแต่หายเฉย ๆ )
Code ปุ่มเพิ่ม
STOCKINOUTBindingSource.AddNew()
TextBox1.Enabled = True
TextBox2.Enabled = True
TextBox3.Enabled = True
TextBox4.Enabled = True
TextBox5.Enabled = True
TextBox6.Enabled = True
Button1.Enabled = False
Button9.Enabled = True
Button2.Enabled = True
Button3.Enabled = False
Button4.Enabled = False
Button7.Enabled = False
Button8.Enabled = True
Code ปุ่มบันทึก
STOCKINOUTBindingSource.EndEdit()
STOCK_IN_OUTTableAdapter.Update(STOCKDataSet.STOCK_IN_OUT)
MessageBox.Show("บันทึกรายการเสร็จสิน", "Success", MessageBoxButtons.OK, MessageBoxIcon.Question)
Button9.Enabled = False
Button2.Enabled = False
Button7.Enabled = False
Button1.Enabled = True
Button3.Enabled = True
Button4.Enabled = True
Button8.Enabled = False
TextBox1.Clear()
TextBox2.Clear()
TextBox3.Clear()
TextBox4.Clear()
TextBox5.Clear()
TextBox6.Clear()
TextBox7.Clear()
TextBox1.Enabled = False
TextBox2.Enabled = False
TextBox3.Enabled = False
TextBox4.Enabled = False
TextBox5.Enabled = False
TextBox6.Enabled = False
กดเพิ่มแล้วหายได้ไง
Code ปุ่มเพิ่ม
STOCKINOUTBindingSource.AddNew()
TextBox1.Enabled = True
TextBox2.Enabled = True
TextBox3.Enabled = True
TextBox4.Enabled = True
TextBox5.Enabled = True
TextBox6.Enabled = True
Button1.Enabled = False
Button9.Enabled = True
Button2.Enabled = True
Button3.Enabled = False
Button4.Enabled = False
Button7.Enabled = False
Button8.Enabled = True
Code ปุ่มบันทึก
STOCKINOUTBindingSource.EndEdit()
STOCK_IN_OUTTableAdapter.Update(STOCKDataSet.STOCK_IN_OUT)
MessageBox.Show("บันทึกรายการเสร็จสิน", "Success", MessageBoxButtons.OK, MessageBoxIcon.Question)
Button9.Enabled = False
Button2.Enabled = False
Button7.Enabled = False
Button1.Enabled = True
Button3.Enabled = True
Button4.Enabled = True
Button8.Enabled = False
TextBox1.Clear()
TextBox2.Clear()
TextBox3.Clear()
TextBox4.Clear()
TextBox5.Clear()
TextBox6.Clear()
TextBox7.Clear()
TextBox1.Enabled = False
TextBox2.Enabled = False
TextBox3.Enabled = False
TextBox4.Enabled = False
TextBox5.Enabled = False
TextBox6.Enabled = False