กระทู้เก่าบอร์ด อ.Yeadram
2,782 5
URL.หัวข้อ /
URL
ค้นหาค่าซ้ำในตาราง
ผมมีปัญหาว่าต้องการใช้ Dcount ตรวจสอบค่าการซ้ำของเลขที่ Invoiceในตารางครับ โดยผ่านฟอร์มที่มีการกรองข้อมูลเฉพาะประเภทผมลองทำแล้ว แต่มันไม่ยอมเตือนครับ Code คำสั่งผมดังนี้
If (DCount("[Invoice]", "Dost", "[Invoice]=Forms![Dost]![Invoice]") > 0) Then
' ËÂØ´¢Ñ鹵͹¡ÒûÃѺ»Ãا¢éÍÁÙÅ
DoCmd.CancelEvent
' à§×è͹ä¢à´ÔÁ á¨é§ÇèÒ¢éÍÁÙÅ«éÓ
Beep
MsgBox "àÅ¢·Õè Invoice ¹Õé¶Ù¡ãªéä»áÅéÇâ»Ã´ãªéàÅ¢·ÕèÍ×è¹", vbCritical, "¡Òûé͹¢éÍÁÙżԴ¾ÅÒ´"
End If
คำอธิบาย: Invoice=Field data , Dost=Form name
ขอคำแนะนำจากท่านผู้รู้ด้วยครับ
If (DCount("[Invoice]", "Dost", "[Invoice]=Forms![Dost]![Invoice]") > 0) Then
' ËÂØ´¢Ñ鹵͹¡ÒûÃѺ»Ãا¢éÍÁÙÅ
DoCmd.CancelEvent
' à§×è͹ä¢à´ÔÁ á¨é§ÇèÒ¢éÍÁÙÅ«éÓ
Beep
MsgBox "àÅ¢·Õè Invoice ¹Õé¶Ù¡ãªéä»áÅéÇâ»Ã´ãªéàÅ¢·ÕèÍ×è¹", vbCritical, "¡Òûé͹¢éÍÁÙżԴ¾ÅÒ´"
End If
คำอธิบาย: Invoice=Field data , Dost=Form name
ขอคำแนะนำจากท่านผู้รู้ด้วยครับ
5 Reply in this Topic. Dispaly 1 pages and you are on page number 1
1 @R03991
If (DCount("[Invoice]", "Dost", "[Invoice]=" & Forms![Dost]![Invoice]) > 0) Then
2 @R04004
คำสั่งอ.สันติสุขผมนำไปใช้แล้วครับแต่ว่าไม่ได้ครับเพราะฟอร์มมันถูกกรองข้อมูลให้แสดงเฉพาะข้อม?ลหมวดนี้ ข้อมูลมาจากตารางชื่อ Do ครับ ผมใช้ฟอร์ม Input ข้อมูลสองฟอร์มคือ
1.DO ประเภทข้อมูล 1 ไม่แสดงข้อมูลของ Dost
2.Dost ประเภทข้อมูล 2 ไม่แสดงข้อมูล Do
ผมต้องการให้มันไปตรวจสอบข้อมูลในตารางโดยตรงไม่ว่า Input จากฟอร์ม Do หรือ Dost ครับ
1.DO ประเภทข้อมูล 1 ไม่แสดงข้อมูลของ Dost
2.Dost ประเภทข้อมูล 2 ไม่แสดงข้อมูล Do
ผมต้องการให้มันไปตรวจสอบข้อมูลในตารางโดยตรงไม่ว่า Input จากฟอร์ม Do หรือ Dost ครับ
3 @R04014
จะมีกี่ตารางก็แล้วแต่ คุณก็เขียนคำสั่งนี้ตรวจสอบไปทีละตารางสิครับ คำสั่งเดียวจะให้ตรวจสอบทั้ง 2 ตาราง มันเป็นไปไม่ได้ครับ
4 @R04021
ผมมีตารางเดียวครับ แต่ใช้ 2 ฟอร์มในการป้อนของมูลลงตารางนี้ 2 ฟอร์มถูกกรองให้แสดงเฉพาะข้อมูลที่ต้องการ แต่ต้องการให้มันแสดงข้อความกรณีที่ป้อนเลขที่ DO ซ้ำกันในตารางครับ
5 @R04023
คำสั่งมีรูปแบบคือ Dcount("ชื่อฟิลด์ในเทเบิล","ชื่อเทเบิล","เงื่อนไข")
- ฟิลด์ก็คือ Invoice
- เทเบิลก็คือ Do
- เงื่อนไขก็คือ Invoice = ค่าที่ป้อนซึ่งจุดนี้ไม่ทราบว่าคุณเทียบกับ textbox ที่ชื่อ Invoice ในฟอร์มไหน ถ้าเทียบกับฟอร์ม Do ก็สั่ง "[Invoice]=" & Forms![Do]![Invoice] ถ้าเทียบกับฟอร์ม Dost ก้สั่ง "[Invoice]=" & Forms![Dost]![Invoice] ครับ
- ฟิลด์ก็คือ Invoice
- เทเบิลก็คือ Do
- เงื่อนไขก็คือ Invoice = ค่าที่ป้อนซึ่งจุดนี้ไม่ทราบว่าคุณเทียบกับ textbox ที่ชื่อ Invoice ในฟอร์มไหน ถ้าเทียบกับฟอร์ม Do ก็สั่ง "[Invoice]=" & Forms![Do]![Invoice] ถ้าเทียบกับฟอร์ม Dost ก้สั่ง "[Invoice]=" & Forms![Dost]![Invoice] ครับ
Time: 0.3413s