Question

IBM Lotus问题。视图中的文档如何定位呢?

实现的功能：当用户新建文档时，"approver1"和"allreaders1"两个域中的值默认为之前一封文档中该用户所设的值,但我通过一下函数 所读到的有时是之前一封文档，有的时候是“之前一封文档”的再前的文档，我想问下，我只想得到之前的一封文档，该怎么修改......请大家帮助下
Sub Postopen(Source As Notesuidocument)
Dim session As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Dim allreaders As NotesItem
Dim shuliang As Long '数据库文档的数量
Dim duzhe As String

Dim view As NotesView
xingming=session.CommonUserName '当前正在编辑的作者
Set db=session.CurrentDatabase
Set view=db.GetView("v_worklog_zuozhe")
Set dc=view.GetAllDocumentsByKey(xingming,True)
shuliang=dc.Count '数据库文档总数
If Source.IsNewDoc Then
If shuliang>0 Then
Set doc=dc.GetNthDocument(shuliang) '我觉得要调整这条语句,请大家帮助下
pizhun=doc.approver1(0)
Set allreaders=doc.GetFirstItem("allreaders1")
duzhe=allreaders.Text
duzhe=replacestring(duzhe,";",",") '字符串变换函数,对函数功能没影响
Call Source.FieldSetText("approver1",pizhun)
Call Source.FieldSetText("allreaders1",duzhe)
Else
Call Source.FieldSetText("approver1","")
Call Source.FieldSetText("allreaders1","")
End If
End If
End Sub

Answer 1

