OVH Cloud OVH Cloud

recordcount

17 réponses
Avatar
belok
Bonjour,

Je voudrai faire un truc du style

si 0 enregistrement alors ...

merci,

10 réponses

1 2
Avatar
Anor
Bonjour,

belok :
| Bonjour,
|
| Je voudrai faire un truc du style
|
| si 0 enregistrement alors ...
|
| merci,

depuis quel objet : un état ou un formulaire ?
0 enregistrement dans quoi : dans une requête enregistrée, le formulaire, l'état ?

Les solutions sont différentes en fonction de ces paramètres.
--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Avatar
belok
Salut,

J'ai une liste modifiable qui filtre les enregistrements ; J'ai un
formulaire qui est lié (chmp peres, fils ) avec un sous formulaire.

Quand je séléctionne une valeur dans la liste modifiable si y a pas de
valeur dans le sous formulaire alors .....

merci,





"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de
news:%
Bonjour,

belok :
| Bonjour,
|
| Je voudrai faire un truc du style
|
| si 0 enregistrement alors ...
|
| merci,

depuis quel objet : un état ou un formulaire ?
0 enregistrement dans quoi : dans une requête enregistrée, le formulaire,
l'état ?


Les solutions sont différentes en fonction de ces paramètres.
--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------




Avatar
Anor
Bonjour,

belok :
| Salut,
|
| J'ai une liste modifiable qui filtre les enregistrements ; J'ai un
| formulaire qui est lié (chmp peres, fils ) avec un sous formulaire.
|
| Quand je séléctionne une valeur dans la liste modifiable si y a pas de
| valeur dans le sous formulaire alors .....
|
| merci,
|

Dans ce cas, je suppose qu'on peut réutiliser la valeur sélectionner
dans la zone de liste modifiable pour compter dans une table le nombre
d'occurences :
if dcount("*","LaTable","LeChampdelatable" = " & me!LaZonedeListe.value & ")" = 0 then....

syntaxe de base pour les champs numériques.

--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Avatar
belok
Private Sub m2_Change()
Me.Filter = "A_primaire_image = " & m2 & ""
Me.FilterOn = True
If DCount("*", "image", "i_externe_annonce" = " & me!m2.value & ") = 0 Then
MsgBox "test"
Else
MsgBox "prout"
End If
End Sub

il affiche tjs le msg box test donc pour lui il trouve tjs 0 par contre si
je change le 0 en null y mais prout tous le temps

j'avais penser a un truc avec forms!formulaire!champs ...


"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de
news:
Bonjour,

belok :
| Salut,
|
| J'ai une liste modifiable qui filtre les enregistrements ; J'ai un
| formulaire qui est lié (chmp peres, fils ) avec un sous formulaire.
|
| Quand je séléctionne une valeur dans la liste modifiable si y a pas de
| valeur dans le sous formulaire alors .....
|
| merci,
|

