' получение имени пользователя в Windows
'----------------------------------------
Private Declare Function GetUserNameS Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
'----------------------------------------

Function GetUserName() As String

Dim sUsername As String * 40

On Error Resume Next
Call GetUserNameS(sUsername, 40)
GetUserName = StrZ(sUsername)
End Function

Так тебе в сети надо искать или тех кто к базе подключился?
для Win2000/XP
УправлениеКомпьютером->ОбщиеПапки->Сеансы/ОткрытыеФайлы

>Всех в сети
Тады причем тут форум по Access?
Для этого другие форумы есть.

Зачем тогда знать всех юзеров всей сети

запустил юзер прогу
1)она узнала его имя(см выше)

2)она узнала имя компа
Private Declare Function GetComputerNameS Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
' Получение имени компьютера
Public Function GetComputerName()
Dim sCompName As String * 40
Dim nSize As Long

nSize = 40
Call GetComputerNameS(sCompName, nSize)
GetComputerName = StrZ(sCompName)
End Function

3)Сравниваеш это хозяйство с таблицей и береш из ее полей нужную инфу (имет\неимеет право)
если юзер впервые на этом компе
добавляеш новую строку

Делаеш таблицу
ИмяКомпа,ИмяЮзера
При запуске приложения
добавляеш в нее запись
GetComputerName(),GetUserName()
При выходе удаляеш эту запись

Таблица отражает текущее состояние юзер юзает прогу на компе

если надо чтобы юзер получал net send вне зависимости
от того запущена у него прога или нет
то можно послать net send не компу,а юзеру
и сообщение получат все сессии этого юзера в сегменте сети
только для этого накомпах какая-то служба должна быть установлена
(не помню какая но по умолчанию она не ставится спроси у админа он должен знать)