Получить значение поля в форме Lotus Notes

Question

Мне нужна помощь, мне нужно знать, как я могу получить значение поля формы Я знаю, как получить имя поля, но не значение в нем. .. Вот транковый вариант моего кода: Кстати, цикл не имеет смысла, но он будет использован правильно, как только я узнаю, как получить значения полей, ... Спасибо всем!

Forall field In form.Fields  
    fieldCount = fieldCount + 1 
    msgString = msgString & Chr(10) & "  " & field 

    If (field Like "*Act*") Then   
     ActfieldCount = ActfieldCount + 1 

     If (field Like "RNomAct1") Then 
      Msgbox("RNomAct1 found in SourceString!") 
'thoses do not work    

'    test = field.GetItemValue("RNomAct1") 
'    test = field.FieldGetText("RNomAct1") 
'    Messagebox(test(0)) 

     End If 
    Else 
     Msgbox("Could not find the SearchString.") 
    End If 

End Forall 

Answer 1

Где-то вы должны иметь ссылку на документ. Или, если вы не можете получить доступ текущего документа с помощью некоторых других объектов:

Dim ws as New NotesUIWorkspace 
Dim uidoc as NotesUIDocument 
Set uidoc = ws.CurrentDocument 

Тогда вы можете получить значение поля с этим вызовом:

uidoc.FieldGetText("name-of-field-here")