กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
381 5
URL.หัวข้อ /
URL
มีข้อมูลในรายงานแล้วต้องการเลือกพิมพ์เริ่มต้น-สุดท้าย ช่วยด่วนครับ
มีข้อมูลในรายงานแล้วต้องการเลือกพิมพ์เริ่มต้น-สุดท้าย
ผมสร้างปุ่ม command โดยมีโค้ดดังนี้ มันมีปัญหาว่ามันจะพิมพ์ออกมาหมดเลย แต่ผมต้งอการให้มันถามก่อนว่าจะเริ่มพิมพ์หน้าไหนถึงไหน
Private Sub Print_SCB_LQ2170_Click()
On Error GoTo Err_Print_SCB_LQ2170_Click
Dim stDocName As String
stDocName = "Print-SCB-LQ2170"
DoCmd.OpenReport stDocName, acNormal
Exit_Print_SCB_LQ2170_Click:
Exit Sub
Err_Print_SCB_LQ2170_Click:
MsgBox Err.Description
Resume Exit_Print_SCB_LQ2170_Click
End Sub
ผมสร้างปุ่ม command โดยมีโค้ดดังนี้ มันมีปัญหาว่ามันจะพิมพ์ออกมาหมดเลย แต่ผมต้งอการให้มันถามก่อนว่าจะเริ่มพิมพ์หน้าไหนถึงไหน
Private Sub Print_SCB_LQ2170_Click()
On Error GoTo Err_Print_SCB_LQ2170_Click
Dim stDocName As String
stDocName = "Print-SCB-LQ2170"
DoCmd.OpenReport stDocName, acNormal
Exit_Print_SCB_LQ2170_Click:
Exit Sub
Err_Print_SCB_LQ2170_Click:
MsgBox Err.Description
Resume Exit_Print_SCB_LQ2170_Click
End Sub
5 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R05413
คือผมไม่ต้องการให้มันพรีวิวออกมาให้เห็น แต่ต้องการเมื่อเรากดปุ่มแล้วมันถามก่อนว่าให้เราใส่หน้าเริ่มต้นและสุดท้าย แล้วส่งออกพริ้นเตอร์เลย
3 @R05415
ก็ใช้ DoCmd.PrintOut แทนครับ ให้ค้นในกระทู้เก่าๆ ดู จะมีตัวอย่างการกำหนดหมายเลขหน้าด้วย
4 @R05891
ลองดูอันนี้ครับ ไป copy มาอีกที
5 @R05908
คุณอุดมโชคผมดาวน์โหลดไม่ได้ ช่วยเมล์มาให้หน่อยนะครับ L_S20@hotmail.com
Time: 0.0887s
DoCmd.OpenReport stDocName, acPreview
DoCmd.RunCommand acCmdPrint
หรือจะใช้ DoCmd.PrintOut ก็ได้ครับ ลองค้นด้วยคำว่า .PrintOut ดูครับ