lotus script "export txt"

Forum destiné aux questions sur le développement : Formules, LotusScript, Java ...

lotus script "export txt"

Messagepar phil » 25 Nov 2003 à 08:10

Bonjour à tous,je dois générer en lotus script un fichier .txt à partir d'un masque (ou éventuellement de la vue) avec une partie des champs à récupérer et un critère de sélection sur un champ précis "Connexion_Service" qui doit être en service.Le fichier à comme caractère de séparation le point virgule (code 59).Je connais un peu lotus script mais je rame !!!!quelqu'un pourrait-il me dépanner pour que j'aille plus vite car comme de bien entendu c'est à faire pour hier ?.Merci d'avance
phil
 

Re: lotus script "export txt"

Messagepar PhilippeG » 25 Nov 2003 à 11:25

Bonjour,voila un peu de code qui fait ce que tu veux, a adapter à tes besoins et a tes noms de variables bien sur...Il faut aussi que tu te crée une vue qui selectionne les documents que tu veux exporterSub Initialize Dim session As New NotesSession Dim db As NotesDataBase Dim view As NotesView Dim doc As NotesDocument 'Initialise les objets Set db = session.CurrentDataBase Set view = db.GetView("Nom de la Vue") Set doc = view.GetFirstDocument Sep$ = ";" 'séparateur de colonne dans le fichier texte 'Initialise le fichier texte Filename$ = "Nom du fichier avec son chemin d'accès" FileNum% = Freefile Open Filename$ For Output As FileNum% Do While Not (doc Is Nothing) Info$ = doc.NomChamp1(0) + sep$ + doc.NomChamp2(0) + sep$ + doc.NomChamp3(0) Print #FileNum%,Info$ Set doc =view.getNextDocument(doc) Loop 'Cloture du fichier Close FileNum% End SubSi tu ne veux pas utiliser créer une vue spécifique tu passer par un objet notes document collection il suffit de remplacer la paragraphe Initialise les objets ci dessus par'Initialise les objets Dim coll as NotesDocumentCollection Dim dateTime as New NotesDateTime("01/01/95") selection$ = "formule de selection des documents" Set db = session.CurrentDataBase Set coll = db.search(selection$,datetime,0) Set doc = coll.GetFirstDocument Sep$ = ";" 'séparateur de colonne dans le fichier textela première méthode est plus rapide que la seconde mais oblige à créer une vue dans la base.Il y a une troisième méthode qui consiste à créer une vue qui selectionne tes documents, mettre les infos a exporter dans les colonnes de la vue en séparant chaque colonne par une colonne contenant une constante (au hasard le point virgule) et à utiliser le menu file/export ou la commande @Command([FileExport])
PhilippeG
 


Retour vers Développement

cron