Résolution email non vu dans courrier en arrivée

[sandrine]

Bonjour,

je me lance.

On est en version 6.0.3 coté client et 6.5.3 coté serveur.

Les 2 grandes questions de la semaine et qui m'ont un peu pourri la vie car par téléphone pas évident, la 3 est plus courant et moins embêtante.

1 - Je sais pas ce que j'ai fait, mais j'ai plus rien dans "courrier en arrivée"

2 - J'ai un message qui dit que j'ai un nouvel email mais je le vois pas.

3 - Je ne reçois plus d'email, alors qu'on m'en a envoyé
Réponse:

1 -
2 points à vérifier
a - dans "Actions" vérifier qu'il y a "Visualiser les documents non lus " et non pas "Visualiser tout"

b - dans "Vue", puis 'Afficher', que les options "Documents non lus seulement" et "Sélectionner seulement" ne soient pas cochées


2 -
j'ai fait un tour sur le forum après avoir essayer les classiques
- CTRL + Shift + F9
- Actualiser Strucuture à partir du serveur et en local
- Remplacer Strucuture
- Mettre à niveau conception du dossier
- Optimiser la base qui se trouve sur le serveur

malgré les nombreux posts je n'ai pas trouvé ce que cherchai

Penser à vérifier qu'il n'y a pas de base en local (ce qui a été mon cas), j'ai donc:
- Supprimer l'historique de réplication
- Remplacer la strucuture de la base local
- Optimiser sa base en local
- Lancer la réplique

Ca a fonctionné pour les nouveaux email en arrivée, mais pour les anciens.

3 -
Ca se passe surtout sur les bases qui sont répliquées en local.
- Supprimer l'historique de réplication
(En étant dans la base courrier, Fichier\Réplication\Historique - Supprimer l'historique)
- Relancer la réplication

Voilà c'est peut-être inutile mais ça évitera de chercher dans plusieurs posts

[Invité]

Pour remettre les messages "perdus" dans le Inbox, voici un bouton à envoyer aux utilisateurs concernés:

Code : Tout sélectionner

Sub Click(Source As Button)
   
   Dim s As New notessession
   Dim db As notesdatabase
   Dim fDoc As NotesDocument ' Document in folder
   Dim ad As notesview ' All Documents view
   Dim aDoc As notesdocument ' document in All Docs view
   Dim fUNID() As String ' array of UNID's of docs in folders
   Dim i As Integer ' UNID array index
   Dim deldate As notesitem
   Dim Chair1 As notesitem
   Dim ctr As Double
   
   i =0
   ctr = 0
   Set db = s.CurrentDatabase
   
' Build UNID array by looping through folders, then their documents
   Forall view In db.views
      If view.IsFolder And Not view.Name=("($All)") Then
         Set fDoc = view.GetFirstDocument
         While Not fDoc Is Nothing
            Redim Preserve fUNID(i)
            fUNID(i) = fDoc.UniversalID
            i=i+1
            Set fDoc = view.GetNextDocument(fDoc)
         Wend
      End If
   End Forall
   
' Loop through docs in the All Documents view and compare UNIDs to each doc
   
   Set ad = db.GetView("($All)")
   Set aDoc = ad.GetFirstDocument
   While Not aDoc Is Nothing
      i = 0
      Do While i <= Ubound(fUNID)
         If fUNID(i) = aDoc.UniversalID Then
            Exit Do
         End If
         i = i + 1
      Loop
      Set deldate = adoc.getfirstitem("delivereddate")
      Set Chair1 = adoc.getfirstitem("CHAIR")
      If i > Ubound(fUNID) And Not deldate Is Nothing And Chair1 Is Nothing Then
         Call adoc.PutInFolder( "($Inbox)")
         ctr = ctr + 1
      End If
      Set aDoc = ad.GetNextDocument(adoc)
   Wend
   Select Case ctr
   Case Is = 0
      Print ctr & " messages moved to inbox."
      Messagebox "No changes were needed. Thank you.", 0, "No Changes Needed"
   Case Else
      Print ctr & " messages moved to inbox."
      
   End Select
End Sub

[Jérome Deniau]

Bonjour,

On peut faire sans développer:

0. Appeller l'admin Domino
1. Quitter le client Notes
2. DBCACHE FLUSH (2 fois pour les versions < 6.5.6 )))
3. LOAD COMPACT -D mail/basemail.nsf
4. Une fois terminé relancer Notes

fini.