我一直在努力找出搜索收集具有特定日期的数据库中的所有文档的最佳方法.
最初我试图使用FTsearch或搜索来浏览文档集合,但我转而处理视图和相关文档.
我的第一个问题是什么是最简单的方法来旋转一组文档并查找文档中存储的日期是否大于或小于指定日期？
因此,为了继续工作,我实现了以下代码.
If (doc.creationDate(0) > cdat(parm1))
And (doc.creationDate(0) < CDat(parm2)) then
...
end if
但结果都没了
Included! Date:3/12/10 11:07:08 P1:3/1/10 P2: 3/5/10
Included! Date:3/13/10 9:15:09 P1:3/1/10 P2: 3/5/10
Included! Date:3/17/10 16:22:07P1:3/1/10 P2: 3/5/10
您可以看到doc中存储的日期不在P1和P2之间.但!它确实限制了日期小于P1的文档.因此,对于日期小于3/1/10的文档,我不会得到结果
如果没有比if语句更好的方法,有人可以帮助我理解为什么包含上面的两个例子？
我想进行22位数的分割.在莲花剧本.
谁能告诉我怎么做？我没有得到正确的结果.
例如;
dim num as Double;
dim num1 as Double;
NUM = 123456789989898976765;
num1 = num/97;
但我没有在num1中得到正确的结果.
美好的一天,问题:任何人都知道如何禁用Lotus notes快捷键,例如在视图中,没有复制和粘贴数据？
在Lotus Notes中,当您发送电子邮件时,它可以自动将电子邮件放在"已发送"视图中.但是"已发送"视图的特殊之处在于,您无法将已发送视图的"消息"移动到其他文件夹中.您可以将邮件"复制"到另一个文件夹,然后从"已发送"视图中删除邮件.但这是一个非常繁琐的两步过程.因此,我每天所做的就是将所有"已发送"邮件复制到收件箱中,然后从"已发送"视图中删除所有邮件.
在我每天上下班的过程中,我会在相应的文件夹中处理将它们归档的所有日子,以供日后参考.因此,在收件箱中放置所有内容可节省大量时间,因为类似主题(发送/接收)上的大多数消息在时间线中彼此相邻.
是否有一种自动方式让Lotus Notes定期自动将邮件从"已发送"文件夹移动到"收件箱".我听说我可以使用预定代理,但我没有看到任何方式来安排代理(注意:我是用户而不是Domino管理员).
有更好的方法吗？
我有一个按钮"移动文档",据说它应该将所选文档移动到另一个文件夹.我使用PutAllInFolder但它只将文档复制到"移动文档"文件夹.是否有另一种方法可以完全将它们移动到另一个文件夹或视图？
这是我的代码:
Sub Click(Source As Button)
Dim session As New notessession
Dim dbCur As notesdatabase
Set dbCur = session.currentdatabase
Dim collSelected As notesdocumentcollection
Set collSelected = dbCur.UnprocessedDocuments
Call collSelected.PutAllInFolder("Move Document")
Dim uiw As New notesuiworkspace
Call uiw.viewrefresh
End Sub
我还想在Lotus脚本中创建的触发代理发送的邮件中更改"发送者"字段(显示有mailDoc.Principal时).是否可以更改它我已经尝试过以下代码
mailDoc.SentBy = strFrom
mailDoc.tmpDisplaySentBy = strFrom
mailDoc.FROM = strFrom
mailDoc.SendFrom = strFrom
我仍然无法改变这一部分..是否有可能或有一些限制？...谢谢
我有以下代码:
Forall agent In db.agents
'I need to remove "$MachineName" item from all agents
End Forall
如何从NotesAgent中删除"$ MachineName"项？或者我如何将NotesAgent转换为NotesDocument以便我可以删除此项目？
使用此代码:
Set col = db.Search("Form=""formname"" & id=212", time, 0)
我明确地给出了搜索功能212,但是如果我想给出一个变量该怎么办
dim var as Integer
我的搜索结果如何,因为这不起作用:
Set col = db.Search("Form=""formname"" & id=var", time, 0)
在Lotus notes脚本中,我使用DialogBox来显示用户放置数据的表单.
但是如果用户按下ESC键盘按钮,用户放入我的DialogBox的所有数据都将丢失.
当用户按"ESC"按钮并保存DialogBox表格的所有数据时,是否有方法拦截？
我有一组具有不同形式的文档,需要在列表中存储文档表单的数量,listtag将是表单名称和该表单在集合中出现的次数的值,如下所示:
表格Main = 20
表格Doc = 10
下面的代码是我尝试做的开始,但每次有一个带有现有表单的新doc时,我需要增加该元素的值
Dim frmList List As integer
Set ud = newdc.Getfirstdocument()
Do Until ud Is Nothing
frm = ud.Form(0)
If(IsElement(frmList(frm))) Then
frmList(frm) = 1 ' Need to increment this value with 1 if tag exist
Else
frmList(frm) = 1
End If
Set ud = newdc.Getnextdocument(ud)
Loop
如果使用"列表"不可能,我需要另一个解决方案
谢谢
托马斯