ไม่พบข้อมูลไม่สั่งพิมพ์ได้อย่างไร
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 384   2
URL.หัวข้อ / URL ไม่พบข้อมูลไม่สั่งพิมพ์ได้อย่างไร

ปกติผมใช้คำสั่งพิมพ์  
DoCmd.OpenReport "CashPrintOrder1", acViewNormal, "", "[TableID] Between '" & Me.Table & "' And '" & Me.Table & "'" 
ถ้าไม่มีข้อมูลไม่ให้ส่งพิมพ์ จะกำหนดได้อย่างไรครับ 
ตอนนี้ถ้าไม่มีข้อมูลโปรแกรมจะพิมพ์ส่วนหัวบิล และท้ายบิลให้
โดย: มือใหม่ (มาบ่อย) เมื่อ: 12 ก.พ. 2546 , 15:41

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

1 @R01496
Private Sub Report_NoData(Cancel As Integer) MsgBox "ไม่พบข้อมูลในขณะนี้ !" DoCmd.CancelEvent End Sub
โดย: BADMan เมื่อ: 12 ก.พ. 2546 , 16:01
2 @R01497
ใช้ OnNoData() ช่วยครับ ให้เปิด Report ในโหมด Design แล้วใส่โค้ดนี้ลงไปครับ Private Sub Report_NoData(Cancel As Integer) MsgBox "No data found", vbOKOnly, "No data to print" Cancel = True End Sub
โดย: สุภาพ เมื่อ: 12 ก.พ. 2546 , 16:01
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.1073s