Вопрос про OpenWithFailover

P

PeNgViN213

Добрый день! Ребят есть скрипт, подскажите мне, как тут работает метод OpenWithFailover, ведь его синтаксис (help) такой:
1529584510000.png

Код:
Sub Postopen(Source As Notesuidatabase)
    Dim ws As New NotesUIWorkspace, DBV As NotesDatabase
    Dim ses As New NotesSession, ag As NotesAgent
    Const SRV = "CN=XXVB"
   
    If Not source.Database.Server = SRV Then
        Set DBV = New NotesDatabase("","")
        DBV.OpenWithFailover SRV, source.Database.FilePath
        Source.Close  
        ws.Opendatabase DBV.Server, DBV.Filepath
    End If
End Sub
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 985
611
BIT
470
@PeNgViN213 зачем спрашивать, если ответ в хелпе
If the database can't be opened on the specific server but the server belongs to a cluster, OpenWithFailover automatically looks for a replica of the specified server on the same cluster. If the method finds a replica, that database is opened instead, and the server property adjusts accordingly.
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!