J'utilise moi-même "telle quelle" sans trop chercher à comprendre les macros que je trouve "à droite à gauche". J'ai renoncé à me mettre à StarBasic. C'est trop différent du VB for Applications de Microsoft que je connais un peu et qui m'a servi à développer des applications (simples) sous Excel (facturation, gestion de stock, etc.). Mais je n'ai pas réussi à "rentrer" dans le StarBasic ce qui me laisse quelques regrets car j'aurais voulu réécrire ces applications Excel sous StarBasic afin de migrer complètement à OOo la bureautique d'une petite entreprise. Tant pis.
Bon courage à toi.
Bernard

Le 10/08/2010 10:50, Claude FRICARD a écrit :
Merci Bernard pour ces infos, lorsque mon petit-fils en garde en ce moment, me laissera un peu de temps je vais voir tout cela. Je peux effectivement utiliser "bêtement" le code fourni par les uns et les autres mais j'aimerai également comprendre , histoire de faire travailler les quelques neurones qui me restent à ...68 ans. Toutefois je ne manquerai pas de revenir vers vous pour des des explications complémentaires.

Claude


Le 10/08/2010 10:43, ribotb a écrit :
J'ai demandé à Google :-) : http://docs.sun.com/app/docs/doc/819-1328?l=fr


Le 10/08/2010 09:23, Claude FRICARD a écrit :
Merci François ainsi que Bernard pour les solutions proposées. Lorsque j'aurai un peu de temps je vais essayer cela à titre personnel, encore faut-il que je me plonge un peu plus dans le langage Basic. Il reste que dans le cadre de l'association RIO et en fonction du niveau moyen je ne peux proposer de telles solutions. Concernant le langage Basic pourriez-vous me suggérer un lien vers un guide, une doc explicitant les diverses commandes. Il me semble avoir déjà eu cette information mais je l'ai pas mémorisée.
merci d'avance

Claude


Le 09/08/2010 19:07, François Gatto a écrit :
Bonsoir Claude
Le 09/08/2010 09:35, Fricard Claude a écrit :
Bonjour,
j'avais demandé il y a quelque temps, s' il était concevable d'avoir une
macro qui ouvre une Requête plutôt qu'un formulaire. Cette question
n'avait pas eu d'écho , je veux bien croire que l'activité sur le forum en cette période est réduite et aussi peut-être que ma question est un
peu saugrenue....

Oui la période est propice à la calmitude :D

Si j'ai bien compris l'expression de ton besoin, il s'agit de pouvoir ouvrir directement une requête sans passer par l'appel d'un formulaire.

Si tel est le cas, voici un bout de code (que tu aurais pu trouver sur le Net) :

sub onClickButton( oEvent as object )

 '"Query1" = le nom de la requête

openQueryDataView( "Query1", oEvent.Source.Model.Parent.ActiveConnection )

end sub

sub OpenQueryDataView( aQueryName as string, aConnection as variant )

    dim oDesktop, oDispatchObject
    dim aURL as New com.sun.star.util.URL
    dim aProps(5) as New com.sun.star.beans.PropertyValue

    oDesktop = createUnoService("com.sun.star.frame.Desktop")

    aURL.Complete = ".component:DB/DataSourceBrowser"

    oDispatchObject = oDesktop.queryDispatch(_
                        aURL, _
                        "_Blank",_
                        com.sun.star.frame.FrameSearchFlag.CREATE)

    aProps(0).Name = "ActiveConnection"
    aProps(0).Value = aConnection
    aProps(1).Name = "CommandType"
    aProps(1).Value = com.sun.star.sdb.CommandType.QUERY
    aProps(2).Name = "Command"
    aProps(2).Value = aQueryName
    aProps(3).Name = "ShowMenu"
    aProps(3).Value = TRUE
    aProps(4).Name = "ShowTreeView"
    aProps(4).Value = FALSE
    aProps(5).Name = "ShowTreeViewButton"
    aProps(5).Value = FALSE

    oDispatchObject.dispatch(aURL, aProps)

end sub

Dans le code OOo.org Basic je ne vois pas de commande d'équivalence à la
fonction : Function OpenForm

En effet ; la démarche est sensiblement différente.

Cette demande fait suite au constat que le switchboard s'il apporte un
début de réponse à un menu d'accueil, ne proposant pas de commande
Requêtes, il ne donne pas les moyens à un utilisateur lambda de profiter
pleinement d'une Base de données.
Quelqu'un aurait-il une réponse ?
Claude


Bonne continuation.

--
Francois Gatto
Ubuntu 10.04
OpenOffice.org 3.2.1

---------------------------------------------------------------------
To unsubscribe, e-mail: users-unsubscr...@fr.openoffice.org
For additional commands, e-mail: users-h...@fr.openoffice.org




--
Bernard Ribot Windows 7 / Windows XP SP3 OpenOffice.prg 3.2.1


---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 100810-0, 10/08/2010
Analyse le : 10/08/2010 13:46:42
avast! - copyright (c) 1988-2010 AVAST Software.
http://www.avast.com




---------------------------------------------------------------------
To unsubscribe, e-mail: users-unsubscr...@fr.openoffice.org
For additional commands, e-mail: users-h...@fr.openoffice.org

Répondre à