par CA39 » 06 Oct 2003 à 15:30
Code pour recherche sur index fonctionnant sans probléme sur une base en Local. mais ne fonctionnant pas sur Serveur.Ne génére pas les lien Merci à VousSub Initialize Dim session As New NotesSession Dim db As NotesDatabase Dim collection As NotesDocumentCollection Dim newsletter As NotesNewsletter Dim doc As NotesDocument Set db = session.CurrentDatabase Set collection = db.FTSearch("B", O) Call collection.FTSearch("JA",0) Set newsletter = New NotesNewsletter( collection ) Set doc = newsletter.FormatMsgWithDoclinks( db ) doc.Form = "Memo" doc.Subject = "Votre Recherche" Call doc.Send( False, "xx@xx" ) End Sub