Domino 9 und frühere Versionen > Entwicklung

Script

(1/1)

Steffen_Albrecht:
Hallo,

ich habe folgendes Problem:
Ich muss verschiedene Pfadangaben (für ein Profildokument) in einer Maske speichern.
hierfür möchte ich einen File-Dialog verwenden und den Rückgebewert dann in das
betreffende Textfeld schreiben. Den Dialog bekomme ich ja auch schon geöffnet aber
wie bekomme ich jetzt den String in mein Feld rein?


Hier also mein Script:


Sub Click(Source As Button)   

   Dim uidoc As NotesUIDocument   
   Dim ws As New NotesUIWorkspace
   
   Set uidoc=ws.CurrentDocument
   
   filenames = ws.OpenFileDialog(False, "Bitte wählen Sie die Stammdaten intern Datenbank","", "c:\")
   If Not ( Isempty ( filenames )) Then
      Call uidoc.FieldSetText("Stammdatenintern",filenames)
   End If
      
End Sub

Till_21:
die funktion gibt dir ein array zurueck...

greif also auf (0) zu :
Call uidoc.FieldSetText("Stammdatenintern",filenames(0))

gruss

Steffen_Albrecht:
Ja! So klappt's!

Vielen Dank!
    Steffen

Navigation

[0] Themen-Index