用程序读names.nsf中视图的内容,但是读不出来?

wolflice wolflice 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
Dim dbNames As New NotesDatabase( db.server,"names.nsf")
Msgbox(dbNames.title)
Set viewserver=dbNames.getview("Server\Ser_vers|Servers")
Set doctmp=viewserver.getfirstdocument
'出错,读不出试图中的数据,有什么办法解决,文档中有一些保护域?
HomeUrl="string"
Msgbox(doctmp.universalid)
Do While Not (doctmp Is Nothing)
doctmp.HTTP_HomeURL=HomeUrl
Msgbox("save")
Call doctmp.dave(True,False)
Set doctmp=viewserver.getnextdocument(doctmp)
Loop
...全文
评论 4
收藏 已收藏
分享
返回顶部
wolflice
消息协作 536 成员 39,094 内容