Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Đặt hạn sử dụng chương trình
#1
Chào các bạn.
Mình có biết một chương trình nhỏ bằng Access và đặt hạn sử dụng chương tình theo cách trong file đính kèm.
Link : https://docs.google.com/file/d/0B7Y3jP6g...sp=sharing
Nhưng hạn chế của cách làm này là người dùng có thể tự vào Table tblThoiGian để sửa lại ngày sử dụng.
Nhờ các bạn hướng dẫn mình viết đoạn code VBA chèn luôn ngày sử dụng vào trong From mà không cần lấy ngày sử dụng từ Table tblThoiGian.

Cảm ơn.
Chữ ký của sorryikillyo Xin chào, mình là sorryikillyo, Tham gia http://thuthuataccess.com/forum từ ngày 27-02 -13.
Reply
Những người đã cảm ơn
#2
1/ Trong form không bao giờ lưu trữ dữ liệu
2/ Đặt hạn sử dụng ngay trong modul rồi chuyển sang file thưc thi(.mde)
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn sorryikillyo
#3
Cảm ơn Xuân Thanh đã ghé xem.
Bạn có thể hướng dẫn mình cách viết một Module như vậy k? Mình cũng mới tìm hiểu về Access nên chưa biết nhiều về VBA và Module.
Chữ ký của sorryikillyo Xin chào, mình là sorryikillyo, Tham gia http://thuthuataccess.com/forum từ ngày 27-02 -13.
Reply
Những người đã cảm ơn
#4
Bạn nào biết chỉ giúp mình với!!!024
Chữ ký của sorryikillyo Xin chào, mình là sorryikillyo, Tham gia http://thuthuataccess.com/forum từ ngày 27-02 -13.
Reply
Những người đã cảm ơn
#5
Bạn có thể đặt trong mainform, đặt ở sự kiện on open hoặc on load:
Mã:
if Date()> Ngày bạn muốn Then
msgbox "Het han"
docmd.Quit
End if
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 sorryikillyo
#6
Bạn ơi, mình đã viết code như thế này:
Mã PHP:
Private Sub Form_Load()
If 
Date #3/20/2013# Then
    
MsgBox "Het han."vbCriticalMe.Caption
    DoCmd
.Quit
End 
If 

Mình gõ ngày là 20/03/2013 nhưng sau đó nó tự sửa lại là 3/20/2013. Mình đã định dạng ngày tháng trong Control Panel là dd/mm/yyyy rồi.
Bạn hướng dẫn mình sửa lại đoạn code để khi khi gõ ngày tháng nó không tự đổi lại nha. Cảm ơn bạn.
Chữ ký của sorryikillyo Xin chào, mình là sorryikillyo, Tham gia http://thuthuataccess.com/forum từ ngày 27-02 -13.
Reply
Những người đã cảm ơn
#7
haquocquan ơi, giúp mình với.
Chữ ký của sorryikillyo Xin chào, mình là sorryikillyo, Tham gia http://thuthuataccess.com/forum từ ngày 27-02 -13.
Reply
Những người đã cảm ơn
#8
Để đặt thời gian cho người khác sử dụng có 1 cách đơn giản bạn làm như sau: Tạo một nút lệnh bất kỳ (nút thêm mới chẳng hạn) bấm phải chuột chọn "Build Event " sau đó bạn Paste đoạn mã sau vào giữa đúng vị trí con trỏ . CHúc thành công

If Now > #3/22/2013# Then

MsgBox "Ban dang dung phan mem khong ban quyen" & vbCrLf & vbCrLf & "Hãy liên hê: Nguyễn Tất Thắng"
DoCmd.Quit

End If
Chữ ký của wintq Đang có mấy chương trình đ.ồ á.n tốt nghiệp trước viết cho Sinh viên về: QL nhân sự, Thư viện, QL Báo, QL Bán hàng,......ai có nhu cầu liên hệ: 0904 506 777.
ღღღღღTài sản của wintq (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#9
(16-03-13, 08:41 PM)haquocquan Đã viết: Bạn có thể đặt trong mainform, đặt ở sự kiện on open hoặc on load:
Mã:
if Date()> Ngày bạn muốn Then
msgbox "Het han"
docmd.Quit
End if

Làm như thế này người ta chỉnh lùi ngày hệ thống là xem như có thể sử dụng được.
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
#10
Cảm ơn các bạn, mình làm được rồi.
Chữ ký của sorryikillyo Xin chào, mình là sorryikillyo, Tham gia http://thuthuataccess.com/forum từ ngày 27-02 -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 316 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 155 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 263 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 752 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ơ