Dans ce cas, je suppose qu'on peut réutiliser la valeur sélectionner
dans la zone de liste modifiable pour compter dans une table le nombre
d'occurences :
if dcount("*","LaTable","LeChampdelatable" = " & me!LaZonedeListe.value &
")" = 0 then....


syntaxe de base pour les champs numériques.

--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------




Avatar
Anor
Bonjour,

belok :
| Private Sub m2_Change()
| Me.Filter = "A_primaire_image = " & m2 & ""
| Me.FilterOn = True
| If DCount("*", "image", "i_externe_annonce" = " & me!m2.value & ") | 0 Then MsgBox "test"
| Else
| MsgBox "prout"
| End If
| End Sub
|
| il affiche tjs le msg box test donc pour lui il trouve tjs 0 par
| contre si je change le 0 en null y mais prout tous le temps
|
| j'avais penser a un truc avec forms!formulaire!champs ...
|
|
si les valeurs contenues dans ta zone de liste m2 sont au format texte,
encadrer le champ par des "


Si format date, par des #

ce qui donnerait :
If DCount("*", "image", "i_externe_annonce" = '" & me!m2.value & "')" = 0 Then MsgBox "test"

ou
If DCount("*", "image", "i_externe_annonce" = #" & me!m2.value & "#)" = 0 Then MsgBox "test"

--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Avatar
belok
merci mais ça fonctionne tjs pas j'ai utilisée

If DCount("*", "image", "i_externe_annonce" = " & me!m2.value & ") = 0 Then
MsgBox "test" car m2 retourne du numérique.
else
msgbox "klkl"
end if

y mais tjs la msgbox test


"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de
news:%
Bonjour,

belok :
| Private Sub m2_Change()
| Me.Filter = "A_primaire_image = " & m2 & ""
| Me.FilterOn = True
| If DCount("*", "image", "i_externe_annonce" = " & me!m2.value & ") > | 0 Then MsgBox "test"
| Else
| MsgBox "prout"
| End If
| End Sub
|
| il affiche tjs le msg box test donc pour lui il trouve tjs 0 par
| contre si je change le 0 en null y mais prout tous le temps
|
| j'avais penser a un truc avec forms!formulaire!champs ...
|
|
si les valeurs contenues dans ta zone de liste m2 sont au format texte,
encadrer le champ par des "


Si format date, par des #

ce qui donnerait :
If DCount("*", "image", "i_externe_annonce" = '" & me!m2.value & "')" = 0
Then MsgBox "test"


ou
If DCount("*", "image", "i_externe_annonce" = #" & me!m2.value & "#)" = 0
Then MsgBox "test"


--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------




Avatar
3stone
Salut,

Private Sub m2_Change()
Me.Filter = "A_primaire_image = " & m2 & ""
Me.FilterOn = True


Tu filtre le *formulaire_principal* et tu veux savoir lorsque le sous-formulaire est vide ?

C'est ca ???


Me.Filter = "A_primaire_image = '" & m2 & "'" < si texte
Me.Filter = "A_primaire_image = " & m2 < si numérique
Me.FilterOn = True

If Me.NomSousForm.Form.Recordsetclone.Recordcount = 0 Then
'est vide
End if


Hum ?


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Anor
Bonjour,

belok :
| merci mais ça fonctionne tjs pas j'ai utilisée
|
| If DCount("*", "image", "i_externe_annonce" = " & me!m2.value & ") | 0 Then MsgBox "test" car m2 retourne du numérique.
| else
| msgbox "klkl"
| end if
|
| y mais tjs la msgbox test
|

je veux bien t'aider, mais si je rajoute des ' ou des " après le signe = et après la parenthèse
fermante,
ce n'est pas pour faire joli et toi tu les enlèves en me disant que ça ne fonctionne toujours
pas !!

Bon d'accord, je n'ai pas testé la syntaxe proposée, mais s'il y a une erreur, elle n'est pas
là...

--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Avatar
belok
erreur membre de méthode ou de donnée introuvable

If Me.f_image.Form.RecordsetClone.RecordCount = 0 Then
MsgBox "null"
Else
MsgBox "yess"
End If
End Sub



"3stone" a écrit dans le message de
news:3fad35b5$0$32184$
Salut,

Private Sub m2_Change()
Me.Filter = "A_primaire_image = " & m2 & ""
Me.FilterOn = True


Tu filtre le *formulaire_principal* et tu veux savoir lorsque le
sous-formulaire est vide ?


C'est ca ???


Me.Filter = "A_primaire_image = '" & m2 & "'" < si texte
Me.Filter = "A_primaire_image = " & m2 < si numérique
Me.FilterOn = True

If Me.NomSousForm.Form.Recordsetclone.Recordcount = 0 Then
'est vide
End if


Hum ?


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------





Avatar
belok
ta syntax ne fonctionne pas je connais le principe de ' # & "....

merci comme même pour ton aide,




"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de
news:
Bonjour,

belok :
| merci mais ça fonctionne tjs pas j'ai utilisée
|
| If DCount("*", "image", "i_externe_annonce" = " & me!m2.value & ") > | 0 Then MsgBox "test" car m2 retourne du numérique.
| else
| msgbox "klkl"
| end if
|
| y mais tjs la msgbox test
|

je veux bien t'aider, mais si je rajoute des ' ou des " après le signe et après la parenthèse
fermante,
ce n'est pas pour faire joli et toi tu les enlèves en me disant que ça ne
fonctionne toujours

pas !!

Bon d'accord, je n'ai pas testé la syntaxe proposée, mais s'il y a une
erreur, elle n'est pas

là...

--
à+
Arnaud
--------------------------------------------------
Avant toute chose : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------




1 2