在一个新的 LotusNotes 表单中,我有一个计算值字段(“NewOrdProdUID”),它使用另一个现有文档的唯一 ID 正确设置。我想通过 LotusScript 更改现有文档中“NewProdAvail”字段的值。我试过这个:
Sub Querysave(Source As Notesuidocument, Continue As Variant)
Dim session As NotesSession
Dim db As NotesDatabase
Dim ws As New NotesUIWorkspace
Dim uidoc As notesUIDocument
Dim odoc As notesDocument
Set session = New NotesSession
Set db = session.CurrentDatabase
Set uidoc = ws.CurrentDocument
Set odoc = db.GetDocumentByUNID(uidoc.FieldGetText("NewOrdProdUID"))
Call odoc.FieldSetText("NewProdAvail", "0")
Call odoc.Save(True, True)
End Sub
但是,“NewProdAval”字段的值保持不变(在我的例子中是 3,而不是 0)。请帮我!