I was recently writing some LotusScript code with a lot of back-end manipulations that required a folder picker to navigate through a MailFile.
I originally tried using the following code:
dim ses as new notessession
dim db as notesdatabase
dim ret as variant
set db = ses .currentdatabase
ret=Evaluate({@PickList
( [FOLDERS] : [SINGLE] ;} + db.server
+ {:} + db.FilePath +{ )})
However, I continually received the error message: "operation failed." At this point, I decided that I had to look for an alternative method.
Why my initial code failed repeatedly is unclear. I did, however, discover that not all @Formula statements work with the Evaluate() function.
This is often the case when interacting with the workspace/GUI. After considerable tuning and tweaking, I came up with the following LotusScript code alternative for @Picklist([Folder]).
An undocumented parameter for workspace.PicklistStrings exists in LotusScript to select folders in a Lotus Notes database. The first parameter can be "0-3," according to the Domino Designer Help. But using "4" allows you to select folders.
(Click on code for enlarged view and script download.)
Do you have comments on this tip? Let us know.
This tip was submitted to the SearchDomino.com tip library by member Wim Bergkamp. Please let others know how useful it is via the rating scale below. Do you have a useful Lotus Notes, Domino, Workplace or WebSphere tip or code snippet to share? Submit it to our monthly tip contest and you could win a prize.
