Открыть через View БД

  • Автор темы -
  • Дата начала

Гость
#1
Всем, привет!

Можно ли через View, открыть БД, ну что то вроде picka-lista:
Код:
picklist = workspace.PickListStrings( PICKLIST_CUSTOM, True, PathToServer, PathToDB, "ACPP" ,"Выбор договора" ,"Пожалуйста выберите договор" ,9 )
 

Гость
#3
may be
Код:
Call notesUIWorkspace.OpenDatabase( server$, file$, view$, key$, newInstance, temp )
Не получается открыть документ через, UnprocessedDocuments, значение doc почему-то пустое :(
Код:
Sub Queryopendocument(Source As Notesuiview, Continue As Variant)

Dim db As NotesDatabase	
Dim doc As NotesDocument	
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim collection As NotesDocumentCollection

Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument()

Call ws.OpenDatabase(doc.DBServer, doc.DBFile)

End Sub
 

yerke

Well-Known Member
28.08.2007
392
0
33
Алматы
#4
код что то не понятный

вы делаете
1) при открытом вию вы открываете какой то документ из него...
2) при открытии документа срабатывает событие, где..
3) из текущей базы ищутся не обработанные документы
4) достается первый не обработанный документ
5) из него извлекаются значения полей DBServer и DBFile (при том не правильно извлекаются)
6) потом делается попытка открытия базы в уи
по извлеченным данным

чет не врубаюсь

что именно вам нужно
 

Гость
#6
А можно ли при открытии документа определить в каком он режиме будет открыт, на чтение или на редактирование?
 

Гость
#8
Из всех доступных eventov в Sub Queryopen - это Source As Notesuiview и Continue As Variant.
На view привесил кнопку открыть в режиме редактирования и в зависимости от значения переменной EditMode, я буду запускать при открытии то или иное действие. Только вот проблемка, где мне эту переменную продиклорировать(инициализировать), чтобы она была видна как для кнопки так и при открытии?