moyhtayht 发表于 2007-7-13 10:06:19

打不开数据库文件

我在客户端上编写如下代码 :
    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]
查看完整版本: 打不开数据库文件