Đá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
Question [Help] Làm sao để in được trang chẳn hoặc trang lẻ trong report access? nhattiensinh 5 1,043 08-12-16, 11:55 PM
Bài mới nhất: hoanghai902
  [Help] Cho mình hỏi cách tạo report động theo ngày BayVeo 1 69 07-12-16, 09:09 PM
Bài mới nhất: maidinhdan
  Hướng Dẫn Cách sắp xếp report? tieuho828 0 28 03-12-16, 09:05 PM
Bài mới nhất: tieuho828
  [Help] Xin Giúp đỡ Dàn Report theo hàng ngang toi511 2 142 03-11-16, 01:10 PM
Bài mới nhất: toi511
  Hướng Dẫn Cú pháp mở Report có nhiều điều kiện GaDauBac 7 260 22-10-16, 01:08 AM
Bài mới nhất: maidinhdan

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ơ