กระทู้เก่าบอร์ด อ.Yeadram
        
           2,951   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.5085s
    
      
		