获取 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")

获取 Lotus Notes 表单中字段的值

Get the value of a field in a Lotus Notes Form

lotus-notes

lotus