OVH Cloud OVH Cloud

Disponibilité d'une requête.

5 réponses
Avatar
gege
Bonjour =E0 tous,

J'aimerai savoir si dans l'=E9v=E9nement Form_Load je peux=20
r=E9cup=E9rer les infos de ma requete?

Mon probl=E8me est le suivant :

J'ai un formulaire de cr=E9ation dans une table et un=20
formulaire de Visu/modification de la m=EAme table.
Lors de la visu/modif j'aimerai teste une checkbox=20
(existant dans ma table), si le box est check=E9 ;-)) alors=20
je rend visible des textbox avec les infos ma table=20
sinon ... non.=20
Et... ben je ne connais pas la syntaxe pour faire =E7a !!!
Si qq peut m'aiguiller ....
Merci d'avance
Cordialement
gege

5 réponses

Avatar
3stone
Salut,

gege
J'ai un formulaire de création dans une table et un
formulaire de Visu/modification de la même table.
Lors de la visu/modif j'aimerai teste une checkbox
(existant dans ma table), si le box est checké ;-)) alors
je rend visible des textbox avec les infos ma table
sinon ... non.


dans l'événement "Sur activation" du formulaire...

Me![MonTextBox].Visible = (Me.BoxChecké = True)



--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------
Avatar
gege
Merci pour ta réponse mais cela ne fonctionne pas comme je
veux
voici un bout de mon code :

Private Sub Form_Activate()
If Me.pieces_jointes = 0 Then 'Si checkbox = checké
Me.Lbl_Info_PJ.Visible = False ' alors libelle invisible
Me.Ref_Fich01.visible = true ' et textbox visible
end if
End Sub

Mais l'évenement Form_load remplit mon formulaire et le
form_activate arrive trop tard, puisque le formulaire est
déjà remplit, alors que j'aimerai qu'a l'affichage du
formulaire j'affiche mon textbox (ou non) en fonction de
mon :
"Me.pieces_jointes = 0 "

T'as une autre idée ?

-----Message d'origine-----
Salut,

gege
J'ai un formulaire de création dans une table et un
formulaire de Visu/modification de la même table.
Lors de la visu/modif j'aimerai teste une checkbox
(existant dans ma table), si le box est checké ;-)) alors
je rend visible des textbox avec les infos ma table
sinon ... non.


dans l'événement "Sur activation" du formulaire...

Me![MonTextBox].Visible = (Me.BoxChecké = True)



--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------



.



Avatar
3stone
Salut,

gege
Merci pour ta réponse mais cela ne fonctionne pas comme je
veux
voici un bout de mon code :


Tu demande, je te réponds...
Mais, à toi de lire ma réponse ;-))


J'ai indiqué : "Dans l'événement *Sur activation* du formulaire" (Form_Current)


Private Sub Form_Activate()
If Me.pieces_jointes = 0 Then 'Si checkbox = checké

faux... If Me.Pieces_Jointes = -1 Then 'Si checkbox = checké



T'as une autre idée ?

Oui, tiens compte de ma remarque ;-)))



--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------
Avatar
gege
Euhhhh !!! j'ai l'impression que t'es encolère!
Bon d'accord j'ai pas mis mon code au bon endroit parceque
tous les evenements sont en anglais et je ne parle anglais
que sous la torture!
mais "sur activation" je croyais que ca voulais dire "On
Activate"!
Bon maintenant cela fonctionne et je t'en remercie
La prochaine fois je ferais plus attention a ce que tu
écris ...promis... tu te metteras plus
encolère..hein ...dis!

Merci encore
gege (djédjé... en anglais ;-))

-----Message d'origine-----
Salut,

gege
Merci pour ta réponse mais cela ne fonctionne pas comme je
veux
voici un bout de mon code :


Tu demande, je te réponds...
Mais, à toi de lire ma réponse ;-))


J'ai indiqué : "Dans l'événement *Sur activation* du
formulaire" (Form_Current)



Private Sub Form_Activate()
If Me.pieces_jointes = 0 Then 'Si checkbox = checké

faux... If Me.Pieces_Jointes = -1 Then 'Si
checkbox = checké




T'as une autre idée ?

Oui, tiens compte de ma remarque ;-)))



--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------





.



Avatar
3stone
Salut,

gege

Euhhhh !!! j'ai l'impression que t'es encolère!




Absolument pas...


Tu demande, je te réponds...
Mais, à toi de lire ma réponse ;-))



=== On appelle ceci un smile ===^^^^


;-)

--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------