Discussion :

[rob1son76]

Bonjour,

J'ai un sous formulaire avec un bouton pour atteindre l'enregistrement suivant.
Sur l'évènement clic j'ai mis se code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
    DoCmd.GoToRecord , , acNext
 
n = DLookup("num", "rqt-num-ozp-2")
 
Set myrst = db.OpenRecordset("SELECT * from [rqt-select-dernier-code-article] where num = '" & n & "' ;")
 
     myrst.MoveLast
     x = myrst.Fields("Code article").Value
     y = myrst.Fields("Parfum").Value
 
MsgBox (x & "-" & y)

Ma variable n recupere bien le num qu'il me faut mais le probleme viens de mon code sql num=n.
Lorsque je remplace n par un chiffre (expl 631) ca marche parfaitement.
Donc mon problème viens de l'écriture du code.
J'ai essayé plusieurs manière de l'écrire mais ca ne marche pas.
J'ai essayé:
num=n
num='" & n & "'
num=[n]

Mais ca ne marche pas.
Soit il me marque incompatibilité soit trop peu de paramètre attendu.

merci de maider a bien orthographier mon code sql.

[nico84]

bon bah c'est pas si compliqué, si num et n sont tous deux entiers :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set myrst = db.OpenRecordset("SELECT * from [rqt-select-dernier-code-article] where num = " & n & ";")

ou pour être plus tranquille vu d'où vient n :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set myrst = db.OpenRecordset("SELECT * from [rqt-select-dernier-code-article] where num = " & nz(n,0) & ";")

Par ailleurs il n'y a aucun critère dans

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

n = DLookup("num", "rqt-num-ozp-2")

donc ça va trouver n'importe quoi, non ?

[rob1son76]

Je te remercie pour ta réponse.
La première était la bonne.
Je me suis perdu dans les cotes.
Il n'y a pas de critère dans n = DLookup("num", "rqt-num-ozp-2") car il n'y a qu'une ligne possible.
En faite n récupère le N° OZP (Identifiant).
Les critères sont dans la requete.

En faite mon prog permet de récupérer le code produit et le parfum du dernier enregistrement du sous formulaire.
Je voudrai que lorsque je clic sur le bouton suivant et qu'il n'y a pas d'enregistrement apres il me mette le dernier code article et parfum enregistrer.
J'avais essayé de faire un undo mais ca ne marche pas.
Mais maintenant que je peut récupérer les valeur de mon dernier enregistrement il ne me reste plus qu'a trouver comment faire pour que mes champs texte récupère mes donnée seulement s'il n'y a pas d'autre enregistrement apres.

Si tu as une idée de comment je pourai procédé ca m'aiderai bcp.

En tt cas merci bcp de m'avoir aider.

[nico84]

Euh...pas compris

Vu d'avion tout ça me semble compliqué pour faire des trucs simples