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]

Répondre à