OVH Cloud OVH Cloud

Problème de sélection dans un état

3 réponses
Avatar
Marie
Bonjour,

J'ai un probl=E8me de s=E9lection dans un =E9tat qui est=20
invoqu=E9 =E0 partir d'un formulaire. =C7a me donne une erreur=20
de type mismatch voici le code:

Dim stDocName As String
Dim strCriteria As String
=20
strCriteria =3D "([NoDocument]=3D'" & Me.txtNoDocument=20
& "') AND (" & "[NoRevision] =3D'" & Forms![frmDocument]!
[frmDocRevisionSF]![txtNoRevision] & "')"

stDocName =3D "rptAvisModification"
DoCmd.OpenReport stDocName, acPreview, , strCriteria

Le probl=E8me se pr=E9sente d=E8s que j'ajoute la partie=20
suivant le AND de strCriteria. Lorsque je fais un print=20
de strCriteria j'obtiens la bonne cha=EEne de caract=E8res=20
soit: ([NoDocument]=3D'FRD-01') AND ([NoRevision] =3D'2')

Qu'est qui ne va pas??

Merci
Marie

3 réponses

Avatar
Xavier HUE
Bonjour Marie,

NoRevision est-il de type numérique dans ta table?

sinon, tu devrais avoir ([NoDocument]='FRD-01') AND
([NoRevision] = 2) (pas de quotes autour du 2.

C'est une piste.
Cordialement.
Avatar
3stone
Salut,


strCriteria = "([NoDocument]='" & Me.txtNoDocument
& "') AND (" & "[NoRevision] ='" & Forms![frmDocument]!
[frmDocRevisionSF]![txtNoRevision] & "')"


la fin est erronée...

& Forms![frmDocument]![frmDocRevisionSF].Form![txtNoRevision] & "')"


--
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
Xavier HUE
Salut Pierre,

Les yeux affutés le gars ;-)
Suis passé à côté du SF.

A+