HCL Domino - Examples: PickListStrings method - Need a Domino Consultant? Call NotesMail +1 212-599-2048

HCLSoftware Business Partner Domino Consulting Services CRUCIAL Notes Tools +1 212-599-2048	Domino Consulting Services CRUCIAL Notes Tools Domino administration Notes development	Chat now
.

Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: PickListStrings method
1. This example displays the resources dialog box and allows the user to select one resource. A message box shows the user's selection.

Sub Click(Source As Button) Dim workspace As New NotesUIWorkspace Dim picklist As Variant Dim messagelist As String picklist = workspace.PickListStrings( PICKLIST_RESOURCES ) If ( Isempty( picklist ) ) Then Messagebox "Canceled" , , "Resource selected" Else Forall plist In picklist messagelist = messagelist & plist & Chr(10) End Forall Messagebox messagelist , , "Resource selected" End If End Sub

2. This example displays a custom dialog box showing only the documents that appear under the Procedures category in the By Category view of a database. The user may select multiple documents. The text from column 4 is displayed.

Sub Click(Source As Button) Dim workspace As New NotesUIWorkspace Dim picklist As Variant Dim messagelist As String picklist = workspace.PickListStrings( _ PICKLIST_CUSTOM, _ True, _ "snapper", _ "ProgWork2", _ "By Category", _ "Document picker", _ "Please select some documents.", _ 4, _ "Procedures" ) Forall plist In picklist messagelist = messagelist & plist & Chr(10) End Forall Messagebox messagelist End Sub

See Also

PickListStrings method

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents