OVH Cloud OVH Cloud

A2000, requête SQL en VBA

4 réponses
Avatar
Sweety
Bonjour à tous/toutes

Qui peut me dire pourquoi ma requête SQL ci-dessous ne fonctionne pas?
Access me renvoie le message d'erreur "Une action ExécuterSQL nécessite un
argument consistant en une instruction SQL"


**********
Dim SQL As String

SQL = "SELECT XL_PC.NrMatériel, XL_PC.Unité, XL_PC.Is_feedis_installed,
XL_PC.Feedis_version FROM XL_PC WHERE (((XL_PC.Is_feedis_installed) = -1))
ORDER BY XL_PC.Feedis_version DESC;"

DoCmd.RunSQL SQL
**********


Merci !
Michel

4 réponses

Avatar
Jessy Sempere [MVP]
Bonjour

La méthode RunSQL permet d'exécuter des requête actions,
hors toi tu essais de lancer une requête sélection, donc ça ne
peut pas marcher...

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Sweety" <*enlevez_ceci* a écrit dans le message news:
uoVP4w3#
Bonjour à tous/toutes

Qui peut me dire pourquoi ma requête SQL ci-dessous ne fonctionne pas?
Access me renvoie le message d'erreur "Une action ExécuterSQL nécessite un
argument consistant en une instruction SQL"


**********
Dim SQL As String

SQL = "SELECT XL_PC.NrMatériel, XL_PC.Unité, XL_PC.Is_feedis_installed,
XL_PC.Feedis_version FROM XL_PC WHERE (((XL_PC.Is_feedis_installed) = -1))
ORDER BY XL_PC.Feedis_version DESC;"

DoCmd.RunSQL SQL
**********


Merci !
Michel




Avatar
Daniel Carollo
Bonjour Sweety (ca me fait un peu drole de vous appeler comme ca)!

Cette requete est une requete de selection. Le RunSQL attend une requete
d'action (INSERT, UPDATE ou DELETE par exemple).

Bonne continuation.


--
Daniel :-)

Computing Technologies International - www.computing-tech.com - We
provide solutions...

"Sweety" <*enlevez_ceci* wrote in message
news:uoVP4w3%
Bonjour à tous/toutes

Qui peut me dire pourquoi ma requête SQL ci-dessous ne fonctionne pas?
Access me renvoie le message d'erreur "Une action ExécuterSQL nécessite un
argument consistant en une instruction SQL"


**********
Dim SQL As String

SQL = "SELECT XL_PC.NrMatériel, XL_PC.Unité, XL_PC.Is_feedis_installed,
XL_PC.Feedis_version FROM XL_PC WHERE (((XL_PC.Is_feedis_installed) = -1))
ORDER BY XL_PC.Feedis_version DESC;"

DoCmd.RunSQL SQL
**********


Merci !
Michel




Avatar
Sweety
Donc impossible d'exécuter une requête sélection via VB ?
Merci à vous deux ;-)

"Sweety" <*enlevez_ceci* a écrit dans le message de news:
uoVP4w3#
Bonjour à tous/toutes

Qui peut me dire pourquoi ma requête SQL ci-dessous ne fonctionne pas?
Access me renvoie le message d'erreur "Une action ExécuterSQL nécessite un
argument consistant en une instruction SQL"


**********
Dim SQL As String

SQL = "SELECT XL_PC.NrMatériel, XL_PC.Unité, XL_PC.Is_feedis_installed,
XL_PC.Feedis_version FROM XL_PC WHERE (((XL_PC.Is_feedis_installed) = -1))
ORDER BY XL_PC.Feedis_version DESC;"

DoCmd.RunSQL SQL
**********


Merci !
Michel




Avatar
Jessy Sempere [MVP]
Bonjour

Ca dépend de ce que tu souhaite faire exactement ???

Si tu veux récupérer les enregistrements de ta requête
dans VBA, tu peux passer par un recordset...

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Sweety" <*enlevez_ceci* a écrit dans le message news:
OF#LG93#
Donc impossible d'exécuter une requête sélection via VB ?
Merci à vous deux ;-)

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:

uoVP4w3#
Bonjour à tous/toutes

Qui peut me dire pourquoi ma requête SQL ci-dessous ne fonctionne pas?
Access me renvoie le message d'erreur "Une action ExécuterSQL nécessite
un


argument consistant en une instruction SQL"


**********
Dim SQL As String

SQL = "SELECT XL_PC.NrMatériel, XL_PC.Unité, XL_PC.Is_feedis_installed,
XL_PC.Feedis_version FROM XL_PC WHERE (((XL_PC.Is_feedis_installed)
= -1))


ORDER BY XL_PC.Feedis_version DESC;"

DoCmd.RunSQL SQL
**********


Merci !
Michel