Discussion :

[eddy verpoorter]

bonjour,
j'essaie de récupérer une valeur dans ma base de données avec une vérification d'égalité sur un champ de formulaire

Code :

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

1
2
 
        Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = Me.Text27")

j'ai toujours une erreur vba me spécifiant : "trop peu de paramètres".

j'ai créé une query faisant la même chose, et celle-ci fonctionne correctement, et si j' apelle cette query via vba, le problème reste identique.

Code :

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

1
2
 
ssql = "Select * From qryTacheFacturation"

merci d'avance pour votre aide

[tsp]

Slt,
essaye peut être :

Code :

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

 Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = " & Me.Text27)

[eddy verpoorter]

Slt,
essaye peut être :

Code :

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

 Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = " & Me.Text27)

bonjour, toujours une erreur, mais cette fois, il m'indique:
type de données incompatible dans l'expression de critères.

merci pour ton aide

[tsp]

dans ce cas ton champ [numfacture] doit être un string, essaye donc ça :

Code :

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

 Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = " " " & Me.Text27 & " " ")

ou

Code :

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

 Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = '  " & Me.Text27 & "  '  ")

[eddy verpoorter]

dans ce cas ton champ [numfacture] doit être un string, essaye donc ça :

Code :

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

 Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = " " " & Me.Text27 & " " ")

ou

Code :

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

 Set rss1 = CurrentDb.OpenRecordset("SELECT * FROM facturation WHERE [NumFacture] = '  " & Me.Text27 & "  '  ")

ça fonctionne nickel, milles fois merci pour ton aide et la rapidité de tes réponses...

[Nicko29]

c'est résolu ??! alors Tag résolu svp