Đánh giá chủ đề:
  • 3 Votes - 1.67 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Report Chỉ cho in 1 lần duy nhất- Xem thoải mái
#1
Hỏi : Mình đang thiết kế 1 report đặc biệt chỉ cho phép người sử dụng in ra máy in 1 lần duy nhất còn Preview thì thoải mái.
(dongnamnb- Danketoan)

Đáp:
Ý tưởng: Phatnq2002 - DKT
Coding & Demo: Noname: thuthuataccess

Dựa theo Ý tưởng thứ 2 của anh Phatnq2002, Tức là khi xem nó sẽ hiện 1 label cho biết đó không phải là bản chính thức. Còn khi in chính thứ thì ẩn đi, và chỉ cho in chính thức 1 lần rồi khóa lại luôn.

Theo đó mình thiết kế thêm trong table lưu report của bạn 1 ô tên là Isprint kiểu yes/no.
Trong form, ô này bị lock lại và được check Yes khi in bản chính thức!

[Hình: in1lan.png]

Trong report, mình tạo 1 label tên là label11 với nội dung sau: "Bản Chỉ để xem không có giá trị phát hành". Và cho thuộc tính Visible= false
Xử lý nút nhấn như sau:
Nút In Thử

Mã:
Private Sub cmdReview_Click()    
    DoCmd.OpenReport "Table1", acPreview
Reports![Table1]![Label11].Visible = True
    
End Sub

Và nút in chính thức:
Mã:
Private Sub cmdPrint_Click()

If Isprint Then
  MsgBox " Da in roi, khong in duoc nua"
Else    
    DoCmd.OpenReport "Table1", acNormal    
    Isprint.Value = True
   Me.Repaint
End If
    
End Sub

Chúc Thành công


File đính kèm
.rar   ReportChiInlan.rar (Kích cỡ: 15.12 KB / Tải về: 111)
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Cafe Via He , haquocquan
#2
Nhưng vẫn có vấn đề.
Nếu muốn in tiếp, bấm vào In thử, bấm ctrl+P lại in được bình thường
Phải xử lý cách khác thôi à.
Mình cũng có hướng xử lý vấn đề này. Nhưng còn một số vấn đề chưa làm được. Mình lập TOPIC khác nhờ Noname chỉ thêm cho nhé.
Chữ ký của haquocquan Guest, you are welcome!
ღღღღღTài sản của haquocquan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
À, cái này không phải HQQ ạ, khi bạn in thử, trên bản in nó có ghi thêm 1 dòng: Bản in này không có giá trị phát hành nên bạn in để xem thôi, chứ bản in đó không hợp lệ về mặt pháp lý (ví dụ hóa đơn tự in)
Còn in chính thức (chỉ được 1 lần) thì không có dòng đó!
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
OH. Mình phải bỏ check trong Table1 đi thì mới in chính thức được. Thảo nào lần trước in mãi không được.
Chữ ký của haquocquan Guest, you are welcome!
ღღღღღTài sản của haquocquan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tạo nút lệnh trên Form để view report (Single view) DooHoaangPhuuc 23 570 15-07-17, 04:58 PM
Bài mới nhất: tranthanhan1962
  Hình ảnh bị vỡ khi xem trên report thanhtruong 2 109 05-07-17, 05:27 PM
Bài mới nhất: thanhtruong
  [Hỏi] Tạo khoảng trống mặc định số dòng trên report ngochuong279 8 235 04-07-17, 09:56 AM
Bài mới nhất: ongke0711
  [Help] xuất report ra EXCEL Godspear 3 177 30-06-17, 12:33 PM
Bài mới nhất: Godspear
  [Help] Về lấy gía trị cột trong combobox xuống report tieu_ngao 5 378 21-05-17, 05:50 PM
Bài mới nhất: hieuvn

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