Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Steffen_Albrecht am 27.01.03 - 12:06:21

Titel: Per Script den aktuellen Server und DB-Namen abfragen
Beitrag von: Steffen_Albrecht am 27.01.03 - 12:06:21

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

Titel: Re:Per Script den aktuellen Server und DB-Namen abfragen
Beitrag von: Hevelmann am 27.01.03 - 12:19:35

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

Titel: Re:Per Script den aktuellen Server und DB-Namen abfragen
Beitrag von: Steffen_Albrecht am 27.01.03 - 13:12:34

Jawoll!

genau das ist es was ich brauche!

Danke!
   Steffen

Titel: Re:Per Script den aktuellen Server und DB-Namen abfragen
Beitrag von: ata am 27.01.03 - 14:33:40

... oder mit Evaluate

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

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

ata