Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
Dim masken List As String
Dim z As Integer
z = 0
Forall form In db.Forms
masken(z) = form.Name
z = z + 1
End Forall
Wie kann ich mir die Liste der Masken jetzt in einer Picklist/Dialog ausgeben lassen und die vom User ausgewählte Maske in ein Feld in einem Dokument schreiben lassen?
Der Versuch mit
Dim uiws As New NotesUIWorkspace
Dim response As Variant
response = uiws.Prompt (PROMPT_OKCANCELLIST, "Maske", "Bitte die zugehörige Maske auswählen", masken(0), masken)
bringt mir zwar eine Dialogbox, aber hier hab ich nur ein paar 'chinesische Zeichen' drin.
LG Lizzy