Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access peut-être la dernière avant noël

peut-être la dernière avant noël

5 réponses
Avatar
Jean-Claude
Bonsoir à tous

Une requête avec comme critère: comme "*" & [Champ du formulaire
indépendant]& "*"
J'essaie mais n'y arrive pas, d'où mon arrivée, de faire une vérification.

Rien ne marche dans le genre:
reponse=dlookup("intitule","requete","intitule=forms!Nom formulaire!champ")
if isnull (reponse) then etc..

Autant quand je n'utilise pas cette vérification, j'ouvre les fiches qui ont
une partie du nom, autant que la vérif il ne trouve rien.

Merci pour une réponse et bonne soirée

jc
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Guy Detienne
Salut ;O)

Petit problème au niveau de la syntaxe:

reponse=dlookup("intitule","requete","intitule=forms!Nom formulaire!champ")
DEVIENT
reponse=dlookup("intitule","requete","intitule=' " & forms!Nom
formulaire!champ & "'")

Guy

"Jean-Claude" a écrit dans le message de
news:3fe88a4c$0$17112$
Bonsoir à tous

Une requête avec comme critère: comme "*" & [Champ du formulaire
indépendant]& "*"
J'essaie mais n'y arrive pas, d'où mon arrivée, de faire une vérification.

Rien ne marche dans le genre:
reponse=dlookup("intitule","requete","intitule=forms!Nom
formulaire!champ")

if isnull (reponse) then etc..

Autant quand je n'utilise pas cette vérification, j'ouvre les fiches qui
ont

une partie du nom, autant que la vérif il ne trouve rien.

Merci pour une réponse et bonne soirée

jc





Avatar
Jean-Claude
Tout d'abord merci pour la réponse.
je vais essayer mais je pense qu'il faut que le lui dise que c'est une
partie de nom, comme c'est indiqué dans la requete non?
dans le genre like etc.. mais je ne sais pas le faire

merci de toute façon


"Guy Detienne" a écrit dans le message de news:

Salut ;O)

Petit problème au niveau de la syntaxe:

reponse=dlookup("intitule","requete","intitule=forms!Nom
formulaire!champ")

DEVIENT
reponse=dlookup("intitule","requete","intitule=' " & forms!Nom
formulaire!champ & "'")

Guy

"Jean-Claude" a écrit dans le message de
news:3fe88a4c$0$17112$
Bonsoir à tous

Une requête avec comme critère: comme "*" & [Champ du formulaire
indépendant]& "*"
J'essaie mais n'y arrive pas, d'où mon arrivée, de faire une
vérification.



Rien ne marche dans le genre:
reponse=dlookup("intitule","requete","intitule=forms!Nom
formulaire!champ")

if isnull (reponse) then etc..

Autant quand je n'utilise pas cette vérification, j'ouvre les fiches qui
ont

une partie du nom, autant que la vérif il ne trouve rien.

Merci pour une réponse et bonne soirée

jc









Avatar
3stone
Salut,

"Jean-Claude"
Une requête avec comme critère: comme "*" & [Champ du formulaire
indépendant]& "*"
J'essaie mais n'y arrive pas, d'où mon arrivée, de faire une vérification.

Rien ne marche dans le genre:
reponse=dlookup("intitule","requete","intitule=forms!Nom formulaire!champ")
if isnull (reponse) then etc..



Comme critère dans la reqûete :
Like "*" & Forms![NomDuFormulaire]![NomDuChamp] & "*"

et pour dans le VBA :
reponse = DLookUp("intitule","requete","intitule Like '*" & Forms![NomDuForm]![NomControle] & "*'")
if isnull(reponse) Then
'rien
else
'ok
end if

Mais, attention... reponse doit être déclaré Variant... Dim reponse As Variant

ou comme string, mais dans ce cas, la fonction Nz est obligatoire
pour renvoyer un string vide (ou autre chose) si DLookup ne ramène rien !
Un string ne pouvant pas "transporter" un NULL

Dim reponse As String
reponse = Nz(DLookUp("intitule,"requete",... like '*" & ...... & "*'" ),"")
If reponse = "" then
'rien
else
'ok
end if

--
A+
Pierre (3stone) Access MVP
---------------------------
Un bon départ se fait ici...
http://users.skynet.be/mpfa
---------------------------

Avatar
Jean-Claude
Merci Pierre de ta réponse.

Dans ma requête, sans la vérif, tout marche bien.
Mais j'ai voulu tenter une vérif.

Je vais essayer et te tenir informé.

Bonne fêtes

Jean-Claude

"3stone" a écrit dans le message de news:

Salut,

"Jean-Claude"
Une requête avec comme critère: comme "*" & [Champ du formulaire
indépendant]& "*"
J'essaie mais n'y arrive pas, d'où mon arrivée, de faire une
vérification.



Rien ne marche dans le genre:
reponse=dlookup("intitule","requete","intitule=forms!Nom
formulaire!champ")


if isnull (reponse) then etc..



Comme critère dans la reqûete :
Like "*" & Forms![NomDuFormulaire]![NomDuChamp] & "*"

et pour dans le VBA :
reponse = DLookUp("intitule","requete","intitule Like '*" &
Forms![NomDuForm]![NomControle] & "*'")

if isnull(reponse) Then
'rien
else
'ok
end if

Mais, attention... reponse doit être déclaré Variant... Dim reponse
As Variant


ou comme string, mais dans ce cas, la fonction Nz est obligatoire
pour renvoyer un string vide (ou autre chose) si DLookup ne ramène rien !
Un string ne pouvant pas "transporter" un NULL

Dim reponse As String
reponse = Nz(DLookUp("intitule,"requete",... like '*" & ...... &
"*'" ),"")

If reponse = "" then
'rien
else
'ok
end if

--
A+
Pierre (3stone) Access MVP
---------------------------
Un bon départ se fait ici...
http://users.skynet.be/mpfa
---------------------------









Avatar
Xavier HUE
Bonjour Jean-Claude,

En complément de Pierre et Guy:

Pour faire le Like, change simplement l'opérateur égale
pour un Like.

reponse=dlookup("intitule","requete","intitule Like *' " &
forms!Nom & "*")

OK?
Cordialement.