Page 1 sur 1
rafraichir une vue à la fermeture d'un document

Publié:
03 Déc 2009 à 10:09
par 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

Publié:
03 Déc 2009 à 10:09
par Michael DELIQUE
salut
web ou client lourd ?

Publié:
03 Déc 2009 à 10:10
par lebanner
Ah pardon, en client Lourd
Merci

Publié:
03 Déc 2009 à 10:16
par abertisch
Salut,
un view.refresh() peut-être ?


Publié:
03 Déc 2009 à 10:18
par 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

Publié:
03 Déc 2009 à 10:35
par lebanner
Michael DELIQUE a écrit: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

Publié:
03 Déc 2009 à 10:38
par Michael DELIQUE
salut
a quelle ligne ?
tu as regardé avec le débugger ou ça plante ?

Publié:
03 Déc 2009 à 10:40
par lebanner
Oui, il plante au niveau du Call

Publié:
03 Déc 2009 à 10:46
par Michael DELIQUE
tu ouvre ton document via une vue ?

Publié:
03 Déc 2009 à 10:47
par lebanner
Oui tout a fait

Publié:
03 Déc 2009 à 10:51
par 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

Publié:
03 Déc 2009 à 11:19
par 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