欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

怎么遍历出所有nsf数据库中的一个用户啊

更新时间: 2014-01-05 03:00:45 责任编辑: Author_N1

 

如何遍历出所有nsf数据库中的一个用户啊?
需求是遍历 lotus服务器上 所有nsf数据库
查找文档中包含 administrator/bizks 这个账号的所有文档
并且输入为txt
已经实现的了遍历服务器上所有的数据库 还有输出txt
代码如下:
Sub Initialize
Dim pathName As String, fileName As String
Dim fileNum As Integer

fileNum% = Freefile()
fileName$ = "D:\DBs.txt"

Open fileName$ For Output As fileNum%

pathName$ = "D:\IBM\Lotus\Notes\Data\*.nsf"
fileName$ = Dir$(pathName$, 0)
Do While fileName$ <> ""
Print fileName$
'Search begin ...

'Search end...

Write #fileNum%, fileName$
fileName$ = Dir$()
Loop
Close fileNum%
End Sub

有哪位高手 能帮我补全代码啊?跪谢!
--参考方法--
很明显这样不行。通过获得文件系统的nsf数据库,查询数据库文档,这个根本放访问不了数据。
可以这样的思路来做:
1:获得服务器上所有nsf的数据列表--数组;
2:循环每一个nsf数据库
3:在每一个数据库中利用数据库索引搜索:db.FTSearch,查找包含“ administrator/bizks ”的文档documentCollection
4:循环DocumentCollection下面的每一分文档。
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 03:00:45
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/17228/
本文WWW.DOC100.NET DOC100.NET版权所有。