Bonsoir Bernard et merci.
J'avais trouvé dans le How-to
Sub Essai
oDesktop=createUnoService("com.sun.star.frame.Desktop")
Dim mNoArgs(0) As New com.sun.star.beans.PropertyValue
sUrl =
"private:factory/swriter"
ligne à changer
oDocument=oDesktop.LoadComponentFromURL(sUrl,"_blank",1,mNoArgs())
End Sub
Bernard Marcelly a écrit :
Bonjour Didier Dorange-Pattoret
Message du 2005-11-21 20:34:
Bonsoir,
Ce code:
Sub Essai
oDesktop=createUnoService("com.sun.star.frame.Desktop")
Dim mNoArgs(0) As New com.sun.star.beans.PropertyValue
sUrl = "staroffice.factory:swriter"
oDocument=oDesktop.LoadComponentFromURL(sUrl,"_blank",1,mNoArgs())
End Sub
fonctionne avec OOo1.1.5 mais pas 2.0 Comment faire l'équivalent?
C'est déjà miraculeux qu'il fonctionne encore en 1.1.5, cela ressemble
à un très ancien codage.
Voir par exemple le HowTo L'API OpenOffice (presque) sans peine,
chapitre 3.
Bernard
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
Didier Dorange-Pattoret
http://www.dmaths.org
http://sesamath.net
S'inscrire à la liste de diffusion de dmaths: [EMAIL PROTECTED]
Ses archives: http://listes.dmaths.org/wws/arc/users
Les Forums: http://www.dmaths.org/modules.php?name=Forums
Mailing List in english:
http://www.dmaths.org/modules.php?name=Content&pa=showpage&pid=9
Le livre de référence pour OpenOffice.org :
http://www.amazon.fr/exec/obidos/ASIN/2212114389/dmaths-21
Programmation OpenOffice.org :
http://www.amazon.fr/exec/obidos/ASIN/2212114397/dmaths-21
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]