How create folder?

I need advice how to automatically create folder witch name is depend how value hale a field. Example I have file “name” and I want put button action witch create folder which name=entry of field ”name”.Hanks for help.

Subject: How create folder?

Call notesDocument.PutInFolder( folderName$ [, createonfail ] )

Put a document in the folder with createonfail set to true.

Look in notes designer help.

Subject: RE: How create folder?

Ok I understand but how can I capture field name and use it as folder name cebuse when I use fallowing:

Sub Click(Source As Button)

Dim doc As NotesDocument

Call doc.PutInFolder(mac1_f)

End Sub

Where:

mac1_f is name of text field which I want to use as source of naming folder.

It doesn’t work.

Pleas help.

Subject: RE: How create folder?

your code should look something like this:

dim ws as new notesuiworkspace

dim doc as notesdocument

set doc = ws.currentdocument.document

call doc.PutInFolder(doc.mac1_f(0))

Subject: RE: How create folder?

Thank you so much it Works, but is something strange because when I first time run document put some into field and click button “add folder” I see on screen error (Variant does not contain an object), but when I click OK and next on the same document click on “add folder” button all is ok it make new folder. I don’t knew where is the reason for this reaction?