4 messages in org.openoffice.fr.progRe: Re: [prog] Utiliser OpenOffice vi...
FromSent OnAttachments
CCCDec 3, 2004 4:55 am 
Bernard MarcellyDec 3, 2004 12:14 pm 
Gilles VALFREDec 5, 2004 11:24 pm 
CCCDec 13, 2004 4:14 am 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: Re: [prog] Utiliser OpenOffice via VB.NET (correction orthographique)Actions...
From:CCC (cott@yahoo.fr)
Date:Dec 13, 2004 4:14:37 am
List:org.openoffice.fr.prog

Bonjour, Déjà, merci pour votre aide. J'ai enfin réussi à mettre en place ce que je voulais (je met en bas le source utilisé pour ceux que ça intéresse). Il reste cependant un problème que je n'arrive pas à régler. Je ne sais pas comment lancer la correction orthographique sur le document que je viens d'ouvrir... J'ai lu qu'il faut utiliser "com.sun.star.linguistic2.LinguServiceManager" et "com.sun.star.linguistic2.XSpellChecker" mais je ne sais vraiment pas comment faire... Tout ce que j'ai trouvé semble permettre de créer un correcteur orthographique en dehors d'une feuille ouverte dans le traitement de texte. Tout exemple (pas forcément en VB.net d'ailleurs) ou lien est le bienvenu.

Merci.

CCC

*************************************************** Public Sub Ooorg_Orthog(ByVal Nom_Document As String) Dim objServiceManager As Object Dim objDesktop As Object Dim objDocument As Object Dim args(-1) As Object

Try objServiceManager = CreateObject("com.sun.star.ServiceManager") 'ouverture(d'OOo) objDesktop = objServiceManager.createInstance("com.sun.star.frame.Desktop") 'ouverture d'OOo, les deux lignes sont nécessaires Nom_Document = Nom_Document.Replace("\", "/") objDocument = objDesktop.loadComponentFromURL("file:///" & Nom_Document, "_blank", 0, args) 'chargement d'un fichier Catch ex As Exception MsgBox("Le chargement de OpenOffice.org à échoué...") End Try

'correction orthographique

'enregistrer Call objDocument.store()

'Pour fermer le document objDocument.Close(True) objDocument = Nothing

End Sub ***************************************************

Découvrez le nouveau Yahoo! Mail : 250 Mo d'espace de stockage pour vos mails ! Créez votre Yahoo! Mail sur http://fr.mail.yahoo.com/

Avec Yahoo! faites un don et soutenez le Téléthon en cliquant sur
http://www.telethon.fr/030-Don/10-10_Don.asp