FB2.01, IBDAC, NoOfAttachments einer DB

[hoika]

Hallo #,

ich bekomme es nicht hin ! ;(
Ich brauche die Anzahl der angemeldeten User an einer DB.

Das müsste über TIBCServerProperties gehen,
nur wie ?

Mit

Delphi-Quellcode:

  IBCServerProperties1.Attach;
  IBCServerProperties1.FetchDatabaseInfo;
  MessageBox(0, PChar(IntToStr(IBCServerProperties1.DatabaseInfo.NoOfAttachments)), '', 0);

bekomme ich alle angemeldeten User raus, nicht nur die meiner eigenen Datenbank.

Mit

Delphi-Quellcode:

  for iDB:= Low(IBCServerProperties1.DatabaseInfo.DbName) to
    High(IBCServerProperties1.DatabaseInfo.DbName) do
  begin
    MessageBox(0, PChar(IBCServerProperties1.DatabaseInfo.DbName[iDB]), '', 0);
  end;

die DB's, da könnte ich immerhin suchen, ob meine dabei ist.

Danke


Heiko

[Lemmy]

Hi,

ich habe es noch nie probiert, aber schau mal was bei

Code:

Select * from MON$ATTACHMENTS

zurück kommt....

[tsteinmaurer]

Ich kann mit der Version 2.01 nichts anfangen. Sollte es kleiner 2.1 sein, dann mit TIBCConnection.DatabaseInfo.UserNames, wird aber unter Classic Server vermutlich nur maximal einen Benutzer anzeigen.

Mit >= 2.1 wie von Lemmy überwähnt über die Monitoring-Tabelle.

[hoika]

Hallo,

Danke.
Dann muss ich improvisieren.

Heiko