• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Tính số ngày sử dụng chương trình

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư viện thủ thuật
  • Tính số ngày sử dụng chương trình
• Tính số ngày sử dụng chương trình

• Tính số ngày sử dụng chương trình

  Noname > 06-08-10, 12:59 PM

  Yêu cầu: Mình có một chương trình Access tự viết nhỏ, mình muốn chương trình tính được số ngày sử dụng hoặc số lần đã mở chương trình nhưng không phụ thuộc vào ngày của hệ thống
  
  
  

  hungtan Đã viết:bạn tạo 1 table T2, tạo field có tên là userTime, kiểu number
  
  Khi user mở starup form, ở sự kiện open của form, bạn viết 1 đoạn code mở table trên và edit thêm sự kiện như sau:
  
  Private Sub Form_Open(Cancel As Integer)
  Dim rs As DAO.Recordset
  Set rs = CurrentDb.OpenRecordset("T2")
  With rs
  .MoveFirst
  .Edit
  !UserTime = !UserTime + 1
  .Update
  End With
  rs.Close
  End Sub

• RE: Tính số ngày sử dụng chương trình

  ndthanh29 > 12-10-12, 11:44 AM

  sao lại bị báo lỗi ở dòng lệnh .MoveFirst bạn hướng dẫn cụ thể hơn được không?

• RE: Tính số ngày sử dụng chương trình

  Noname > 12-10-12, 11:51 AM

  Bạn đã tạo table T2 chưa?

• RE: Tính số ngày sử dụng chương trình

  Xuân Thanh > 12-10-12, 12:02 PM

  (12-10-12, 11:44 AM)ndthanh29 Đã viết: sao lại bị báo lỗi ở dòng lệnh .MoveFirst bạn hướng dẫn cụ thể hơn được không?

  
  Thêm cái này nữa mới đúng và không bị lỗi
  If .RecordCount > 0 Then .MoveFirst
  
  Vì khi lần đầu sử dụng thì T2 làm gì đã có Recordset mà MoveFirst?
  Thân mến

• RE: Tính số ngày sử dụng chương trình

  Xuân Thanh > 18-10-12, 04:54 PM

  (06-08-10, 12:59 PM)Noname Đã viết: Yêu cầu: Mình có một chương trình Access tự viết nhỏ, mình muốn chương trình tính được số ngày sử dụng hoặc số lần đã mở chương trình nhưng không phụ thuộc vào ngày của hệ thống
  
  
  

  hungtan Đã viết:bạn tạo 1 table T2, tạo field có tên là userTime, kiểu number
  
  Khi user mở starup form, ở sự kiện open của form, bạn viết 1 đoạn code mở table trên và edit thêm sự kiện như sau:
  
  Private Sub Form_Open(Cancel As Integer)
  Dim rs As DAO.Recordset
  Set rs = CurrentDb.OpenRecordset("T2")
  With rs
  .MoveFirst
  .Edit
  !UserTime = !UserTime + 1
  .Update
  End With
  rs.Close
  End Sub

  
  Đoạn code này phải chỉnh lý lại như sau mới hoàn chỉnh
  
  

  Mã PHP:

  Private Sub Form_Open(Cancel As Integer)
   Dim rs As DAO.Recordset
   Set rs = CurrentDb.OpenRecordset("T2")
   With rs
      If .Recordcount > 0 Then
         .Edit
         !UserTime = !UserTime + 1
         .Update
      Else
         .AddNew
         !UserTime = 1
         .Update
      End If
   End With
   rs.Close
End Sub 


• RE: Tính số ngày sử dụng chương trình

  quyvt1993 > 26-11-12, 10:53 PM

  (18-10-12, 04:54 PM)Xuân Thanh Đã viết:

  (06-08-10, 12:59 PM)Noname Đã viết: Yêu cầu: Mình có một chương trình Access tự viết nhỏ, mình muốn chương trình tính được số ngày sử dụng hoặc số lần đã mở chương trình nhưng không phụ thuộc vào ngày của hệ thống
  
  
  

  hungtan Đã viết:bạn tạo 1 table T2, tạo field có tên là userTime, kiểu number
  
  Khi user mở starup form, ở sự kiện open của form, bạn viết 1 đoạn code mở table trên và edit thêm sự kiện như sau:
  
  Private Sub Form_Open(Cancel As Integer)
  Dim rs As DAO.Recordset
  Set rs = CurrentDb.OpenRecordset("T2")
  With rs
  .MoveFirst
  .Edit
  !UserTime = !UserTime + 1
  .Update
  End With
  rs.Close
  End Sub

  
  Đoạn code này phải chỉnh lý lại như sau mới hoàn chỉnh
  
  

  Mã PHP:

  Private Sub Form_Open(Cancel As Integer)
   Dim rs As DAO.Recordset
   Set rs = CurrentDb.OpenRecordset("T2")
   With rs
      If .Recordcount > 0 Then
         .Edit
         !UserTime = !UserTime + 1
         .Update
      Else
         .AddNew
         !UserTime = 1
         .Update
      End If
   End With
   rs.Close
End Sub 


  
  Cho mình hỏi Bài này là Kiểm tra số lần mở chương trình hay kiểm tra theo ngày??? CHo mình hỏi nếu kiểm tra theo ngày thì phải dùng hàm như thế nào? Vì cách thông thường Thằng sử dụng sẽ thay đổi ngày hệ thống vậy mình đâu có lấy hàm Date() để dùng được? Các bạn có cách nào không?

• RE: Tính số ngày sử dụng chương trình

  ndthanh29 > 21-07-14, 06:38 PM

  Cái này mình cũng đang cần, nếu như thay đổi ngày hệ thống thì lại quay về ban đầu.
• Bài trước Bài tiếp