Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Tạo các Report nhúng trong cá Form
#1
Vì đã có bài viết của bạn [duynet12] về tạo report cho Form nên mình cũng tiện đây giới thiệu với các bạn cách tạo các Report nhúng trong Form : Mục đích của việc tạo này là để trên Form có thể xem hoặc in trực tiếp một số Report. Các bạn xem ví dụ của mình nhé : http://www.mediafire.com/?dj8b3pdrfv6js4f
Nhớ thêm ActiveX Snapshot Viewwer nhé. Nếu thấy hay vỗ tay mình phát nhé
Chữ ký của ledangvan Xin chào, mình là ledangvan, Tham gia http://thuthuataccess.com/forum từ ngày 22-08 -11.
ღღღღღTài sản của ledangvan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , cannguyen , nhunguyet0103
#2
Hay nhưng bạn có thể chỉ cách làm được không? Công cụ SnapshotViewer chỗ nào mình tìm không ra rồi cách liên kết với Report như thế nào?
Giúp mình nhé
Chữ ký của cannguyen Xin chào, mình là cannguyen, Tham gia http://thuthuataccess.com/forum từ ngày 15-08 -11.
Reply
Những người đã cảm ơn
#3
(31-05-12, 04:35 PM)cannguyen Đã viết: Hay nhưng bạn có thể chỉ cách làm được không? Công cụ SnapshotViewer chỗ nào mình tìm không ra rồi cách liên kết với Report như thế nào?
Giúp mình nhé

Để làm được đầu tiên bạn phải có một dữ liệu có đuôi mdb gồm nhiều report sau đó vào tab Form tạo một Form có ít nhất 2 nội dung thứ nhất là một Combo thứ 2 là một ActiveX Snapshot Viewer . Hộp Combo có tên (CboReports) để chứa danh sách tất cả các report có trong dữ liệu. Khi mở Form bạn đặt ở event Load đoạn mã sau :

Private Sub Form_Load()
Dim obj As AccessObject, dbs As Object
Dim strList As String
Set dbs = Application.CurrentProject
For Each obj In dbs.AllReports
strList = strList & obj.Name & ";"
Next obj
CboReports.RowSourceType = "Value List"
CboReports.RowSource = strList

End Sub

Để thêm ActiveX Snapshot Viewer đầu tiên bạn Copy File mà mình gửi kèm (SNAPVIEW.OCX) vào thư mục nào đó của bạn sau đó từ dữ liệu bạn vào Insert -> Axtive Control ... và thêm SNAPVIEW.OCX vào
Sau đó từ thanh công cụ (Toolbox) bạn chọn More Controls , cuộn xuống và chọn Snap shot Viewwer Control 11.0 -> Chọn độ rộng của ActiveX Snapshot Viewer tùy ý để nó view Report của bạn hợp lý -> ấn chuột phải vào ActiveX Snapshot Viewer chọn Propertive... vào Name -> đổi tên thanh SnapshotViewer1

ở Combo đặt đoạn mã sau trong Event On Change hoặc AfterUpdate:

Private Sub CboReports_AfterUpdate()
DoCmd.OutputTo acOutputReport, CboReports, acFormatSNP, Application.CurrentProject.Path & "\Temp.snp"
SnapshotViewer1.SnapshotPath = Application.CurrentProject.Path & "\Temp.snp"

End Sub

Sau đó mỗi lần chọn Report trong Combo bên cạch sẽ xuất hiện report

Chúc bạn thành công.
Chữ ký của ledangvan Xin chào, mình là ledangvan, Tham gia http://thuthuataccess.com/forum từ ngày 22-08 -11.
ღღღღღTài sản của ledangvan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
Cám ơn ledangvan, mình sẽ thử
Chữ ký của cannguyen Xin chào, mình là cannguyen, Tham gia http://thuthuataccess.com/forum từ ngày 15-08 -11.
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
  câu lệnh kết xuất dữ liệu từ report ra excel mptyty 4 3,301 29-07-15, 05:02 PM
Bài mới nhất: maidinhdan
  [Hỏi] cách đánh số thứ tự trong Report NganNguyen 2 65 28-07-15, 11:13 PM
Bài mới nhất: NganNguyen
  [Lỗi] Gán record Source cho Report bằng ADODB Minh Tiên 2 71 25-07-15, 09:26 PM
Bài mới nhất: paulsteigel
  Cho hỏi về việc lựa chọn dãy số đưa ra report. rainkv 3 157 12-07-15, 03:22 PM
Bài mới nhất: ongke0711
  Cho mình hỏi về cách hiện thị Nam và Nữ riêng 2 cột trong report tieu_ngao 11 705 06-07-15, 04:37 PM
Bài mới nhất: maidinhdan

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)