Tùy chọn
Demo Form nhắc nhỡ lịch hẹn
- Demo Form nhắc nhỡ lịch hẹn
-
Demo Form nhắc nhỡ lịch hẹn
tranhai_vn > 26-11-15, 11:57 AM
Các Bác cho em hỏi làm thế nào để tạo 1 form nhắc nhỡ công việc lấy dữ liệu từ table. Vào ngày đó mình có rất nhiều công việc đến giờ hẹn nó lại nổi form lên để nhắc nhở mình.
-
RE: Demo Form nhắc nhỡ lịch hẹn
ongke0711 > 26-11-15, 04:57 PM
Tôi hướng dẫn bạn cách làm cơ bản. Nguyên lý của nó là định kỳ chạy 1 cái query kiểm tra table chứa công việc cần làm xem có cái nào đến hạn không? nếu có hiện thông báo, nếu không im luôn
- Tạo 1 table Công Việc: ID, Ngày, Công Việc, Thời gian bắt đầu, tgian kết thúc, Hoàn tất.
- Tạo 1 query lọc [Công Việc] nào có [Thời gian bắt đầu] so với [Hiện tại] còn 1h nữa tới hạn. Cái thời gian 1h này tùy bạn muốn bao nhiêu thì thiết lập.
- Trên form màn hình chính của bạn, vào Form Properties|Event -> chọn Time Interval:1000; On Timer: Event Procedure
Mã PHP:Private Sub Form_Timer()
Static mTimer As Integer
mTimer = mTimer + 1
If mTimer = 5 Then 'Cu 5 giay se hien thong bao 1 lân
mTimer = 0
If IsNull(DLookup("ID", "qryThongBao")) Then
MsgBox "Không có viec" '<=Khi áp dung thuc te se bo doan code nay
Else
MsgBox "Ban có viec can lam"
DoCmd.OpenForm "frmThongBao"
End If
End If
End Sub
File demo: TaskList.mdb -
RE: Demo Form nhắc nhỡ lịch hẹn
tranhai_vn > 01-12-15, 09:42 AM
Cám ơn Bác đã quan tâm
-
RE: Demo Form nhắc nhỡ lịch hẹn
maidinhdan > 01-12-15, 05:55 PM
(26-11-15, 04:57 PM)ongke0711 Đã viết: Tôi hướng dẫn bạn cách làm cơ bản. Nguyên lý của nó là định kỳ chạy 1 cái query kiểm tra table chứa công việc cần làm xem có cái nào đến hạn không? nếu có hiện thông báo, nếu không im luôn
- Tạo 1 table Công Việc: ID, Ngày, Công Việc, Thời gian bắt đầu, tgian kết thúc, Hoàn tất.
- Tạo 1 query lọc [Công Việc] nào có [Thời gian bắt đầu] so với [Hiện tại] còn 1h nữa tới hạn. Cái thời gian 1h này tùy bạn muốn bao nhiêu thì thiết lập.
- Trên form màn hình chính của bạn, vào Form Properties|Event -> chọn Time Interval:1000; On Timer: Event Procedure
Nếu em muốn hiện tất cả các công việc trong vòng 3 ngày thì phải viết code thế nào ạ? -
RE: Demo Form nhắc nhỡ lịch hẹn
tranhai_vn > 01-12-15, 06:16 PM
Trong query của Bác ấy có cái hàm datediff để lọc, Bác thay chỗ đó bằng datediff ngày là xong mà. -
RE: Demo Form nhắc nhỡ lịch hẹn
ongke0711 > 01-12-15, 09:31 PM
Bạn maidinhdan test ứng dụng kỹ quá
Thực ra cái demo này chỉ là cơ bản nên chưa có chi tiết vô nhiều trường hợp lên lịch thông báo sắp đến hạn.
Để có thể sử dụng tuỳ chọn số ngày hoặc giờ đến hạn thì mình chỉnh lại cái table và form nhập liệu chút như sau:
- tableCongViec: mình gộp luôn việc nhập [Ngày + Giờ] của Task vô cùng 1 field [TGBatDau] (khỏi phải thêm field [Ngay] riêng).
+ Format: General Date
+ Input mask: 99/99/0000\ 99:00:00\ >LL;0;_ (sẽ hiển thị dạng: 26/11/2015 8:30:00 AM)
- qryThongBao:ThoiGianDenHan: DateDiff("h",Now(),[TGBatDau])
- Form: khi nhập thời gian cần thông báo trước 3 ngày (ví dụ) thì sẽ qui đổi thành số giờ rồi query theo số giờ này.