OK!!!
OpenFileDialog funziona alla grande!!!
Solo che ora avrei bisogno di salvare il path del file scelto in un campo del
documento in cui mi trovo, ma nn ne vuol sapere di salvare nulla.
Posto il codice con la speranza che qualcuno scopra l\'intoppo...
Sub Initialize
Dim ws As New NotesUIWorkspace
Dim session As New NotesSession
Dim docContesto As NotesDocument
Set docContesto = session.DocumentContext
filenames = ws.OpenFileDialog( _
True, "Scegli il file da importare",, "c:\")
If Not(Isempty(filenames)) Then
Forall filename In filenames
docContesto.path="filename" End Forall
End If
End Sub
|