Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Đặt hạn sử dụng chương trình
#11
mình muốn tạo một cái thông báo lịch nhắc nhở vào trong acces mà không biết có được không ? bác nào cho ý kiến cái! ( nếu biết thì chỉ mình luôn.) ( chẳng hạn mình muốn đến ngày 30/4/2013 khi mình chay CT access nó sẽ có thông báo "ngày mai hết hạn nộp tiền điện" ... chẳng hạn!)
Chữ ký của kugkuygil Xin chào, mình là kugkuygil, Tham gia http://thuthuataccess.com/forum từ ngày 18-03 -13.
Reply
Những người đã cảm ơn
#12
bạn tạo 1 function kt_Lich(), trong đó bạn kiểm tra xem có lịch nào tới hạn chưa, nếu có thì hiện msgbox thông báo cho người dùng biết (hỏi xem có báo lại hay kô?), nếu không có lịch nào "tới số" thì thoát function.

nếu lịch hẹn tính đến ngày thôi thì lúc form chính mở lên bạn gọi kt_Lich cho nó kiểm tra. Còn nếu tính tới giờ thì đặt nó vào sự kiện OnTimer của form chính cho nó "cứ 1 chút thì kiểm tra".

Cơ bản là thế!
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn kugkuygil
#13
(02-04-13, 09:38 AM)bomnhauag Đã viết: bạn tạo 1 function kt_Lich(), trong đó bạn kiểm tra xem có lịch nào tới hạn chưa, nếu có thì hiện msgbox thông báo cho người dùng biết (hỏi xem có báo lại hay kô?), nếu không có lịch nào "tới số" thì thoát function.

nếu lịch hẹn tính đến ngày thôi thì lúc form chính mở lên bạn gọi kt_Lich cho nó kiểm tra. Còn nếu tính tới giờ thì đặt nó vào sự kiện OnTimer của form chính cho nó "cứ 1 chút thì kiểm tra".

Cơ bản là thế!

