打不开数据库文件
我在客户端上编写如下代码 :Dims 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请各位大侠帮忙呀,这段代码也是
页:
[1]