Per Script den aktuellen Server und DB-Namen abfragen

[Steffen_Albrecht]

Hallo,

ich möchte den aktuellen Servernamen und den Namen der Datenbank (mit Pfad) abfragen.
Das alles hätte ich gern in 2 Strings.
Hat jemand nen Vorschlag wie ich das bewerkstelligen kann?

Gruß
     Steffen

[Hevelmann]

Ist es das was du suchst ?

   Dim session As New NotesSession
   Dim db As NotesDatabase
   
   Dim sServer As String
   Dim sPath As String
   
   Set db = session.CurrentDatabase
   
   sServer = db.Server
   sPath = db.FilePath

Gruss Hevelmann

[Steffen_Albrecht]

Jawoll!

genau das ist es was ich brauche!

Danke!
   Steffen

[ata]

... oder mit Evaluate

Dim value As Variant
value = Evaluate("@DBName")

... value(0) = Server
... value(1) = Datenbankpfad

ata