pb ouverture recordset

pb ouverture recordset - VB/VBA/VBS - Programmation

Marsh Posté le 19-05-2005 à 13:17:07    

Bonjour,
 
j'ai un petit probleme sur l'ouverture d'un recordset:
 
je dispose d'une table T_fournir(num_four,num_produit,ref_produit)
j'ai fait un formulaire form_dp qui contient un numéro de fournisseur num_four, et un sous formulaire sform_dp qui contient un numéro de produit num_produit.
dans mon sous formulaire, je dispose d'un champ indépendant dans lequel je souhaiterai renseigner la référence du produit ref_produit, j'ai donc utilisé un recordset.
le code est le suivant:
 
Dim Rst As Recordset
Set Rst = CurrentDb.OpenRecordset(("SELECT * FROM T_fournir WHERE T_fournir.num_four=" & Forms!form_dp.num_four&" AND T_fournir.num_produit = " & Me.num_produit), dbOpenSnapshot)
If Not Rst.EOF Then
    Me!ref = Rst!ref_produit
End If
Rst.Close
 
j'obtiens l'erreur suivante:
 
Erreur de compilation: Attendu :)
 
quelqu'un aurait il une solution?
 
d'avance merci

Reply

Marsh Posté le 19-05-2005 à 13:17:07   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed