File browsing and filepath name

HCL Domino Domino Forum
1

Can anyone suggest how I can do. I like to allow users to browse the local directory for files similar to what we do when we create attachement. The difference is that, instead of creating an attachment, I would like to extract the file name and path of the file on the local system and store it in the form which this function is called.

Thanks for any thoughts and suggestion.

2

Subject: RE: File browsing and filepath name

Hi!I think this is what you are looking for.

The code below write path+filename to a field named “Files”.

/Jocke

Dim ws As New NotesUIWorkspace

Dim Doc As NotesDocument

Dim ui As NotesUIDocument

Set ui=ws.currentdocument

Set doc=ui.document

Dim item As Notesitem

Set item=doc.GetFirstItem(“Files”)

filenames = ws.OpenFileDialog(True, “Select file(s)”, "c:")

If Not(Isempty(filenames)) Then

Forall filename In filenames

	item.AppendToTextList(filename)

End Forall

End If

3

Subject: RE: File browsing and filepath name

Thanks, I think this should work. At least, I hv a starting point now

4

Subject: RE: File browsing and filepath name

Both @Prompt([LocalBrowse]) and NotesUIWorspace.OpenFileDialog do that.