Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: 2Consultants am 11.11.02 - 13:21:38

Titel: Notes beenden mit LotusScript
Beitrag von: 2Consultants am 11.11.02 - 13:21:38

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

Titel: Re:Notes beenden mit LotusScript
Beitrag von: Rob Green am 11.11.02 - 13:28:35

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

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

Titel: Re:Notes beenden mit LotusScript
Beitrag von: eknori am 11.11.02 - 13:44:19

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

Titel: Re:Notes beenden mit LotusScript
Beitrag von: eknori am 11.11.02 - 13:56:48

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

Titel: Re:Notes beenden mit LotusScript
Beitrag von: 2Consultants am 11.11.02 - 15:37:35

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!

Titel: Re:Notes beenden mit LotusScript
Beitrag von: eknori am 11.11.02 - 15:41:12

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