Đá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
  [Hỏi] In report từ dữ liệu hiện hành trong Form pvhung76 7 355 16-06-18, 10:25 AM
Bài mới nhất: MTNQ
  [Help] Lỗi xuất report sang excel thiếu dữ liệu nam8384 3 161 01-06-18, 08:58 PM
Bài mới nhất: DooHoaangPhuuc
  Báo cáo hàng ngang (Report có nhiều cột) ledangvan 32 6,708 30-05-18, 11:55 PM
Bài mới nhất: NguyenDungAnh
  Bố trí dàn hàng của Sub Report trong Main Report DooHoaangPhuuc 5 217 29-05-18, 08:58 PM
Bài mới nhất: DooHoaangPhuuc
  Hỏi cách điều chỉnh report ledangvan 3 190 27-05-18, 07:13 PM
Bài mới nhất: ledangvan

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ơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line