категор.выбор в Picklistcollection

[joker_turk]

прошу прощения за сумбур:
На форме лежат родительский документ и внедренная катег.вьюха
'поле - Актkey - связь родителя с документом ответа
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim collection As NotesDocumentCollection
Dim uidoc As NotesUIDocument
Set uidoc=ws.currentDocument
Set db = New NotesDatabase("", "Incass&Error_Bankomats.NSF")
' категоризbированная вьюха
Set view = db.GetView("Items")
Dim doc As NotesDocument
Set doc = view.GetDocumentByKey(Aktkey, True)
' вот здесь пытаюсь получить категорию, но получаю ее только для родительского документа - "", но в таком случае отбор не работает
Category$ = ws.CurrentDocument.Document.Categories(0)
' а как получить ее программно?
Set collection = ws.PickListCollection(PICKLIST_CUSTOM, True,db.server, db.filePath,"Items","Выберите документы для удаления", "Список документов", Category$)

формула вида @PickList([Custom] ; ""; "Items"; "Список"; "";1;Aktkey); работает но мне нужен скрипт

Заранее спасибо

 

[Medevic]

Для: joker_turk
А почему ты в PickListCollection не используешь AktKey, как в @PickList ?

 

[Medevic]

<!--QuoteBegin-joker_turk+7:12:2005, 09:51 -->
<span class="vbquote">(joker_turk @ 7:12:2005, 09:51 )</span><!--QuoteEBegin-->Set doc = view.GetDocumentByKey(Aktkey, True)

[snapback]28081" rel="nofollow" target="_blank[/snapback]​

[/quote]
Так же здесь. Что за Aktkey ? Переменная или поле ? Сейчас используется как переменная.

 

[joker_turk]

<!--QuoteBegin-Medevic+7:12:2005, 09:05 -->
<span class="vbquote">(Medevic @ 7:12:2005, 09:05 )</span><!--QuoteEBegin-->Для: joker_turk
А почему ты в PickListCollection не используешь AktKey, как в @PickList ?

Так в том то и дело что не работает оно в таком виде:

Set collection = ws.PickListCollection(PICKLIST_CUSTOM, True,db.server, db.filePath,"Items","", "Список документов", Aktkey)

говорит что неверный тип аргумента - жду строку

а когда даю строку "Aktkey" то вообще ничего не отбирает в ПИКАПе
типа нет дочерних!

[snapback]28082" rel="nofollow" target="_blank[/snapback]​

[/quote]

 

[joker_turk]

<!--QuoteBegin-Medevic+7:12:2005, 09:08 -->
<span class="vbquote">(Medevic @ 7:12:2005, 09:08 )</span><!--QuoteEBegin-->Aktkey - поле

[snapback]28083" rel="nofollow" target="_blank[/snapback]​

[/quote]

 

[Medevic]

В скриптах к полю надо обращаться через класс NotesDocument.
Как, например, здесь к полю Categories.

Category$ = ws.CurrentDocument.Document.Categories(0)

 

[joker_turk]

<!--QuoteBegin-Medevic+7:12:2005, 11:51 -->
<span class="vbquote">(Medevic @ 7:12:2005, 11:51 )</span><!--QuoteEBegin-->>>В скриптах к полю надо обращаться через класс NotesDocument.
Как, например, здесь к полю Categories.

спасибо, Medevic!
заработало! мои проблемы были в непонимании, что
Categories это поле, а не метод

Category$ = ws.CurrentDocument.Document.Categories(0)

[snapback]28096" rel="nofollow" target="_blank[/snapback]​

[/quote]