Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Есть идеи? / 7 сообщений из 7, страница 1 из 1
04.02.2003, 09:59
    #32100724
Groove
Groove
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
Добрый день, господа!
Есть какие нибудь идеи насчет того, как получать список пользователей юзающих аксцесовскую базу в настоящее время?
Я сделал просто до ужаса (просто некогда было мозговать), создал таблицу юзеров
Код: plaintext
1.
2.
3.
ID
UserLogin (string)
UserName (string)
IsLogon (boolean)
и при загрузке получаю логин, нахожу его в таблице и ставлю IsLogon=true, все работет до тех пор, пока какой нибудь пользователь не сделает снять задачу (сама прога еще ни разу не глючила). После этого поле IsLogin остается истиной, а юзер не активен...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.02.2003, 10:21
    #32100733
Itsme
Itsme
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
procedure GetCurrentUsersList;
const adhcUsers: string = '{947bb102-5d43-11d1-bdbf-00c04fb92675}';
var r: tADODataset;
begin
r:= dm.d_currentusers;
dm.adoc_db1.OpenSchema(siProviderSpecific,emptyparam,adhcUsers,r);
r.Open;
end;

из толстой зеленой книжки "Руководство разработчика Access 2000"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.02.2003, 10:23
    #32100735
Itsme
Itsme
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
Правда, это для тех, кто использует файл рабочей группы и вход пользователей по логину
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.02.2003, 16:27
    #32101042
Unambo
Unambo
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
procedure TForm1.FormDestroy(Sender: TObject);
begin
а здесь сделай свой IsLogon:=false

end;
это событие обрабатывается при закрытие формы, даже если снимают задачу через Ctrl+ Alt+Del
Правда если твои юзвери комп рисетят, то тогда это не поможет
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.02.2003, 03:38
    #32101286
StarWind
StarWind
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
ну чтоб не ресетили, можно проводки от Reset'а отсоеденить... правда остается еще Power и вилка сетевого штура в силовой розетке...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.02.2003, 08:24
    #32101314
falcon_k
falcon_k
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
... Или винда повисла напрочь ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.02.2003, 09:19
    #32101337
Aleksei
Aleksei
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Есть идеи?
А если сделать по временной опрос всех юзеров которые подключены, и в случае если он отключен от твоей базы данных сделать соответствующие изменения.

Правда это может немного загрузить сетку.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Есть идеи? / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]