Domino 9 und frühere Versionen > Entwicklung

Close Notes

(1/1)

arcon:
Hallo, gibt es eine möglichkeit von Script heraus den Notesclient zu schliessen ?

THX, Arcon

koehlerbv:
Declarations:
Public Const WM_CLOSE = &H10
Declare Function GetActiveWindow Lib "user32" Alias "GetActiveWindow"  ( ) As Long
Declare Function PostMessage Lib "user32" Alias "PostMessageA" (Byval hwnd As Long, Byval wMsg As Long, Byval wParam As Long, lParam As Any) As Long

Code:
Messagebox "Sie sind es nicht wert, mit Notes zu arbeiten !"
wh = GetActiveWindow()
Call PostMessage(wh, WM_CLOSE, 0&, 0&)


HTH,
Bernhard

arcon:
Jo, das wahrs !

Geht super THX

koehlerbv:
 ;)

Navigation

[0] Themen-Index