Msgbox Default Button

Setting a defualt button in a msgbox can be acheived by using the values from
the LotusScript Constants file lsconst.lss. These values are:
MB_DEFBUTTON1 = 0 ' First button is default
MB_DEFBUTTON2 = 256 ' Second button is default
MB_DEFBUTTON3 = 512 ' Third button is default

A modification of another 411 user's submission is as follows:



'msgbox with yes/no buttons default is no
Dim memofrom As New NotesName(memodoc.From(0))
boxType& = MB_YESNO + MB_DEFBUTTON2
answer% = Messagebox("Send Return Receipt to " + memofrom.Common + "?",
boxType&, "Return Receipt Enabled" )
This was first published in November 2000

Dig deeper on Domino Resources - Part 5

0 comments

Oldest 

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

-ADS BY GOOGLE

SearchWinIT

Search400

  • iSeries tutorials

    Search400.com's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...

SearchEnterpriseLinux

SearchVirtualDataCentre.co.UK

Close