AjpdSoft :: Ver tema - Usuarios Conectados a BD Paradox
Autor Mensaje
RENDOX Usuario
Registrado: Feb 04, 2010 Mensajes: 1
Asunto : Usuarios Conectados a BD Paradox
Necesito saber los usuarios que esten utilizando la BD Paradox en la red osea nombre del PC, IP, lo que sea.
Saludos
Publicado:
Jue Feb 04, 2010 4:19 pm
alonsojpd Administrador/Moderador
Registrado: Sep 16, 2003 Mensajes: 2687
Asunto : Re: Usuarios Conectados a BD Paradox
Anuncios
RENDOX escribió: Necesito saber los usuarios que esten utilizando la BD Paradox en la red osea nombre del PC, IP, lo que sea.
Saludos
En en siguiente artículo explicamos cómo configurar paradox en red y cómo obtener los usuarios conectados:
http://www.ajpdsoft.com/modules.php?name=News&file=article&sid=391
El procedimiento para obtener los usurios conectados:
Código:
procedure TFormPrincipal.BInfoClick(Sender: TObject);
VAR
TmpCursor: hDbiCur;
rslt: dbiResult;
UsrDesc: USERDesc;
begin
LISTBOX1.Items.Clear;
LISTBOX1.Items.add('Usuarios conectados:');
Check(DbiOpenUserList(TmpCursor));
try
repeat
Rslt := DbiGetNextRecord(TmpCursor, dbiNOLOCK, @UsrDesc, nil);
if Rslt <> DBIERR_EOF then
begin
LISTBOX1.Items.add(UsrDesc.szUserName);
end;
until Rslt <> DBIERR_NONE;
finally
Check(DbiCloseCursor(TmpCursor));
end;
Publicado:
Vie Feb 05, 2010 6:37 am
Todas las horas son GMT - 1 Horas
Key
Puede publicar nuevos temas en este foroNo puede responder a temas en este foroNo puede editar sus mensajes en este foroNo puede borrar sus mensajes en este foroNo puede votar en encuestas en este foro