• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

In trực tiếp trên access

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Report
  • [Hỏi] In trực tiếp trên access
• In trực tiếp trên access

• In trực tiếp trên access

  tieu_ngao > 13-10-17, 08:03 PM

  Mình làm 1 chương trình in phiếu trên access bằng giấy in nhiệt.
  Các bạn cho mình hỏi có cách nào khi nhấn lệnh in thì nó tự in ra luôn phiếu mà ko cần hiện ra hộp thoại chọn số trang in của máy in ko?
  Trân trọng cám ơn!

• RE: In trực tiếp trên access

  cpucloi > 14-10-17, 09:12 AM

  Docmd.OpenReport "TenReport",acViewNormal

• RE: In trực tiếp trên access

  DooHoaangPhuuc > 14-10-17, 04:07 PM

  Một vấn đề xin Các Bác, Các Chú giúp là in hai mặt cho nhiều report báo cáo trong access.
  Có một số reports được thiết kế dàn trải trên 2 hoặc nhiều hơn 2 trang .
  Khi in từng report định dạng in 2 mặt theo máy in thì được.
  Nhưng in nhiều reports cũng định dạng 2 mặt cho máy in, khi in ra chỉ in được một mặt giấy.
  Viết code cho lệnh in như thế nào.
  Thanks

• RE: In trực tiếp trên access

  ongke0711 > 14-10-17, 04:50 PM

  (14-10-17, 04:07 PM)DooHoaangPhuuc Đã viết: Một vấn đề xin Các Bác, Các Chú giúp là in hai mặt cho nhiều report báo cáo trong access.
  Có một số reports được thiết kế dàn trải trên 2 hoặc nhiều hơn 2 trang .
  Khi in từng report định dạng in 2 mặt theo máy in thì được.
  Nhưng in nhiều reports cũng định dạng 2 mặt cho máy in, khi in ra chỉ in được một mặt giấy.
  Viết code cho lệnh in như thế nào.
  Thanks

  
  Việc in 2 mặt giấyl là do cái máy in quyết định chứ có phải do ứng dụng làm ra đâu bạn. Máy in hiện đại có tính năng in 2 mặt thì nó in được thôi.

• RE: In trực tiếp trên access

  maidinhdan > 14-10-17, 11:55 PM

  Xem chủ đề này: [Help] Làm sao để in được trang chẳn hoặc trang lẻ trong report access?

• RE: In trực tiếp trên access

  DooHoaangPhuuc > 15-10-17, 02:35 PM

  Cảm ơn Chú Ongke0711.
  + Khi in tuần tự từng report thì điều chỉnh trong máy in 2 mặt thì bình thường 
  (Máy in có chức năng in 2 mặt giấy)
  + Tạo nút lệnh gộp in nhiều reports cùng lúc để tránh chọn nhiều từng report (tránh thiếu sót) thì khi in ra cũng chỉ được 1 mặt giấy (mặc dù đã điều chỉnh 2 mặt cho từng report một)
  Trước có đọc loáng thoáng đâu đó có lệnh liên quan in như thế này nhưng không nhớ rõ (dòng lệnh trong đó có chứa từ ....duplicate ... thì phải. )

• RE: In trực tiếp trên access

  ongke0711 > 15-10-17, 04:55 PM

  Không phải duplicate mà là Duplex.
  Hàm in Report có tùy chọn in 1 măt, 2 mặt, in dọc, in ngang:
  
  

  Mã PHP:

  Public Sub PrintReport(strReport As String, strPrinter As String, fDuplex As Boolean, fPortrait As Boolean)
   
   On Error GoTo Err_PrintReport
   Dim rptReport As Report
   
   DoCmd.OpenReport strReport, acViewPreview, , , acHidden
   
   'Xác dinh may in cho report can in.'
   Set rptReport = Reports(strReport)
   Set rptReport.Printer = Application.Printers(strPrinter)
   
   'Tuy chon in (in 1 mat, 2 mat, in doc, in ngang).'
   If fDuplex Then
       If fPortrait Then
           'In Doc - 2 mat'
           rptReport.Printer.Duplex = acPRDPHorizontal
       Else
           'In Ngang - 2 mat'
           rptReport.Printer.Duplex = acPRDPVertical
       End If
   Else
       'In 1 mat theo chieu giay da chon'
       rptReport.Printer.Duplex = acPRDPSimplex
   End If
   
   If fPortrait Then
       'In Doc'
       rptReport.Printer.Orientation = acPRORPortrait
   Else
       'In Ngang'
       rptReport.Printer.Orientation = acPRORLandscape
   End If
   
   'In truc tiep report, không Preview.'
   DoCmd.OpenReport strReport, acViewNormal
   
   DoCmd.Close acReport, strReport
   
Exit_PrintReport:
   Exit Sub
  
Err_PrintReport:
   MsgBox Err.Description, vbExclamation, "Error " & Err.Number
   Resume Exit_PrintReport
  
End Sub 


• RE: In trực tiếp trên access

  DooHoaangPhuuc > 16-10-17, 08:14 PM

  Cháu cảm ơn Chú Ongke0711 rất nhiều. Đúng là từ Duplex này.
• Bài trước Bài tiếp