Всем хай. Проблема с обращением к корпоративной директории (names.nsf). Оттуда нужно вытянуть из учетной карточки поле InternetAddress (для корпоративной подписи единообразной), проблема в том что программно база подключается, но работать с собой ни в какую не дает. Коллекции не ищет. Дебаг показывает, что база открыта, задаю поиск - коллекция даже не думает искаться, просто проскакивает этот пункт, переменная пустая. Обычно хоть count = 0 показывает, тут бы никаких проблем,понятно что дело не в бобине. Права стоят максимальные. Вобщем, Ай Нид Хэлп.
-
Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе
вьюха получается, и ентри тоже получается но вот стремаюсь вьюху свою склепать чтобы нужное инфо получить (GetDocumentByKey) чтобы не положить всю базу, она ж одна на все сервера реплицируется
Добавлено: db.IsOpen показывает True, пока тестирую на клиенте (т.к. нужно потом в автоматический серверный режим перевести), открываю на том же сервере - тот же результат, т.е. никакой.
Добавлено: db.IsOpen показывает True, пока тестирую на клиенте (т.к. нужно потом в автоматический серверный режим перевести), открываю на том же сервере - тот же результат, т.е. никакой.
Ну стрёмно или не стрёмно, а Search работать будет дольше, чем GetDocumentByKey.
Можно попробовать сделать ReBoot но думаю не вариант
Попробуй получить документ или Entry, а из нее уже потом документ или даже просто значение колонок...
Добавлено:
Просто я не уверен что можно при отправке письма вставлять подпись на каждого сотрудника автоматически при отправке из его ПЯ.
Да и кажись точно не возможно.
А если эта рассылка идет из какой-то базы, то проще сделать список отправителей с подписями в каждое письмо вставлять необходимый текст из справочника.
Можно попробовать сделать ReBoot но думаю не вариант
Попробуй получить документ или Entry, а из нее уже потом документ или даже просто значение колонок...
Добавлено:
Для автоматической рассылки?
Просто я не уверен что можно при отправке письма вставлять подпись на каждого сотрудника автоматически при отправке из его ПЯ.
Да и кажись точно не возможно.
А если эта рассылка идет из какой-то базы, то проще сделать список отправителей с подписями в каждое письмо вставлять необходимый текст из справочника.
GetDocumentByKey все берет, док получен, осталось в шаблон подсунуть вьюху. Интересно, почему GetDocumentByKey работает а Search нет. Загадки во тьме
nie ma sprawy.
Set maildb = ses.GetDatabase("msqbw2/BWD","names.nsf") 'все подключается все нормально
strg = {Form = "Person" & @Contains(FullName;}+key+{)}
Set mcol = maildb.Search(strg,Nothing,1) ' тут коллекция пустая, не просто count=0 , а EMPTY
а если так
Set mview = maildb.GetView("main")
key = entry.ColumnValues(13)
Set mdoc = mview.GetDocumentByKey(key)
xlSheet.Cells(i,9).Value = mdoc.InternetAddress(0)
здесь все окай
Set maildb = ses.GetDatabase("msqbw2/BWD","names.nsf") 'все подключается все нормально
strg = {Form = "Person" & @Contains(FullName;}+key+{)}
Set mcol = maildb.Search(strg,Nothing,1) ' тут коллекция пустая, не просто count=0 , а EMPTY
а если так
Set mview = maildb.GetView("main")
key = entry.ColumnValues(13)
Set mdoc = mview.GetDocumentByKey(key)
xlSheet.Cells(i,9).Value = mdoc.InternetAddress(0)
здесь все окай
отчего и затупил - строка поиска не ругалась на некорректность, коллекция пустая. Подумал мот засекреченая база
Мыш
Вопрос типизации, если key был строка, то ошибки не будет, если вариант, то возможна.
beloff
А вот это не мудрено, ошибку Db.Search выдаст только если не сможет сделать Evaluate от этой формулы.
Лучший способ проверки формулы для Search: вьюха (при возможности ее сделать), либо:
Где sFormula наш поисковый запрос, а doc документ попадающий под условия.
Если macro(0) = 1 все ок, формула рабочая, как минимум для одного документа.
Но использовать Search для поиска только одного документа, ну право не надо
Вьюха лучше)
Вопрос типизации, если key был строка, то ошибки не будет, если вариант, то возможна.
beloff
А вот это не мудрено, ошибку Db.Search выдаст только если не сможет сделать Evaluate от этой формулы.
Лучший способ проверки формулы для Search: вьюха (при возможности ее сделать), либо:
Код:
dim macro as variant
macro =Evaluate(sFormula,doc)Если macro(0) = 1 все ок, формула рабочая, как минимум для одного документа.
Но использовать Search для поиска только одного документа, ну право не надо
Вьюха лучше)
Обучение наступательной кибербезопасности в игровой форме. Начать игру!