ОБСУЖДЕНИЕ

Альтернатива Getalldocumentbykey

33 ответов 12,3 тыс.
AI-выжимка обсуждения скоро

Краткие тезисы обсуждения со ссылками на ключевые ответы появятся здесь.

Автор темы
Как можно выбрать все документы в базе кроме GetAllDocumentsByKey?

Код:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim dc As NotesDocumentCollection
Set db = session.CurrentDatabase
Set view = db.GetView( "By Category" )
Set dc = view.GetAllDocumentsByKey("Spanish leather", False)
Call dc.PutAllInFolder("Boots")
 
db.AllDocuments

Добавлено: db.Search / FTSearch - если надо какие-то конкретные документы, а не все из БД...
 
Код:
 Dim view_tg As NotesView
Dim entry_tg As NotesViewEntry
Dim tgcoll As NotesViewEntryCollection

Set view_tg = sprdb.Getview("(temp_grafik)")
Dim key(2) As Variant
key(0)= y
key(1)= o_k
key(2)= t

Set tgcoll = view_tg.Getallentriesbykey(key)
Set entry_tg = tgcoll.Getfirstentry()
или
Set entry_tg =view_tg.Getentrybykey(key)
 
для какой задачи Вы хотите использовать не GetAllDocumentsByKey?
 
Всем спасибо, в особености OKEN, за идеи что методом search можно пройтись по конкретной форме:
Код:
searchFormula$ = {Forma = "Document"}
Set collection = db.Search(searchFormula$, dateTime, 0)
 
Если получить все документы во view(не категоризованной)

Код:
Dim coll As NotesViewEntryCollection
Dim entry As NotesViewEntry

set coll = view.AllEntries
set entry = coll.GetFirstEntry

while not entry is nothing
Set doc = entry.Document
set entry = coll.GetNextEntry(entry )
wend
 
Народ, может я че-то не догоняю. Но почему у меня Designer, ругается на:
Код:
searchFormula$ = {Form = "Document"}
типа переменная searchFormula$ не определена, для справки Designer 8.5 на 7 не ругался.
 
вероятно ранее не было Option Declare
объяви переменную явно
 
выше определи переменную
Dim searchFormula$ as String
 
Dim searchFormula$ as String - так нельзя ругается на $, а как только объявляю без $. После этого ругается на то что нельзя использовать ее в методы Search
 
Можно и без переменных, сразу же в качестве параметра:
Set collection = db.Search({Forma = "Document"}, dateTime, 0)
И ничего не надо будет объявлять
 
Можно и без переменных, сразу же в качестве параметра:
Set collection = db.Search({Forma = "Document"}, dateTime, 0)
И ничего не надо будет объявлять

но это же решение в лоб, но как решение пробле на 100% подходит. Поправочка так не фурычит :)
 
Dim searchFormula as String
Оъявлять надо без суффиксов("$")
 
Поправочка, :) , {Form = "Document"}
Короче так
Dim searchFormula as string
searchFormula$ = {Form = "Document"}
Set collection = db.Search(searchFormula$, Nothing, 0)
 
Darker
А зачем переменной суффикс?
 
Omh
не перебивай цирк ))
 
Omh честно не знаю прочитал в хелпе примерно следующее:
Код:
 searchFormula$ = {Form = "Project" & ReminderDate = @Today}
Set db = session.CurrentDatabase
Set collection = db.Search(searchFormula$, Nothing,0)
чего так не знаю.

Добавлено:
Omh
не перебивай цирк ))

:)
 

Статистика тем

Создано
Guest,
Последний ответ от
Guest,
Ответы
33
Просмотры
12 260