Lotus Notes/Domino 是一个世界领先的企业级通讯、协同工作及Internet/Intranet平台；具有完善的工作流控制、数据库复制技术和完善可靠的安全机制；尤其适合于处理各种非结构化与半结构化的文档数据、建立工作流应用、建立各类基于Web的应用。它全面实现了对非结构化信息的管理和共享，内含强大的电子邮件功能及工作流软件开发环境，是实现群组协同工作、办公自动化的最佳开发环境。
工作流自动化是信息技术崭新的应用领域，也是克服信息技术局限的突破口。许多诸如协同工作、网络环境下的办公自动化等传统信息技术无从着手解决的问题，在Notes中迎刃而解。Notes 是基于文档型的、分布式的数据库应用，是一种公文流转系统。公文流转系统是日常办公事务中重要的一环。将一个单位内的公文流转处理过程由计算机来完成，并有服务于某种目的的人机信息交互系统，可提高工作效率、监督处理过程、又可大量减少不必要的浪费及人为的失误。办公自动化系统的内容包括文件处理，档案处理，电子邮件，数据处理，信息处理，决策支持等各个方面。与之对应的Notes提供了强大的实现运行办公自动化的平台；包括工作流自动化和群件系统，电子邮件系统，知识管理系统（人工智能首次由实验室走向应用）等功能。在此基础上，Lotus Notes 提供即时准确的信息，保证信息安全，帮助群组协同工作。
Lotus Domino/Notes是目前最为流行的文档数据库系统之一，作为群件系统，它利用自身强大的功能使其在企业、政府办公自动化方面的应用越来越广。笔者在此总结了一些Notes开发和管理的常见问题，希望对大家有所帮助。
Notes是实现和运行办公自动化的平台
办公自动化（OA）因其明显推动企事业单位信息化的进程而备受重视，一直是IT建设的重点；同时，由于办公自动化具有涉及岗位、人员众多，处理流程烦琐、多变等特点，而成为IT建设的难点之一。网络化和Notes平台的出现使上述问题迎刃而解。许多成功的案例确立了Notes在办公自动化方面事实上的标准地位。需要指出的是Notes不仅模拟了办公过程，而且支持人们通过模拟而改革办公流程。显然，这是传统的办公自动化工具（如传真机、复印机）等无法胜任的。
Notes是工作流自动化和群件标准
许多基于网络的应用和办公自动化一样，具有群组协同工作的特征，如信贷审批、客户服务。项目管理、质量跟踪。销售管等。不论在企业级广域冈还是在工作组，Notes以其独特的RADD（快速的应用开发和实施）技术为开发人员提供了最为便捷的环境，因此将其视为典型的群件产品。
Notes是内联网
由于Domino是标准的web服务器：较其它厂家的产品相比较，Domino安全性高、易于管理理、和企业其它信息系统联结能力强。重要的是，Domino提供了丰富的开发工具（实际上是一个Web应用服务器），支持企业网对应甩的要求，因此，Domino/Notes适合作为建设内联网的需要，在标准内联网BWD（Browser/Web server/Data server三层应用模式）中处于中间层的地位。
Notes是电子邮件系统
Domino/Notes提供了基于client/server结构的电于邮件服务，在目录服务、存转、安全性和易用性方面具有相当的领先优势；除此之外Domino/Notes还具备对邮件应用的定制和开发。
Notes是知识管理系统
lotus率先将知识管理(KM)从教科书和实验室中推到了市场。Domino/Notes家族提供了完整的KM解决框架，从网上文档管理，到远程学习，到实时知识应用等。将把企业网络应用推到新的阶段。
Notes实现了BPR（业务流程优化）
ERP（企业资源规划）系统在制造业信息化过程中扮演着重要角色，但是复杂的模型和设置使得EPR系统对于各类作业流程的调整和变化适应能力较差。Domino/Notes可以与系统密切集成实现SFA（销售管理）和CRM（客户关系管理）等应用。
Notes是电子商务的基础
较电子交易（eCommerce）相比电于商务（eBusiness）包含更多的内客。由于在事务处理方面的局限性，Domino/Notes不适合实现联机交易，但是这并不妨碍在电子商务工程中的基础地位正如IBM总裁郭士纳所说Domino/Notes是电子商务皇冠上的明珠。
实际上。除了上述答案以外，Domino/Notes的许多特性，如文档数据库、全文检索、复制、集成开发环境（IDE）和七层安全机制等，都会为自己带来形形色色的定义。
Notes不是万能的。例如：Notes不能（或不适合）实现关系数据库擅长的基于数据的联机事务处理（OLTP）如帐务处理、库存、储蓄等。
对于一个初级开发者来讲，首先要明白，notes是一个半成品，我们是在它的平台上开发应用，一个应用包括一个或多个数据库，notes的应用包括五种类别：workflow(工作流),broadcast（广播）,reference（参考）,tracking（跟踪）,discussion（讨论）。
下面介绍一下notes的主要设计元素：
数据库：在notes中存储文档的单元，文档是用来保存数据的，数据库里保存了若干个文档。
表单:是用来定义文档的格式和布局，每个表单包含域、静态文本、图形和按钮。
文档：是按照表单的格式保存数据的单元，实际上表单是文档的一个模子。
视图：是帮助用户很容易的找到你想要的文档。视图可以为数据库内容提供概述报告
导航器：提供一个数据库内容的可视索引。
文件夹：类似于视图，但可以将视图中的文档拖到文件夹，反之则不行。
域：是包含单独类型信息的表单的命名区域，类似于关系型数据库的字段。
子表单：类似表单功能，但它不能用来创建文档，它是用来插入到表单中，这样主要用于一些多个表单用到同一内容，我们不必一个一个的拷贝，可以插入子表单就可以了。
代理：是在数据库中执行特定任务的单机程序：如修改域值，发送邮件
公式：是一段代码，具有类似编程的属性，它附加在数据库元素上，当这个对象被激活时执行编程任务；如：数据库元素+一段代码=执行任务
LotusScript Lotus提供的另一个编程接口，可以进行复杂的控制。
相关网站：
官方网站(英文):
官方网站(中文):
技术论坛(中文):

Answer 2

你的问题并不在于你说的那一句上，而在于这一句：
Set dc=view.GetAllDocumentsByKey(xingming,True)
通过getalldocumentsbykey获取到的文档并不是有序的文档，所以你不能通过获取出的文档集合的最后一条来确定是不是上一次编辑的文档。
建议你使用个人简要表来存贮用户的这个信息，主需要在保存的时候将用户的那几个信息写入到简要表中，然后将表单中那个域的默认值使用公式获取简要表中的信息就OK了。