Erreur de syntaxe

Bonjour,

Pouvez-vous m'aider.

j'ai une erreur de syntaxe quand j'essaie d'exécuter cette requête SQL.

Code:

---

req = "SELECT TOP 30 RapportsProd.ref, RapportsProd.serial, RapportsProd.Date, RapportsProd.end FROM RapportsProd WHERE RapportsProd.end >= Now() And RapportsProd.ref=\"" & TB_MTM.text & "\" ORDER BY Rnd(RapportsProd.ID); "

---

ma requête fonctionne car si je la tappe en dur dans ACCESS ça fonctionne mais je n'arrive pas à l'adapter en VB.net

Pouvez-vous m'aider ?

Pièce jointe 629014

Bonsoir,
je présume que c'est un truc comme ça que tu veux faire!

Code:

---

1 2 3

req = $"SELECT TOP 30 RapportsProd.ref, RapportsProd.serial, RapportsProd.Date, RapportsProd.end FROM RapportsProd WHERE RapportsProd.end >= Now() And RapportsProd.ref='{TB_MTM.text}' ORDER BY Rnd(RapportsProd.ID);"

---

utilise des requêtes paramétrées c'est bien plus sécurisé déjà

Code:

---

1 2 3 4 5 6

req = "SELECT TOP 30 RapportsProd.ref, RapportsProd.serial, RapportsProd.Date, RapportsProd.end FROM RapportsProd WHERE RapportsProd.end >= Now() And RapportsProd.ref=? ORDER BY Rnd(RapportsProd.ID); " command = new OleDbCommand(req,connection) command.Parameters.AddWithValue("ref",TB_MTM.Text) connection.Open() Dim dr As OleDbDataReader = command.ExecuteReader() ...

---