欢迎来到天天文库
浏览记录
ID:32399738
大小:28.50 KB
页数:4页
时间:2019-02-04
《lotusaction语句详解》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、LOTUSACTION语句详解2007-06-1214:481、NotesUIWorkspace用法使当前文档可编辑SubClick(SourceAsButton) workspaceAsNewNotesUIWorkspace Callworkspace.EditDocument(True)EndSub使当前文档可编辑,然后把焦点移到"body"域中SubClick(SourceAsButton)dimwsasnewnotesuiworkspacedimuidocasnotesuidocumentsetuidoc=ws.
2、editdocument(true)calluidoc.gotofield("body")EndSub2、notessession用法返回当前数据库下所有文档的总数dimsasnotessessiondimdbasnotesdatabasesetdb=s.currentdatabasedimcollectionasnotesdocumentcollectiondimnasintegersetcollection=db.alldocumentsn=collection.count3、notesdocument用法判断文档中是否包含
3、"subject"域dimdocasnotesdocumentifdoc.hasitem("subject")thenMessagebox("ThereisaSubjectitemonthisdocument")elsemsgbox("ThereisnoSubjectitemonthisdocument")endif4、NotesView用法取得当前数据库的视图与标题SubClick(SourceAsButton)dimsasnotessessiondimdbasnotesdatabasesetdb=s.currentdatab
4、asedimviewasnotesviewsetview=db.getview("v_all")ifnotviewisnothingthenmessagebox(view.name)EndSub5、getfirstitem用法给"Categories"域添加"Girls""Boys"and"Toys"值dimdocasnotesdocumentdimitemasnotesitemsetitem=doc.getfirstitem("Categories")dimnewvals(1to3)asstringnewvals(1)="gi
5、rls"newvals(2)="boys"newvals(3)="toys"callitem.appendtotextlist(newvals)calldoc.save(false,true)给"Categories"域添加"shocks"值dimdocasnotesdocumentdimitemasnotesitemsetitem=doc.getfirstitem("Categories")callitem.appendtotextlist("shocks")calldoc.save(false,true)5、NotesRic
6、hTextItem的用法创建一个"ProjectDescription"文本域,然后给它赋值dimdocasnotesdocumentdimrtitemasnotesrichtextitemsetrtitem=newnotesrichtextitem(doc,"ProjectDescription")callrtitem.appendtext("test")calldoc.save(false,true)把doca的拷贝到docbDimdocAAsNotesDocumentDimdocBAsNotesDocumentDimrti
7、temAsNotesRichTextItem'...setvaluesofdocAanddocB...Setrtitem=NewNotesRichTextItem_(docA,"ProjectDescription")Callrtitem.AppendText_("Cartoonbookforchildrenages9-12")Callrtitem.CopyItemToDocument(docB,"")CalldocA.Save(False,True)CalldocB.Save(False,True)创建一个body邮件备忘录,
8、然后用邮件的方式发送给FrankGlenneldimsessionasnotessessiondimdbasnotesdatabasesetdb=session.currentdatabasedimmemoasnotesdocumentdimrtitemasno
此文档下载收益归作者所有