Salve.
ho creato un agente per aggiornare un campo in una serie di documenti selezionati di una vista. Tale campo è presente in una colonna della vista. L\'aggiornamento nei documenti avviene correttamente, ma non mi si aggiorna il campo nella vista. Dove sbaglio?
Grazie
Ecco l\'agente che imposta il campo "Priuff" a "9999" per tutti i documenti selezionati della vista.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
On Error Goto errori
Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments
If collection.count = 0 Then
Messagebox ("Per modificare un documento occorre spuntarlo")
Exit Sub
End If
For x = 1 To collection.Count
Set doc = collection.GetNthDocument( x )
Set item = doc.ReplaceItemValue _
( "priuff", "9999" )
Call doc.save(True, True)
Next
Exit Sub
errori:
End Sub
|