VBA + SQL : syntaxe

salut

juste une ligne de code en SQL qui me pose probleme !!!
mais quelle est l'erreur !! ????

Code:

---

1 2 3

Do Until oRst0.EOF ent = oRst0.Fields("Entreprise") Set oRst1 = db.OpenRecordset("SELECT Mail, Entreprise FROM rqt_EnvoiMail WHERE Entreprise =" & ent)

---

Erreur de syntaxe ! me dit on .... :cry:
les " ? les ' ? I don't know

Hello,


ent c'est pour entier donc numérique ?

Si oui essaie ca :

Code:

---

1 2 3 4 5

dim strSQL as string strSQL = "SELECT Mail, Entreprise FROM rqt_EnvoiMail WHERE Entreprise =" & ent   Set oRst1 = db.OpenRecordset(strSQL)

---

Si ca ne marche pas tu prends ton string strSQL et tu le colles dans une requête tu verras bien où ca pêche....

Si non, essaie ca :

Code:

---

1 2 3 4 5

dim strSQL as string strSQL = "SELECT Mail, Entreprise FROM rqt_EnvoiMail WHERE Entreprise='" & ent & "'"   Set oRst1 = db.OpenRecordset(strSQL)

---

merci pour ta réponse !

non : ent c'est pour entreprise ..... oui c mal choisi ...:oops:
c donc du texte .... string
merci

Salut,

donc le deuxième exemple de mcdotta devrait te convenir ;)

Dolphy ;)