rafraichir une vue à la fermeture d'un document

[lebanner]

Bonjour a tous,

Est ce qu'il y a un moyen de rafraichir une vue à la fermeture d'un document.

Je m'explique :
je me positionne sur une vue, j'ouvre un doc et quand je sauve garde le doc je souhaite que la vue en cours s'actualise également .

est ce que quelqu'un aurait-il une solution ?

Merci d'avance

Cordialement

[Michael DELIQUE]

salut

web ou client lourd ?

[lebanner]

Ah pardon, en client Lourd

Merci

[abertisch]

Salut,

un view.refresh() peut-être ?

[Michael DELIQUE]

regarde si une de ses 2 méthode ne ferais pas l'affaire

Code : Tout sélectionner

Sub Queryclose(Source As Notesuidocument, Continue As Variant)
   Dim UIwork As New NotesUIWorkspace
   Call UIwork.CurrentView.View.Refresh
   
   Call source.Document.ParentView.Refresh
End Sub

[lebanner]

regarde si une de ses 2 méthode ne ferais pas l'affaire

Code : Tout sélectionner

Sub Queryclose(Source As Notesuidocument, Continue As Variant)
   Dim UIwork As New NotesUIWorkspace
   Call UIwork.CurrentView.View.Refresh
   
   Call source.Document.ParentView.Refresh
End Sub

J'ai testé ce morceau de code, il me met "Object varialbe not set"

voici le code :

Code : Tout sélectionner

Sub Queryclose(Source As Notesuidocument, Continue As Variant)
   Dim UIwork As New NotesUIWorkspace
   Dim view as Notesview (meme Notesuiview==> pas passe)
   Call source.Document.ParentView.Refresh
End Sub

Merci

Cordialement

[Michael DELIQUE]

salut

a quelle ligne ?

tu as regardé avec le débugger ou ça plante ?

[lebanner]

Oui, il plante au niveau du Call

[Michael DELIQUE]

tu ouvre ton document via une vue ?

[lebanner]

Oui tout a fait

[Michael DELIQUE]

sinon essais

un

if not source.Document.ParentView is nothing then
Call source.Document.ParentView.Refresh
end if

ou un

Dim UIwork As New NotesUIWorkspace
call uiwork.ViewRefresh

[lebanner]

Voici le code qui fonctionne très bien :

Code : Tout sélectionner

Sub Queryclose(Source As Notesuidocument, Continue As Variant)
   Dim UIwork As New NotesUIWorkspace
   Call uiwork.ViewRefresh
End Sub

Il fonctionne sur un document ouvert à partir d'une vue ou à partir d'un lien doc dans un mail (il n'y a pas dem essage d'erreur lors de la fermeture du doc doc nickel).

Merci bcp Michael.

Cordialement