StarDesktop non definie

[Teddy7]

Bonjour,
J'ai installe dernierement OOo sur mon poste et essaye d'ouvrir un fichier calc depuis une appli VB6. J'utilise le code :

Code :

1
2
3
4
5
6
7
8
Dim Fichier As String
Dim monDocument As Object
Dim Dummy() 'It is an (empty) array of PropertyValues
            
Fichier = ConvertToURL(monfichier)
            
monDocument = StarDesktop.loadComponentFromURL(Fichier, "_blank", 0, Dummy)

Et j'obtiens a l'execution :
"Variable non definie" sur StarDesktop. Qu'ai je manque !? j'ai repris exactement l'information qui est sur la doc OO:
http://wiki.services.openoffice.org/...de/StarDesktop