Forms.nomformulaire!nomchamp sa veut pas marcher sous VB !

Question

Function Mailtracking() 
 
Dim db As Database 
Dim rs As DAO.Recordset 
Dim Nom As String 
Dim Prenom As String 
Dim Mail As String 
Dim Tracking As String 
Dim X 
 
Set db = CurrentDb 
Set rs = db.OpenRecordset("SELECT Code_Client, Nom_client, Prenom_Client, Mail_Client, Num_Tracking_Cmd FROM CLIENTS, COMMANDES_CLIENTS WHERE (((CLIENTS.Code_Client)=([COMMANDES_CLIENTS].#Code_Client) AND (CLIENTS.Code_Client)=Forms.[COMMANDES_CLIENTS]![Client]));") 
 
Nom = rs.Fields("Nom_Client") 
Prenom = rs.Fields("Prenom_Client") 
Mail = rs.Fields("Mail_Client") 
Tracking = rs.Fields("Num_Tracking") 
 
MsgBox ("Test:" & Nom & Prenom & Mail & Tracking & "Fin") 
 
 
 
'X = Shell("msimn.exe " & "/mailurl:mailto:" & Mail, vbNormalFocus)' 
 
End Function 
 
Voila mon Code doit marcher, le seul Bug c'est que dans la Requette SQL, il ne comprend pa le Forms.[COMMANDES_CLIENTS]![Client] 
quelqun sait comment faire comprendre a VB que c'est dans le formulaire ouvert qu'il faut chercher ? 
J'ai tester ma Requette ss Access elle marche nickel...

J'avait deja poster dans "J'AI BESOIN D'AIDE !!!" mai sle sujet a du tomber a l'eau...
http://vbfrance.fr/forum.v2.aspx?ID=422201

valtrase · Answer

Re, Re, Re,
Houlala &#231;a prends forme m&#234;me si &#231;a ne marche pas LOL.
Y'a pas un super cal&#233; en SQL ici ?
Moi ce qui m'interpelle c'est le =Forms......t'as essayer de le virer ou de le remplacer par [Formulaire].
sinon je ne vois pas .....

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

Starec · Answer

Es-tu en VB6 ou en VBA sous Access, car ton "Forms.[COMMANDES_CLIENTS]![Client]" est 
pour r&#233;cup&#233;rer la valeur d'un champ sous Acess et non en VB, alors que dans ta premi&#232;re condition WHERE tu ne mets pas Form, je ne comprends pas.

Explique sous quoi tu fais du VB

Starec

BUZZ2K · Answer

Lol
Donc en fait je suis en VBA, mon premier WHERE me sert a faire la jointure entre les tables n&#233;c&#233;ssaires, le deuxieme me sert a preciser que je veut que les info du client dont le code_client est celui du formulaire que je consulte... le bug c que ma requette (en SQL sous Access) fonctionne, je n'arrive juste pas a faire comprendre a VB que c'est dans un form qu'il doit chercher...

clemusdk · Answer

essaye "Forms![COMMANDES_CLIENTS]![Client]"

BUZZ2K · Answer

nan meme tarif, cela ne marche pas... trop peu de parametres, un attendu

Forms.nomformulaire!nomchamp sa veut pas marcher sous VB !

5 réponses

Discussions similaires