Функция возвращает пустой Notesdocument

Статус
Закрыто для дальнейших ответов.

fedotxxl

Well-known member
09.11.2005
614
0
#1
Вот такая простая функция
Код:
Function createRequest() As NotesDocument
Dim ns As New NotesSession
Dim MIISdb As NotesDatabase
Dim MIISdoc As NotesDocument
Set MIISdb = getMIISdb
Set MIISdoc = MIISdb.CreateDocument

Set createRequest = MIISdoc
Exit Function
ErrLab:
Print Chr(10) + "Error #" + Cstr(Err) + " in " + Cstr(Getthreadinfo(1)) + "(" + Cstr(Erl) + ") : " + Error$ 
Exit Function
End Function
ничего не возвращает, если в вызывающей её функции нет объекта базы данных, в котором функция createRequest создает документ... Объект может называться как угодно, главное чтобы он существовал

Просто нет слов

/Moderated By Morpheus/ Подправил название топика. Усно предупреждаю не надо пладить темы с безсмысленными названиями типа "хэлп" или "шо за фигня"
 

morpheus

скриптописец
07.08.2006
3 915
1
#4
ЗАКРЫВАЮ ибо гармонь, и народ начал флудить
 
Статус
Закрыто для дальнейших ответов.