I have a tip of the day in a company-wide welcome page that doesn’t refresh unless I put it into edit mode and resave it (what user is gonna do that?)
the tip is in a document in a view and is called via an @DBColumn
I tried both a backend refresh agent (code below) scheduled when docs are created or modified as well as computed text, nothing can get this thing to refresh automatically.
There has to be a way to get a computed/computed for display field to auto refresh when the doc is loaded, no?
any ideas?
TIA,
-MC
Sub Initialize
Dim s As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim Paynum As String
Set db = s.CurrentDatabase
Set view = db.GetView("(homel)")
Set doc = view.GetFirstDocument
While Not (doc Is Nothing)
x = x + 1
Print "Now Updating Document # " + Str(x) ' Prints the document Number that is being updated
returnFlag = doc.ComputeWithForm(False,True)
If (returnFlag) Then
Call doc.Save(True,False)
End If
Set doc = view.GetNextDocument(doc)
Wend
End Sub