Domino Code Fragment

Code Name*
Button to ask for object to insert		Date*
04/28/2024		Source (or email address if you prefer)*
Rlatulippe@romac.com
IP address:.18.216.186.164
Description*
Type*
Formula		Categories*
(Misc)
Implementation:
Required Client:
Server:
Limitations:
Comments:
Files/Graphics attachments (if applicable): Code:

theObject := @Prompt([OKCANCELLIST]; "Insert Document Object"; "Pick an object type to insert. Use the first option for any object type not listed."; ""; " An object type not listed" : "Microsoft Excel Worksheet" : "Adobe Acrobat Document" : "Microsoft Graph 5.0" : "Microsoft Graph 3.0" : "Microsoft Excel Chart" : "Microsoft Word 2.0 Document" : "Microsoft Word 6.0 Document");
@If(theObject = 1; @Return(@Prompt([OK]; "No Selection"; "Be sure to click on one of the listed choices before clicking OK.")); @Success);
@If(theObject = " An object type not listed"; @Do(@PostedCommand([EditDown]); @PostedCommand([EditInsertObject])); @Do(@PostedCommand([EditDown]); @PostedCommand([EditInsertObject]; theObject)))