RE: [prog] Problème très urgent .. .. OLE oOWriter

[emmanuel . guy]

Title: Problème très urgent .... OLE oOWriter

Pour la liste des caractères spéciaux, j'ai déjà répondu dans un précédent mail. Je vais donc me répéter : Pour trouver la listes de ces caractères, il faut aller sur l'aide en ligne d'OpenOffice (faire Aide->sommaire ou index je crois) et chercher : "Liste des caractères génériques" ("List of regular _expression_" pour l'aide en anglais).   Quand on travaille avec le paramètre "SearchRegularExpression" à True, il faut alors mettre \ devant ces caractères spéciaux pour les utiliser en tant que tel et non comme des actions spéciales. C'est le cas des parenthèses. Pour rechercher une "(", il faut donc mettre "\(" (ce qui n'est pas nécessaire si on travaille avec SearchRegularExpression=false)   J'espère avoir été assez clair.   Emmanuel.   De : Cezame Concept [mailto:[EMAIL PROTECTED] Envoyé : mercredi 15 mars 2006 17:19 À : prog@fr.openoffice.org Objet : RE: [prog] Problème très urgent .... OLE oOWriter Merci ...   Sais tu comment faire une recherche sur une chaîne comprenant des caractères comme des parenthèses pas exemple .. il semble qu'il faille remplacer ce genre de caractères par des chaînes de type »\x » ou trouver quel sont les caractères a remplacer et par quoi ?   Encore merci ..   De : [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Envoyé : mercredi 15 mars 2006 17:09 À : prog@fr.openoffice.org Objet : RE: [prog] Problème très urgent .... OLE oOWriter   Bonjour,   Je pense qu'il suffit de regarder le contenu du résultat obtenu et de voir s'il correspond à la chaîne recherchée. Pour cela, faire oResultat.getString()   Emmanuel -----Message d'origine----- De : Cezame Concept [mailto:[EMAIL PROTECTED] Envoyé : mercredi 15 mars 2006 11:42 À : prog@fr.openoffice.org Objet : [prog] Problème très urgent .... OLE oOWriter Je rencontre un problème lorsque j'effectue une recherche 'une chaîne dans un document oOWriter ... Je souhaiterai simplement connaître en retour si la chaîne a été trouvée ... J'utilise cette procédure .. sous VB express 2005  Function Rechercher(ByVal sMots As String, ByVal sRespecterCasse As Boolean, ByVal sMotEntier As Boolean) As Boolean         Dim oResultat As Object         Dim oDispatcherLocal As Object         Dim oControleur As Object         oSel = oDocument.CurrentController.Frame         oDispatcherLocal = CreateUnoService("com.sun.star.frame.DispatchHelper")         oMonTexte = oDocument.getText()         oControleur = oDocument.CurrentController         oJeCherche = oDocument.createSearchDescriptor         'Definir la balise à rechercher dans le document OpenOffice Word         oJeCherche.SearchString = sMots         'Distinguer les majuscules des minuscules dans la recherche         oJeCherche.SearchCaseSensitive = sRespecterCasse         'Ne rechercher que des mots         oJeCherche.SearchWords = sMotEntier         'Rechercher à reculons         oJeCherche.SearchBackwards = False         'Faire une recherche avec la méthode des expressions régulières         oJeCherche.SearchRegularExpression = True         'Rechercher des paragraphes d'un style donné par SearchString         oJeCherche.SearchStyles = False         'Rechercher un texte similaire au texte cherché         oJeCherche.SearchSimilarity = False         oResultat = oDocument.findFirst(oJeCherche)            'If oResultat Then         '    oControleur.select(oMonCurseur)         '    Rechercher = True         'Else         '    Rechercher = False         'End If         Rechercher = True     End Function   Comment completer cette function ? Merci d'avance   --------------------------------------------------------------------------------------- Wanadoo vous informe que cet e-mail a ete controle par l'anti-virus mail. Aucun virus connu a ce jour par nos services n'a ete detecte.