Eventuell hilft dieses hier.
aus der Designer-Hilfe - Klasse NotesAgent
status = notesAgent.RunOnServer( [ noteID$ ] )
Andreas
Hallo,
ich hab das mal nach dem Hilfe Beispiel so gelöst:
Sub Exiting(Source As Field)
Dim s As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set db = s.CurrentDatabase
Set agent = db.GetAgent("Kunden_Agent_ODBC_OF")
If agent.RunOnServer = 0 Then
Messagebox "Agent ran",, "Success"
Else
Messagebox "Agent did not run",, "Failure"
End If
End Sub
Das klappt auch.
Was ist denn mit unseren ADM, die nur eine lokale Replik auf Ihren Notebooks haben? Die haben dort keine Verbindung zu der ODBC Datenbank.
Kann ich es irgendwie erreichen, dass der Client eine Zeiger auf den geänderten Datensatz setzt und der Server nach der nächsten Replikation die Aktualsierungen durchführt?