在 IIOP 连接后，Lotus Notes 连接器从副本运行代理

Question

我确实有以下情况：

• "ScheduledJobs.nsf" 与代理"Worker"
• "ScheduledJobs.nsf" 在三个 domino 服务器上复制：DominoServer1、DominoServer2、DominoServer3
• 有了Lotus Notes Connector，我能够通过IIOP 与DominoServer1 上的Notes 数据库"ScheduledJobs.nsf" 建立连接。此连接是静态配置的。
• 因为有到 Notes 数据库的连接，我能够在 DominoServer1 上的 Javascript 上运行 Notes 数据库 "ScheduledJobs.nsf" 上的代理 "Worker"。

我想做的是：

有时，根据情况，我想从副本运行代理 "Worker"。例如，我想在 DominoServer2 或 DominoServer3 上运行代理 "Worker"。

问题：

由于通过IIOP 与Notes 数据库的连接是静态的，因此我总是在DominoServer1 上连接到数据库"ScheduledJobs.nsf"。

问题：

我能否在副本上的 IIOP 连接之后运行代理 "Worker"？

---

已编辑

我的“RunWorkerOn2”代码

Dim agent As NotesAgent
Dim sess As New NotesSession    
Dim db As NotesDatabase
Dim doc As NotesDocument    
Dim item As NotesItem

Set db = sess.CurrentDatabase   
Set agent = sess.CurrentAgent

Call db.Open( "DominoServer2/ORGANIZATION", "ScheduledJobs.nsf" )
Set agent = db.GetAgent("Worker")

// Reason why im using 'run' insted of RunOnServer:
// https://www-01.ibm.com/support/docview.wss?uid=swg1LO42549
If agent.Run() = 0 Then
    Print "SUCCESS"
Else
    Print "FAILED"
End If

Answer 1

你可以间接地做到这一点。

在包含“Worker”的 ScheduledJobs 数据库中，添加两个新代理：“RunWorkerOn2”和“RunWorkerOn3”。

在 RunWorkerOn2 代理的代码中，添加代码以在 DominoServer2 上打开 ScheduledJobs.nsf 并使用 NotesDatabase.GetAgent("Worker")。然后调用 NotesAgent.RunOnServer 在 Dominoserver2 上运行 Worker。

同样，在 RunWorkerOn3 代理的代码中，打开 DominoServer3 上的 ScheduledJobs.nsf 并使用 NotesDatabas.GetAgent("Worker")。然后调用 NotesAgent.RunOnserver 在 DominoServer3 上运行 Worker。

这样，您的连接器仍然连接到 DominoServer1，并且它在 DominoServer1 上运行其所有 agaengs，但这些代理又将在 DominoServer2 和 DominoServer3 上运行代理。