Domino 9 und frühere Versionen > Entwicklung

Erreichbarkeit eines Servers testen

(1/5) > >>

oson00:
Hallo,

ich habe ein Problem. Ich möchte in LotusScript die Erreichbarkeit eines Servers testen. Wie kann ich dies am elegantesten lösen?

Gibt's es bei Cluster-Anwendungen besondere Konstelationen?

Gruß

OSon

Glombi:
Hier ein kleines Script, dass prüft, ob die names.nsf auf einem Server geöffnet werden kann.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim servername As String
servername = "Dein Server"

Set db = session.GetDatabase( servername, "names.nsf" )
If db.IsOpen Then
 If Instr(db.Server,servername) > 0 Then      
    Msgbox "Server erreicht"      
 Else
    Msgbox "Anderer Cluster-Server erreicht"
 End If
Else
 Msgbox "Server nicht erreicht"   
End If


Es wird auch Failover auf einen Cluster berücksichtigt.

Andreas

oson00:
Wunderbar! Ja, so müßte es klappen! Vielen Dank!

oson00:
es funktioniert leider nicht, da ich die in einem periodischen Agenten nutzen möchte. Dort gibt er mir immer folgendes aus:

Cannot open databases on machines other than the server running your program

Aber das kann doch eigentlich nicht sein, oder??? Das ist mir ja noch nie aufgefallen!

Semeaphoros:
Doch, das ist so. Zugriff auf andere Server aus Agenten heraus gibt es erst ab Domino 6 - Sicherheitsproblem.

Navigation

[0] Themen-Index

[#] Nächste Seite