Notes beenden mit LotusScript

[2Consultants]

Wahrscheinlich ganz einfach:

Nach der Abarbeitung eines Script im Datenbankscript soll nicht nur die DB geschlossen, sondern auch Notes beendet werden.

Danke für jeden Tip!
Christian

[Rob Green]

starte einen weiteren Agent mit
"Command([FileExit])" drinnen.

In Script weiß ich es nicht. Glaube gibt nx dazu wie in Formelsprache.

[eknori]

In Script sollte das in einem zusätzlichen Agenten, wie von Rob vorgeschlagen folgendermaßen gehen

Declare Function NEMGetCurrentSubprogramWindow Lib "nnotesws.dll" () As Long
Declare Function NEMStopSubprogramWindow Lib "nnotesws.dll" (Byval hwnd As Long) As Integer

Sub Initialize
Dim wHandle As Long
wHandle = NEMGetCurrentSubprogramWindow
Call NEMStopSubprogramWindow(wHandle)
End Sub

eknori

[eknori]

Hab gerade mal was probiert:

NotesMedic von Cassetia via Shell Starten; und schon ist Notes zu.
NotesMedic beendet alle Notes Tasks sauber und zuverlässig.

eknori

[2Consultants]

Ich habe es doch mit der @Function gemacht, ist zwar Mischcode aber was soll es. Die API-Funktion hatte ich sogar schon drin, die schließt mir aber Notes nicht
Sag mal Ulrich wo bekomme ich Dein letztgenanntes Tool her? Danke!

[eknori]

http://www.cassetica.com/cassetica/notesmedic.asp