Tìm thủ thuật nhanh hơn với chức năng tìm trong Blog

11/11/09

Hiện thông báo không có dữ liệu khi in report

Cho mình hỏi: Mình tạo 1 form in từ ngày đến ngày,
nếu trong điều kiện đó mà reprt kô có dữ liệu thì hiện ra 1 câu thông báo tại form luôn và kô hiện ra report.


Đáp:
Bất cứ report nào cũng có record source đúng không, thường là 1 query/table.

Như vậy vấn đề ở đây là bạn kiểm tra query/table xem có record nào không, nếu không có=> gởi thông báo.
Nếu có thì cho in report. Đơn giản vậy thôi



Private Sub In_Click()
dim rec as Recordset
dim db as Database
set db = CurrentDB()
set rec = db.Openrecordset("tên bảng")
If rec.recordcount> o then
[in report]

else

[thong bao]

end if

End Sub

2 nhận xét:

  1. Xin lỗi nhưng em chưa hiểu lắm, anh có thể hướng dẫn cụ thể hơn được không ạ? EM cám ợn anh nhiều.

    Trả lờiXóa
  2. Nặc danh11:20 25/5/12

    Phần mềm MSchool(Quản lý điểm và xét tốt nghiệp THCS theo TT58 - thông tư áp dụng học kỳ 2 năm học 2011-2012
    http://www.mediafire.com/myfiles.php

    Trả lờiXóa

» Hãy để lại tên, email của bạn khi bạn post comment, để mình có thể dễ dàng trả lời comment của bạn khi cần.
» Có thể sử dụng các thẻ < b>,< i>,< a>. Và các icon thông dụng trên YM