Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/06/2011, 12h16   #1
Invité de passage
 
Inscription : mars 2009
Messages : 25
Détails du profil
Informations forums :
Inscription : mars 2009
Messages : 25
Points : 3
Points : 3
Par défaut Trop peu de paramètres. 2 attendus

Bonjour je sais que le sujet à déjà été abordé auparavant (me fouettez pas .... ) mais je n'arrive vraiment pas à résoudre ce satané problème de requête SQL sous VB de "Trop peu de paramètres. 2 attendus"

J'ai bien testé cette requette en mode SQL et elle fonctionne apparemment ( à moins que je l'ai mal testée )

Code :
1
2
3
4
5
Set resultatReq = CurrentDb.OpenRecordset( _
     "SELECT [MOB_DTR_02_07].COMMUNE, [MOB_DTR_02_07].L_COMMUNE, [MOB_DTR_02_07].DCLT, [MOB_DTR_02_07].L_DCLT, Fix([MOB_DTR_02_07].NBFLUX_C07_ACTOCC15P)" & _
     "FROM [MOB_DTR_02_07] " & _
      "WHERE ((([MOB_DTR_02_07].COMMUNE)='" & LIGNE_Col2 & "')) OR ((([MOB_DTR_02_07].DCLT)='" & LIGNE_Col2 & "'))" & _
      "AND ((([MOB_DTR_02_07].LCOMMUNE)='" & LIGNE_Col3 & "')) OR ((([MOB_DTR_02_07].LDCLT)='" & LIGNE_Col3 & "'))")
Je sais qu'on à déjà parlé de ce sujet sur une autre discussion mais je n'ai pas vraiment pas réussi à résoudre ce problème.

Merci pour vos réponses
miron_fds est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/06/2011, 12h22   #2
Membre éprouvé
 
Avatar de dumas.blr
 
Homme Jean-Yves DUMAS
Consultant informatique
Inscription : juin 2010
Messages : 325
Détails du profil
Informations personnelles :
Nom : Homme Jean-Yves DUMAS
Âge : 48
Localisation : France, Hauts de Seine (Île de France)

Informations professionnelles :
Activité : Consultant informatique
Secteur : Conseil

Informations forums :
Inscription : juin 2010
Messages : 325
Points : 447
Points : 447
Bonjour miron_fds

Est-ce que le SQL de ton VBA ne serait pas dans une procédure (sub ...) ou une fonction (function ...) qui doit avoir les variables LIGNE_Col2 et LIGNE_Col3 en paramètres ?

sinon, n'oublie pas de les déclarer en dim.

Si c'est le cas, merci de dérouter ce topic dans le sujet VBA.
__________________
S'il n'y a pas de solution, c'est qu'il n'y a pas de problème !!!
si tout est OK, n'oubliez pas de cliquer sur
dumas.blr est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/06/2011, 13h59   #3
Candidat au titre de Membre du Club
 
Inscription : janvier 2006
Messages : 39
Détails du profil
Informations forums :
Inscription : janvier 2006
Messages : 39
Points : 13
Points : 13
Bonjour,
J'ai l'impression qu'il manque des blancs a la fin des lignes (ajouts de 2 blancs voir ci-dessous).
Tente de lancer la requête directement dans Access avec des valeurs <en dur fictives> pour déceler les erreurs.
Autre piste : faire attention que les variables <LIGNE_Col2> et <LIGNE_Col3> ne contiennent pas des caractères spéciaux de type '

Code :
1
2
3
4
5
 
"SELECT [MOB_DTR_02_07].COMMUNE, [MOB_DTR_02_07].L_COMMUNE, [MOB_DTR_02_07].DCLT, [MOB_DTR_02_07].L_DCLT, Fix([MOB_DTR_02_07].NBFLUX_C07_ACTOCC15P) " & _
     "FROM [MOB_DTR_02_07] " & _
      "WHERE ((([MOB_DTR_02_07].COMMUNE)='" & LIGNE_Col2 & "')) OR ((([MOB_DTR_02_07].DCLT)='" & LIGNE_Col2 & "')) " & _
      "AND ((([MOB_DTR_02_07].LCOMMUNE)='" & LIGNE_Col3 & "')) OR ((([MOB_DTR_02_07].LDCLT)='" & LIGNE_Col3 & "'))")
teuzadur est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/06/2011, 17h22   #4
Invité de passage
 
Inscription : mars 2009
Messages : 25
Détails du profil
Informations forums :
Inscription : mars 2009
Messages : 25
Points : 3
Points : 3
Merci à tous les 2 pour vos réponses.

Mon problème est à présent résolu (oubli d'un underscore dans la déclaration d'un paramètre)
miron_fds est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 05h36.


 
 
 
 
Partenaires

Hébergement Web