Hallo
DP'ler.
Ich habe wieder mal ein Problem. Wir wollen in einem Monitoring Tool feststellen, welche Benutzer auf einem Interbase Server eingerichtet sind, ob sie momentan online sind und mit welcher Datenbank sie verbunden sind.
Benutzer ermitteln ist mit IBSecurityService kein Problem.
Für die Ermittlung welche User Online sind, wollten wir IBServerProperties mit FetchDatabaseInfo eine Liste der Datenbanken ermitteln und da ging es los. Laut F1 sollte es mit folgendem Code möglich sein, eine Liste der Datenbanken eines Server zu bekommen. Es passiert aber nichts
Delphi-Quellcode:
with IBServerProperties1
do begin
ServerName := '
localhost';
LoginPrompt := False;
Params.Add('
user_name=SYSDBA');
Params.Add('
password=masterkey');
Active := True;
try
Options := [Database];
FetchDatabaseInfo;
// bis hier alles ok
for i:= 0
to High(DatabaseInfo.DbName)
do // DatabaseInfo ist leer ???
User.Database:= DatabaseInfo.DbName[i];
finally
Active := False;
end;
end;
User.Database ist eine Stuktur zur Aufnahme der Daten
Woran liegt es, das DatabaseInfo leer bleibt? Hat jemand von euch schon mal sowas gemacht?