Nous avons un serveur pour stocker les archives de mail
le probleme es que je dois sauvegarder les archives locales de chaque utilisateur.
Pour cela je fais j'utlise la methode CreateReplica de la classe Notesdatabase
et cela plante avec l'erreur suivante :
En outre l'utilisateur peut creer des bases sur le serveur d'archive
L'erruer se produit si la base locale et sur un lecteur reseau...
None of the selected databases has a replica on the server (P:/Lotus/a_toto.nsf)
Je seche completement
Merci d'avance
- Code : Tout sélectionner
For i = 0 To Ubound(listeArchive)
Set dbArc = ses.GetDatabase("",Strtoken(listeArchive(i),";",2))
If dbArc.IsOpen Then
repArc = basearc +Strtoken(listeArchive(i),";",4)
Set ArchiveDB = dbArc.CreateReplica(serveur,repArc)
Call dbArc.Replicate(serveur)
listeOKKO(Cint(Strtoken(listeArchive(i),";",3))) = "OK: Archivage effectué : " & repArc
Set ArchiveDB = Nothing
Set dbArc = Nothing
Else
listeOKKO(Cint(Strtoken(listeArchive(i),";",3))) = "KO : Problème d'ouverture de la base archive"
End If
Next
