标题: 打不开数据库文件 [打印本页] 作者: moyhtayht 时间: 2007-7-13 10:06 标题: 打不开数据库文件 我在客户端上编写如下代码 ：
Dim s As New NotesSession
Dim db As NotesDatabase
Dim ndb As NotesDatabase
Set db=s.CurrentDatabase
Set ndb=s.GetDatabase(db.server,"mail.nsf")
Dim nview As NotesView
Dim ndoc As NotesDocument
‘出错处
Set nview=ndb.GetView("People")
Set ndoc=nview.GetFirstDocument
----------------------------------------------------------
但是到倒数第二行出错，出错提示：
Database Names.nsf Has Not Been Opened Yet请各位大侠帮忙呀，这段代码也是