删除多余文档

时间:2017-02-17 01:25:31
【文件属性】:

文件名称:删除多余文档

文件大小:30KB

文件格式:DOC

更新时间:2017-02-17 01:25:31

LotusScript 删除 多余文档

我们可以需要将数据库中,同一内容的文档保留一个,而删除多余的文档。本程序即提供此功能。 准备: ·视图:ViewName,处理在此视图中的文档 ·表单域:FieldName,判断文档此域是否存在相同内容,如果相同则视为同一文档,视图第一列需要以此域排序。 操作按钮: Sub Initialize Dim ss As New notessession Dim db As notesdatabase Set db = ss.currentdatabase Dim vi As notesview


网友评论