Domino 9 und frühere Versionen > ND9: Entwicklung

Lotus Script If bei einer Messagebox

<< < (3/4) > >>

Haku:
Ich habe den Button jetzt "fast" hinbekommen, ich hätte noch eine Frage zu der "Return value".

Mein Code lautet jetzt:

If Messagebox("Frage?", 32, "Unterschrift") = IDYES Then
'Sendet Mail
End if

Wenn ich jetzt die Messagebox bestätige oder das Fenster schieße ignoriert der Button die Befehle, allerdings soll der Button die Befehle durchführen wenn ich die Frage bestätige.

Ich habe auch schon "<>" probiert, dort werden die Befehle immer ausgeführt.

Hoffe mein Problem ist für Euch verständlich, und vielen Dank für die Hilfe:)

ata:
... du hast die Konstanten vermutlich nicht eingebunden - daher kann er nicht richtig entscheiden.
Lass die den Rückgabewert der Messagebox ausgeben und nimm ihn als Zahl

ret = Messagebox("Frage?", 32, "Unterschrift")
Print "Rückgabe = " & ret

da müsste dann in der Statusleiste eine Zahl erscheinen - je nach OK oder Cancel. Diese Zahl nimmst du dann anstelle der Konstanten.

Das ist doch die falsche Ziffer - mit 32 erhälst du kein ja oder Nein - sondern nur OK

Toni

ata:
... die richtige Ziffer ist 36 - und die Rückgabe für Ja ist dann 6

Toni ;-)

pram:
Tut euch und ggf. dem nächsten Entwickler einen Gefallen und verwendet keine Zahlen sondern die Konstanten aus der lsconst.lss  ;D

MB_ICONQUESTION + MB_YESNO = 36


Ausschnitt:

--- Code: ---'-----------------------------------------------------------------------------
' MsgBox parameters
'-----------------------------------------------------------------------------

Public Const MB_OK = 0                 ' OK button only
Public Const MB_OKCANCEL = 1           ' OK and Cancel buttons
Public Const MB_ABORTRETRYIGNORE = 2   ' Abort, Retry, and Ignore buttons
Public Const MB_YESNOCANCEL = 3        ' Yes, No, and Cancel buttons
Public Const MB_YESNO = 4              ' Yes and No buttons
Public Const MB_RETRYCANCEL = 5        ' Retry and Cancel buttons

Public Const MB_ICONSTOP = 16          ' Critical message
Public Const MB_ICONQUESTION = 32      ' Warning query
Public Const MB_ICONEXCLAMATION = 48   ' Warning message
Public Const MB_ICONINFORMATION = 64   ' Information message

Public Const MB_APPLMODAL = 0         ' Application Modal Message Box
Public Const MB_DEFBUTTON1 = 0       ' First button is default
Public Const MB_DEFBUTTON2 = 256       ' Second button is default
Public Const MB_DEFBUTTON3 = 512       ' Third button is default
Public Const MB_SYSTEMMODAL = 4096     ' System Modal

'-----------------------------------------------------------------------------
' MsgBox return values
'-----------------------------------------------------------------------------

Public Const IDOK = 1                  ' OK button pressed
Public Const IDCANCEL = 2              ' Cancel button pressed
Public Const IDABORT = 3               ' Abort button pressed
Public Const IDRETRY = 4               ' Retry button pressed
Public Const IDIGNORE = 5              ' Ignore button pressed
Public Const IDYES = 6                 ' Yes button pressed
Public Const IDNO = 7                  ' No button pressed

--- Ende Code ---


Gruß
Roland

koehlerbv:
Ein einfaches Option Declare hätte zudem einen solchen Basisfehler gleich angezeigt.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete