Как искать документы Lotus с помощью VBA

Question

Мне нужно получить 3 определенных поля из формы Lotus и в статическую таблицу Access, из которой я могу сделать больше запросов (2 из этих полей делают первичный ключ, поэтому я могу присоединиться к третьей с другими вещами). В нижеприведенном псевдокоде я создал функцию, чтобы сделать это, но я не могу понять детали (я не думаю, что когда-нибудь пойму, как Lotus работает без формального обучения). Пожалуйста, помогите мне закончить эту процедуру?

Function GetFromLotusDocs() As String 
    Dim NtS As New NotesSession 
    Dim NtDb As New NotesDatabase 
    Dim NtF As New NotesForm 
    NtS.Initialize 
    Set NtDb = NtS.GetDatabase("MyServer", "MyDB.nsf") 
    Set NtF = NtDb.GetForm("MyForm") 

    For each document in NtDB 
     DoCmd.RunSQL _ 
     "INSERT INTO TmpTbl (Fld1,Fld2,Fld3) SELECT " & _ 
     Fld1 & "," & Fld2 & "," & Fld3 & ";"  
    Next document 
End Function 

Answer 1

Если вам просто нужно получить данные из Notes и в Access, я предлагаю установить и настроить драйвер Lotus Notes SQL. Я использовал его много раз, чтобы вытащить данные в Access, как правило, чтобы я мог его очистить, прежде чем переместить его в базу данных SQL или SQL express.

Вот ссылка: http://www.ibm.com/developerworks/lotus/products/notesdomino/notessql/