在访问各种lotus数据库的外部程序中,我收到以下错误:
第43行出现错误4386:数据库不支持文件夹 参考
通常这个程序本身可以启用文件夹引用,这似乎不起作用。所以我问他们的支持,他们给了我以下脚本来启用文件夹引用:
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
If db.FolderReferencesEnabled Then
If Messagebox ("Folder References are enabled." & Chr(10) & Chr(10) _
& "Do you want to disable the Folder References?" ,1 + 32,db.title) = 1 Then
db.FolderReferencesEnabled = False
Messagebox "Disabled Folder References now.....", 64, db.title
Else
Exit Sub
End If
Else
If Messagebox ("Folder References are disabled." & Chr(10) & Chr(10) _
& "Do you want to enable the Folder References?" ,1 + 32,db.title) = 1 Then
db.FolderReferencesEnabled = True
Messagebox "Enabeled Folder References now.....", 64, db.title
End If
End If
我在第db.FolderReferencesEnabled = True
行中收到错误:
数据库不支持文件夹引用
有没有人知道如何为数据库启用文件夹引用?
编辑:有问题的数据库是复制。我能够在原始数据库中启用文件夹引用,并且正在复制文件夹属性。
但是,如果我尝试启用它们,副本仍然会抛出此错误,它不支持文件夹引用。这是预期的行为吗?
答案 0 :(得分:1)
数据库必须具有$ FolderInfo和$ FolderRefInfo隐藏视图 支持文件夹引用。可以从邮件中复制这些视图 模板。
......根据documentation。
另一个原因可能是用于执行代码的NotesID的ACL访问级别不足。
有时候意见被打破了。删除视图$ FolderInfo和$ FolderRefInfo并再次从邮件模板中复制这些视图。
答案 1 :(得分:0)
我们的Notes管理员终于能够通过简单地运行updall
,compact
,fixup
来解决此问题。我们不能说这些实用程序中的哪一个实际上解决了这个问题。