Input ค่าลง Combobox แล้วให้ Save ทุก record ตาม Combobox



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

08 ต.ค. 64 , 10:40:18
อ่าน 123 ครั้ง

001Jetnipit





ไม่ทราบว่าสามารถทำได้ไหมครับ ที่จะทำให้เมื่อเราเลือกแล้ว ทุก Record ก็ Save ค่าตามๆ กัน รบกวนอาจารย์ทุกท่านครับ :dizzy: :dizzy:
« แก้ไขครั้งสุดท้าย: 08 ต.ค. 64 , 10:46:19 โดย 001Jetnipit »

 

08 ต.ค. 64 , 15:44:25
ตอบกลับ #1

apirak

: Input ค่าลง Combobox แล้วให้ Save ทุก record ตาม Combobox
« ตอบกลับ #1 เมื่อ: 08 ต.ค. 64 , 15:44:25 »
Dim db As Database
Dim DBrs As DAO.Recordset
Set db = CurrentDb
Set DBrs = db.OpenRecordset("ชื่อตาราง")

DBrs.AddNew
DBrs![Field] = ชื่อCombobox1.Value
DBrs![Field] = ชื่อCombobox2.Value
DBrs![Field] = ชื่อCombobox3.Value

DBrs.Update

อันนี้ฟอร์มบันทึกแบบ Unbound ถ้าเป็นแบบ Bound ก็ดึง Record Source ได้เลยครับ


 


บอร์ดเรียนรู้ Access สำหรับคนไทย