Người ta là người mới, bạn giúp được thì giúp, nói lòng vòng chẳng giải quyết được gì.
Chữ ký của domfootwear Xin chào Guest, nếu Guest biết thủ thuật nào thì nên chia sẻ cho cộng đồng nhé.
ღღღღღTài sản của domfootwear (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#14
bạn làm ơn chỉ rõ hơn một chút được không ? mình chỉ cần tính đến ngày khi mở ra nó kiểm tra xem có đánh dấu nào không thôi! không thì cho mình xin link một bài nói về vụ này!
Chữ ký của kugkuygil Xin chào, mình là kugkuygil, Tham gia http://thuthuataccess.com/forum từ ngày 18-03 -13.
Reply
Những người đã cảm ơn
#15
(02-04-13, 10:32 AM)domfootwear Đã viết:
(02-04-13, 09:38 AM)bomnhauag Đã viết: bạn tạo 1 function kt_Lich(), trong đó bạn kiểm tra xem có lịch nào tới hạn chưa, nếu có thì hiện msgbox thông báo cho người dùng biết (hỏi xem có báo lại hay kô?), nếu không có lịch nào "tới số" thì thoát function.

nếu lịch hẹn tính đến ngày thôi thì lúc form chính mở lên bạn gọi kt_Lich cho nó kiểm tra. Còn nếu tính tới giờ thì đặt nó vào sự kiện OnTimer của form chính cho nó "cứ 1 chút thì kiểm tra".

Cơ bản là thế!

Người ta là người mới, bạn giúp được thì giúp, nói lòng vòng chẳng giải quyết được gì.

Mod! Nếu người mới vui lòng đọc kỹ thì sẽ hiểu và làm được thôi. Bợm đã nói thẳng vào vấn đề lắm rồi không phải lòng vòng. Còn nếu muốn nữa thì chỉ có việc là làm dùm luôn cho thôi!
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#16
(03-04-13, 12:43 AM)kugkuygil Đã viết: bạn làm ơn chỉ rõ hơn một chút được không ? mình chỉ cần tính đến ngày khi mở ra nó kiểm tra xem có đánh dấu nào không thôi! không thì cho mình xin link một bài nói về vụ này!

Giả sử vầy nhé, bạn có 1 table: tblLich lưu lịch như vầy: maLich(Text), ngayTao(Date), ngayNhacNho(Date), noiDung(Text), daNhacNho (Y/N)

Tạo một function kiểm tra lịch như sau:

Mã PHP:
Public Function kt_Lich()
    
Dim d As Date
    Dim r 
As DAO.Recordset
    Dim s 
As String
    
    Set r 
CurrentDb.OpenRecordset("SELECT * FROM tbl_Lich WHERE ngayNhacNho=date() AND daNhacNho=False; ")
    
    If 
r.EOF And r.BOF Then 'truong hop hom nay ko co lich nhac nho
        r.Close
        Set r = Nothing
        Exit Function
    End If
    
    While Not r.EOF     '
Duyet wa tung cong viec can nhac nho va thong bao
        s 
"Cong viec hom nay ban can lam:" vbCrLf
        s 
r("noiDung") & vbCrLf
        s 
"Ban co muon nhac lai cong viec nay khong!?"
        
        
If MsgBox(svbYesNo vbInformation"Nhac nho...") = vbNo Then    'Neu user khong muon nhac lai thi bo wa
            CurrentDb.Execute "UPDATE tbl_Lich SET daNhacNho=True WHERE maLich='" & r("
maLich") & "'; "
        End If
        r.MoveNext
    Wend
    r.Close
    Set r = Nothing
End Function 

Trong sự kiện Open của form chính bạn gọi kt_Lich để nó tiến hành kiểm tra và thông báo nhé!
015
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn kugkuygil
#17
mình hơi gà bạn thông cảm nhé! theo mình hiểu function thì là ta vào modules tạo 1 file mới rồi dán code của bạn vào đúng không:
http://www.fshare.vn/file/7VZAAR4GNS/
bạn xem qau ví dụ trên hộ mình mà nếu có ebook về chương anỳ thì làm ơn cho mình xin! ( trình access học trong sách giáo khoa cấp 3 thôi!)
Chữ ký của kugkuygil Xin chào, mình là kugkuygil, Tham gia http://thuthuataccess.com/forum từ ngày 18-03 -13.
Reply
Những người đã cảm ơn
#18
(03-04-13, 08:30 PM)kugkuygil Đã viết: mình hơi gà bạn thông cảm nhé! theo mình hiểu function thì là ta vào modules tạo 1 file mới rồi dán code của bạn vào đúng không:
http://www.fshare.vn/file/7VZAAR4GNS/
bạn xem qau ví dụ trên hộ mình mà nếu có ebook về chương anỳ thì làm ơn cho mình xin! ( trình access học trong sách giáo khoa cấp 3 thôi!)

ok, đặt vậy đúng rồi đó bạn, khi đặt public rồi thì dù ở form nào cũng có thể gọi function này được. Thân!
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn kugkuygil
#19
vậy có cách nào để nso tự động kiểm tả được không bạn ? tức là mình bật file access cái alf nó tự động chạy kiểm tra luôn !
Chữ ký của kugkuygil Xin chào, mình là kugkuygil, Tham gia http://thuthuataccess.com/forum từ ngày 18-03 -13.
Reply
Những người đã cảm ơn
#20
có bạn nào không vô giúp mình với!:
có cách nào để funcition trên tự động chạy khi vào không ?
Chữ ký của kugkuygil Xin chào, mình là kugkuygil, Tham gia http://thuthuataccess.com/forum từ ngày 18-03 -13.
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] chương trình đơn giản để so sánh chuỗi text kanmai07 4 315 28-09-16, 06:05 PM
Bài mới nhất: kanmai07
  Thiết kế chương trình quản lý thu chi ChiMai 1 154 03-08-16, 10:52 AM
Bài mới nhất: maidinhdan
  [Hỏi] File chạy chậm vì trong quá trình design phải chỉnh sửa và test thử nhiều. toancvp 4 262 29-07-16, 11:36 PM
Bài mới nhất: toancvp
  [Hỏi] Sử dụng phần mềm viết bằng Access trong mạng LAN chantroi_19 9 751 21-06-16, 10:33 AM
Bài mới nhất: lmthu
  Dung lượng đ.ồ á.n access lớn? tienze123 2 186 21-06-16, 09:16 AM
Bài mới nhất: lmthu

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ơ