comment créer une requête de type SELECT...WHERE avec vba - SQL/NoSQL - Programmation
Marsh Posté le 04-08-2009 à 17:43:26
Ca ne marche pas parce que tu ne spécifies aucune chaine de connection à ta base de données
Marsh Posté le 10-08-2009 à 10:17:46
merci pour ta réponse harkonnen et désolé pour la longue période d'inactivité.... (j'étais très occupé),
Pour en revenir à ce que tu m'as conseillé, même avec la connexion ça ne fonctionne pas, j'ai une autre erreur!!
j'ai donc voulu changer de syntaxe (exemple pris sur l'aide access) mais j'ai encore une autre erreur:
Dim BDD as DAO.Recordset
Dim Base as DAO.Database
Dim Categ as integer
Dim chSQL as string
Modifiable1.setfocus
Categ = Modifiable1.ListIndex
Set Base = CurrentDb
chSQL = "select NumCompo, NomCompo from COMPOSANT where NumCategorie = 'Categ';"
Set BDD = Base.OpenRecordset (chSQL)
Set BDD = Nothing
Base.close
Set Base = Nothing
Ainsi access me renvoie:
"Erreur 3061
"Trop peu de parametre. 1 attendu
Je n'arrive pas à savoir quel paramètre il me demande!!
Merci pour votre aide
Marsh Posté le 04-08-2009 à 15:16:01
Bonjour à vous,
Je me permet encore de solliciter votre aide pour savoir si l'un d'entre vous serais comme écrire une requête de type select... where.... sur vba.
Voilà ce que j'ai fait mais ça ne fonctionne pas:
Dim RS as ADODB.Recordset
Dim Categ as integer
Dim chSQL as string
Modifiable1.SetFocus
Categ = Modifiable1.ListIndex
chSQL = "select NumCompo, NomCompo from COMPOSANT where NumCategorie = 'Categ';"
CurrentDb.Execute (chSQL)
PS: Categ est une variable
Quelqu'un serait il pourquoi ça ne fonctionne pas?
Merci d'avance
Message édité par komaxi le 04-08-2009 à 15:36:34