Ví dụ về tạo form đăng nhập ở Access (1 người xem)

[Hai Lúa Miền Tây]

Gửi các bạn ví dụ về tạo form đăng nhập trong file đính kèm.

 

[Hai Lúa Miền Tây]

Như file ở trên mình ghi lại thông tin của người đăng nhập và giờ đăng nhập.
Cho mình hỏi là có cách nào mình biết được có bao nhiêu người đang sử dụng file đó trên mạng lan không ?
Em xin cám ơn trước

 

[706311]

Cảm ơn bạn nhưng mình muốn form đăng nhập chỉ cho phép những người có tên theo danh sách đã chỉ định thì phải làm sao ??? Bạn làm ơn giúp mình, cảm ơn nhiều.

 

[Hai Lúa Miền Tây]

Cảm ơn bạn nhưng mình muốn form đăng nhập chỉ cho phép những người có tên theo danh sách đã chỉ định thì phải làm sao ??? Bạn làm ơn giúp mình, cảm ơn nhiều.

Bạn cứ việc tạo form thêm để quản lý user thôi. Trong Table tblEmployees mình đã tạo 1 số user name bạn vào table đó xem thử nhé.

 

[cadafi]

Như file ở trên mình ghi lại thông tin của người đăng nhập và giờ đăng nhập.
Cho mình hỏi là có cách nào mình biết được có bao nhiêu người đang sử dụng file đó trên mạng lan không ?

Gợi ý thôi nha:
Tạo một Table temp chứa các user đang đăng nhập.

Khi user vừa nhập hoàn tất xong form đăng nhập --> insert 1 dòng vào bảng này với thông tin của user vừa đăng nhập và thời gian bắt đầu đăng nhập.

Như vậy muốn biết có bao nhiêu user đang connect vào database thì chỉ việc dùng qry để đếm thôi. Đại khái

Select Count(*) from tblTemp

Khi user đó thoát ra thì trước khi thoát access, delete dòng chứa thông tin của user đó trong bảng tblTemp.

 

[nguyenhai]

Cho hỏi thêm!

Cám ơn bạn domfootwear, nhưng bạn có thể hướng dẫn là làm thế nào để đưa phần Login này áp dụng cho dữ liệu của tôi không?
Thank!

 

[nguoiconxunui]

Gợi ý thôi nha:
Tạo một Table temp chứa các user đang đăng nhập.


Khi user đó thoát ra thì trước khi thoát access, delete dòng chứa thông tin của user đó trong bảng tblTemp.

sao không tạo cái thêm trường status , khi thoát ra thì update thành false -> sau này coi lịch sử đăng nhập dễ dàng hơn, xóa chi uổng thế

 

[dailykem]

sao không tạo cái thêm trường status , khi thoát ra thì update thành false -> sau này coi lịch sử đăng nhập dễ dàng hơn, xóa chi uổng thế

anh làm mẫu cho e được ko ạ
thank, lâu lâu mới thấy anh trở lại diễn đàn

 

[Hai Lúa Miền Tây]

anh làm mẫu cho e được ko ạ
thank, lâu lâu mới thấy anh trở lại diễn đàn

Tải file ví dụ bài #1 rồi vào code của form frmMain thêm vào dòng tô màu xanh như bên dưới.

Option Compare Database

Private Sub Form_Load()
If txtCheck = "user 1" Then
User1.SetFocus
Admin.Enabled = False
User2.Enabled = False
User3.Enabled = False
End If
If txtCheck = "user 2" Then
User2.SetFocus
Admin.Enabled = False
User1.Enabled = False
User3.Enabled = False
End If
If txtCheck = "user 3" Then
User3.SetFocus
Admin.Enabled = False
User1.Enabled = False
User2.Enabled = False
End If
[COLOR=#0000cd]With DoCmd
    .SetWarnings (False)
    .RunSQL "UPDATE tblEmployees SET tblEmployees.Status = True " & _
             "WHERE (((tblEmployees.lngEmpID)=" & lngMyEmpID & "));"
    .SetWarnings (True)
End With[/COLOR]

End Sub

[COLOR=#0000cd]Private Sub Form_Unload(Cancel As Integer)
With DoCmd
    .SetWarnings (False)
    .RunSQL "UPDATE tblEmployees SET tblEmployees.Status = false " & _
             "WHERE (((tblEmployees.lngEmpID)=" & lngMyEmpID & "));"
    .SetWarnings (True)
End With

End Sub[/COLOR]

 

[papngot3288]

Gửi các bạn ví dụ về tạo form đăng nhập trong file đính kèm.

bạn ơi..mình chưa có học access.mình đọc không có hiểu gì hết. bạn có thể làm dùm mình logon vào file access của mình được không bạn. cảm ơn bạn nhiều