Текущий архив: 2005.10.09;
Скачать: CL | DM;

Вниз

Подключение к базе Paradox   Найти похожие ветки 

← →
syte_ser78 ©   (2005-08-26 17:24) [0]

Как определить колво сетевых подключений к базе Paradox и логины подключившихся?

---

← →
Jeer ©   (2005-08-26 18:10) [1]

DbiOpenLockList
DbiOpenUserList

---

← →
Турист   (2005-08-26 23:30) [2]

Пример из bde.hlp для Delphi


procedure fDbiOpenUserList(UserList: TStrings);

var
 TmpCursor: hDbiCur;
 rslt: dbiResult;
 UsrDesc: USERDesc;
begin
 Check(DbiOpenUserList(TmpCursor));
 repeat
   rslt:= DbiGetNextRecord(TmpCursor, dbiNOLOCK, @UsrDesc, nil);
   if (rslt <> DBIERR_EOF) then begin
     UserList.Add("User name: " + UsrDesc.szUserName);
     UserList.Add("Net Session: " + IntToStr(UsrDesc.iNetSession));
     UserList.Add("Product Class: " + IntToStr (UsrDesc.iProductClass));

   end;
 until (rslt <> DBIERR_NONE);
 Check(DbiCloseCursor(TmpCursor));
end;


---

Страницы: 1 вся ветка

Текущий архив: 2005.10.09;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.029 c