ป้องกันการกรอกข้อมูลซ้ำกันค่ะ
กระทู้เก่าบอร์ด อ.Yeadram

 2,418   3
URL.หัวข้อ / URL ป้องกันการกรอกข้อมูลซ้ำกันค่ะ

ป้องกันการกรอกข้อมูลซ้ำกันค่ะ ตัวอย่างเช่น เคยกรอกเลข 4567 หรือ abcd ไปแล้ว
ไม่ให้มีการมากรอก หรือ ข้อความนี้ซ้ำอีก ถ้ากรอกซ้ำ ให้แสดงกล่องข้อความ
และลบตัวที่กรอกล่าสุดออก ให้เป็นช่องว่างให้กรอกใหม่คะ
โดย: ฝึกหัด เมื่อ: 24 ก.พ. 2558 , 07:36

3 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R20125
ใน Event BeforeUpdate หรือ On Exit
ใช้ function DCount หรือ open RecordSet Select Count
ถ้ามากกว่า 0 แปลว่าซ้ำ
ให้ Cancel = True หรือ SendKeys "{Esc}"
โดย: PichaiTC เมื่อ: 24 ก.พ. 2558 , 20:48
2 @R20135
กำหนดฟิลด์นั้นให้เป็น Primary Key ดีมั้ยครับ
โดย: อุดมโชค SCB เมื่อ: 26 ก.พ. 2558 , 16:58
3 @R20137
ลองดูนะครับ ก็อปมาอีกทีครับ

Private Sub ชื่อช่องที่กรอกข้อมูล_BeforeUpdate(Cancel As Integer)
    If DCount("ชื่อฟิล", "ชื่อเทเบิล", "ชื่อช่องที่กรอกข้อมูล = '" & Me.ชื่อฟิล & "'") > 0 Then
        MsgBox "รหัสบัตรนี้มีในระบบแล้ว"
        Cancel = True
        Me.ชื่อฟิล.Undo
    End If
End Sub
โดย: โอ๋ เมื่อ: 27 ก.พ. 2558 , 09:48
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.4407s