Bonjour,
Merci pour le Macro, mais quand j'ai executé j'ai toujours un message à la
ligne
var_id_marque = PysLstMarque.valueItemList(PysLstMarque.SelectedItems(0))
Erreur : (Valeur ou type de donnée incorrecte Index hors de la plage définie.)
Bonne journée> Date: Wed, 24 Sep 2008 23:41:48 +0200> From: [EMAIL PROTECTED]>
To: [email protected]> Subject: Re: [users-fr] Comment récupérer une zone
texte d'entree d'une boite de dialogue pour mettre dans un ordre SQL sous
Macro> > Bonsoir,> > Le 24 septembre 2008 07:57, somphone chanthasensack>
<[EMAIL PROTECTED]>a écrit :> > >> > Bonjour et merci pour ta réponse,> > Dans
cette il n'y a pas de requete ecrit sous SQL pour récupérer la zone> > texte de
l 'écran.> > ???> Je comprends pas bien là ?> Et ça dans le code, c'est bien la
récupération d'une zone à l'écran non ?> > '==== debut code ============> dim
PysLstMarque as Object , PysLstVoiture AS Object> >
'************************************************************************************************>
sub PysMajListe>
'************************************************************************************************>
'Lancée sur modification de la liste des marques pour mettre à jour la liste>
des modèles>
'************************************************************************************************>
> DIM var_id_marque as integer> > 'Recupere les composants liste> > '====ici
recuperation de la zone "lbox_marque" =======> > PysLstMarque =>
ThisComponent.DrawPage.Forms.getByName("Standard").getByName("lbox_marque")>
PysLstVoiture =>
ThisComponent.DrawPage.Forms.getByName("Standard").getByName("lbox_voiture")> >
'Recupere l'id de la marque selectionnée> > 'Syntaxe si le champ n'est pas lié
à un champ de la base> 'var_id_marque = PysLstMarque.SelectedItems(0)> >
'Syntaxe si le champ est lié à un champ de la base> var_id_marque =
PysLstMarque.valueItemList(PysLstMarque.SelectedItems(0))> > 'Modifie la
requete SQL de la liste des voitures :> '===== modification de la requete SQL
===============> PysLstVoiture.ListSource() = array("SELECT nom_voiture,
id_voiture FROM> T_Voiture WHERE id_marque =" & var_id_marque)>
PysLstVoiture.refresh> > end sub> '============ fin code ===========> > ou
alors, je comprend pas bien ce que tu entends par zone de texte à> l'écran.
Peux-tu préciser ou mieux, m'envoyer à mon adresse perso un> 'exemple' de zone
de texte ?> > Merci.> > Yves> > >> >> > Bonne journée> >> >> >> > Date: Tue, 23
Sep 2008 19:03:21 +0200From: [EMAIL PROTECTED]:> > [EMAIL PROTECTED]: Re:
[users-fr] Comment récupérer une zone> > texte d'entree d'une boite de dialogue
pour mettre dans un ordre SQL sous> > Macro> > Bonjour,un exemple dans une base
(pas de moi).Yves-- web site :> > http://www.molenbaix.com> >
_________________________________________________________________> > Installez
gratuitement les 20 émôticones Windows Live Messenger les plus> > fous !
Cliquez ici !> > http://www.emoticones-messenger.fr/> >> > > > -- > web site :
http://www.molenbaix.com
_________________________________________________________________
Téléphonez gratuitement à tous vos proches avec Windows Live Messenger !
Téléchargez-le maintenant !
http://www.windowslive.fr/messenger/1.asp
