G
Guest
Всем привет!
Пытаюсь открыть view из другой БД, пишет что мол БД не открыта и поэтому не могу получить view
Static db As NotesDatabase
Static view As NotesView
Dim PathToServer As String
Dim PathToDB As String
PathToServer = proDoc.GetItemValue("PathToServerDb")(0)
PathToDB = proDoc.GetItemValue("PathToDBDb")(0)+proDoc.GetItemValue("PathToDBContractACC")(0)
If db Is Nothing Then Set db = session.GetDatabase(PathToServer, PathToDB)
If view Is Nothing Then Set view = db.GetView ("Contract")
Пытаюсь открыть view из другой БД, пишет что мол БД не открыта и поэтому не могу получить view
Static db As NotesDatabase
Static view As NotesView
Dim PathToServer As String
Dim PathToDB As String
PathToServer = proDoc.GetItemValue("PathToServerDb")(0)
PathToDB = proDoc.GetItemValue("PathToDBDb")(0)+proDoc.GetItemValue("PathToDBContractACC")(0)
If db Is Nothing Then Set db = session.GetDatabase(PathToServer, PathToDB)
If view Is Nothing Then Set view = db.GetView ("Contract")