[Résolu][Base] Obtenir la source de données d'un formulaire

[mumblee]

Bonjour,

J'ai un document "toto.odb" et lorsque j'édite le formulaire "frmTest" contenu dans ce document, l'affichage des sources de données me montre bien la base "toto". Cependant, je ne trouve pas le moyen d'accéder à cette information depuis une macro Basic. J'ai tenté sans succès :

Code : Tout sélectionner

Sub NomBase
	Dim oForm As Object
	oForm = ThisComponent.drawPage.forms.getByName("frmTest")
	Msgbox("DataSourceName = " + oForm.DataSourceName)
End Sub

le résultat est une chaîne vide

Comment procéder svp ? Merci.

[mumblee]

Argh ! Ça faisait trois jours que je cherchais en vain et je viens de tomber là-dessus : il fallait utiliser ThisDatabaseDocument.Url et non ThisComponent qui pointe vers je-ne-sais-pas-quoi lorsque la macro est appelée à partir du formulaire.

Merci beaucoup à ce forum et à Bernard Marcelly en particulier.

Puisque j'ai réussi à me répondre à moi-même, avant que je ne close ce fil par un "résolu", quelqu'un peut peut-être m'indiquer comment j'aurais pu trouver ce ThisDatabaseDocument en moins de trois jours ? Je vous serais gré d'éviter les réponses "Il fallait mieux chercher" parce que j'ai vraiment beaucoup cherché ; quelque chose de plus méthodologique serait particulièrement utile

[Pierre-Yves Samyn]

Bonjour

quelqu'un peut peut-être m'indiquer comment j'aurais pu trouver ce ThisDatabaseDocument en moins de trois jours ? Je vous serais gré d'éviter les réponses "Il fallait mieux chercher" parce que j'ai vraiment beaucoup cherché ; quelque chose de plus méthodologique serait particulièrement utile

C'est vrai que c'est plus facile de trouver... quand on connait ce que l'on cherche...

Cette nouvelle "variable" est commentée dans ces pages de la documentation :
http://wiki.services.openoffice.org/wik ... nn.C3.A9es
http://wiki.services.openoffice.org/wik ... _Documents

Par ailleurs... elle est mise en œuvre dans les "suprêmes de code" récents portant sur Base :
http://user.services.openoffice.org/fr/ ... 15&t=23203
http://user.services.openoffice.org/fr/ ... 355#p95871

[mumblee]

Bonsoir,

Cette nouvelle "variable" est commentée dans ces pages de la documentation :
[...]
Par ailleurs... elle est mise en œuvre dans les "suprêmes de code" récents portant sur Base :
[...]

J'étais allé voir la documentation wiki mais j'ai dû lire trop rapidement sans doute.

C'est vrai que les exemples de code sont aussi bien pratiques. Merci aux contributeurs !

[Pierre-Yves Samyn]

C'est vrai que les exemples de code sont aussi bien pratiques. Merci aux contributeurs !

Beaucoup apprennent en s'inspirant de code existants...

J'ai oublié l'indispensable ouvrage pour qui veut développer (ses connaissances) : http://user.services.openoffice.org/fr/ ... 820#p94284
A noter la disponibilité de la version pour LibreOffice : http://www.editions-eyrolles.com/Livre/ ... eoffice%3E