Заполнение всех полей

Тема в разделе "Lotus - Программирование", создана пользователем Alex*, 23 апр 2007.

Статус темы:
Закрыта.
  1. Alex*

    Alex* Гость

    Подскажите, пожалуйста....
    Я с помощью определенного кода перехожу из одной БД в другую и заполняю там форму.
    Те поля, которые я заполняю с помощью кода - заполняются нормально. А все остальные поля(допустим field№1) - нет,они пусты (код для заполнения этих полей прописан в самих полях и связаны с базой, в которую я вхожу либо берут свое значение из SubForm на этой форме).
    вот мой код:
    Sub Click(Source As Button)
    Dim db As NotesDatabase
    Dim form As NotesForm
    Set db=New NotesDatabase("","DB.nsf")
    Dim doc As New NotesDocument (db)
    doc.Form = "MainTopic"
    doc.TopicName = "text1"
    doc.Subject="text2"
    Call doc.ComputeWithForm(True, False)
    Call doc.Save( True, True )
    End Sub
    подскажите, что нужно сделать, чтобы заполнить все поля?
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей