Domino 9 und frühere Versionen > ND6: Entwicklung

Pick list

(1/1)

ch:
Wenn ich diesen code angebe kommt das Adreßbuch und nicht meine Ansicht "Alle" als Picklist. Was hab ich falsch gemacht?

lg claudia


   Dim workspace As New NotesUIWorkspace
   Dim picklist As Variant
   Dim messagelist As String
   picklist = workspace.PickListStrings(Alle)
   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

Semeaphoros:
Blick in die Designer-Hilfe:


--- Code: ---stringArray = notesUIWorkspace.PickListStrings( type% [, multipleSelection ] )

--- Ende Code ---

Der erste Parameter ist type% und ist eine Zahl

Dein Alle ist eine Variable, und da sie nicht inizialisiert ist, hat sie den Wert 0

Weiter unten in der Hilfe ist der Typ erklärt:


--- Code: ---PICKLIST_NAMES (0) Displays the names dialog box. Can only be used in the first form of the method.

--- Ende Code ---

Damit ist klar, dass der Namensdialog kommt.

Was Du brauchst, ist die Picklist in dieser Form:


--- Code: ---stringArray = notesUIWorkspace.PickListStrings( type% [, multipleSelection ], server$, databaseFileName$, viewName$, title$, prompt$, column% [, categoryname$ ] )

--- Ende Code ---


Da sind mindestens 6 Parameter anzugeben. Studier die Hilfe mal.

Navigation

[0] Themen-Index