-
Hỏi về: Đếm số người sử dụng backend
ledangvan > 30-09-17, 09:28 AM
Tôi có một dữ liệu gồm nhiều máy sử dụng, tôi muốn tại một máy có quyền có thể xem hiện có bao nhiêu máy đang sử dụng dữ liệu. Nếu có thể cho liệt kê tên các máy.
Nhờ mọi người giúp đỡ, xin cảm ơn. -
RE: Hỏi về: Đếm số người sử dụng backend
maidinhdan > 30-09-17, 08:58 PM
(30-09-17, 09:28 AM)ledangvan Đã viết: Tôi có một dữ liệu gồm nhiều máy sử dụng, tôi muốn tại một máy có quyền có thể xem hiện có bao nhiêu máy đang sử dụng dữ liệu. Nếu có thể cho liệt kê tên các máy.
Nhờ mọi người giúp đỡ, xin cảm ơn.
Xem Demo này: [Thủ Thuật] Demo Liệt kê số lượng User đang mở table nào
Ghi chú Admin: Chủ đề này sẽ được kết hợp với link trên trong 24h tới. -
RE: Hỏi về: Đếm số người sử dụng backend
ledangvan > 30-09-17, 09:19 PM
(30-09-17, 08:58 PM)maidinhdan Đã viết:
(30-09-17, 09:28 AM)ledangvan Đã viết: Tôi có một dữ liệu gồm nhiều máy sử dụng, tôi muốn tại một máy có quyền có thể xem hiện có bao nhiêu máy đang sử dụng dữ liệu. Nếu có thể cho liệt kê tên các máy.
Nhờ mọi người giúp đỡ, xin cảm ơn.
Xem Demo này: [Thủ Thuật] Demo Liệt kê số lượng User đang mở table nào
Ghi chú Admin: Chủ đề này sẽ được kết hợp với link trên trong 24h tới.
Cái này anh cũng thấy rồi, rất hay, nhưng anh muốn lấy kết quả (số máy đang dùng) như ví dụ của Dân sẽ cho ra kết quả phía dưới là hiện có 2 máy đang dùng -
RE: Hỏi về: Đếm số người sử dụng backend
maidinhdan > 01-10-17, 12:27 AM
(30-09-17, 09:19 PM)ledangvan Đã viết: Cái này anh cũng thấy rồi, rất hay, nhưng anh muốn lấy kết quả (số máy đang dùng) như ví dụ của Dân sẽ cho ra kết quả phía dưới là hiện có 2 máy đang dùng
Có gần 5 cách, thật ra nó dùng ADO thôi có gì đâu anh
Cách 1:
* Mở form *Frm_NetworkMonitor tìm hàm Private Sub Transfer_UserRosterMultipleUsers(ByVal strPath_Filename_ToBackend As String)
Chèn cú pháp ở dưới dòng này
Mã PHP:Private Sub Transfer_UserRosterMultipleUsers(ByVal strPath_Filename_ToBackend As String)
.....................
Wend
'cut off trailing ';' and transfer to listbox
strRowSource = Left(strRowSource, Len(strRowSource) - 1)
lstConnections.RowSource = strRowSource
' Nơi anh cần chèn để lấy số lượng nè
MsgBox "So luong User dang truy cap la: " & lstConnections.ListCount
........................
End Sub
Cách 2: Tương tự ở vị trí trên
MsgBox "So luong User dang truy cap la: " & rs.RecordCount
và còn nhiều cách nửa......
* Ngâm cứu kỹ cái hàm trên sẽ hiểu.