Ansicht periodisch aktualisieren

[2Consultants]

Hallo,

ich habe eine Anwendung auf deren Oberfläche eine bzw. mehrere Ansichten zu sehen sind (Eingebettete oder auch in verschiedenen Rahmen). Es ist mir mit keiner Methode gelungen so eine Ansicht periodisch (nicht durch Interaktion) im Hintergrund und auch im Vordergrund zu aktualisieren oder wenigestens den Indikator anzeigen zu lassen (geht nur bei direkt geöffneten Ansichten?!). Hat jemand eine Idee? Danke!

Gruß Christian

[MiMueller]

Dafür verwende ich folgendes Script:

Sub procTimerRefresh(bAktiv As Integer)
   
   If (bAktiv) Then
      Set elapsedTimer = New NotesTimer(5, "RefreshTimer")
      On Event Alarm From elapsedTimer Call procRefreshView   
   Else
      If (Not(elapsedTimer Is Nothing)) Then elapsedTimer.Enabled = False   
   End If
   
End Sub

...im Postopen der Ansicht wird der Timer gestartet mit:

  Call procTimerRefresh(True)

...im Queryclose wird der Timer gestoppt mit:
 
  Call procTimerRefresh(False)

Nun wird alle 5 Sekunden eine Sub "procRefreshView" gestartet:

   Dim wks As New NotesUIWorkspace
   wks.ViewRefresh