Requête SQL Direct à partir de VBA

Bonjour à tous,

A partir d'Access, j'accède à une base de données sous Oracle.
J'aimerais pouvoir faire des requêtes SQL Direct directement dans visual basic pour pouvoir faire des requêtes dynamiques.
j'ai regardé dans la FAQ, je n'ai rien trouvé

merci

Citation:

---

Envoyé par petitmic

Bonjour à tous,

A partir d'Access, j'accède à une base de données sous Oracle.
J'aimerais pouvoir faire des requêtes SQL Direct directement dans visual basic pour pouvoir faire des requêtes dynamiques.
j'ai regardé dans la FAQ, je n'ai rien trouvé

merci

---

Hello,

mon tutoriel de recherche multicritère est un exemple, il me semble, d'écriture de requête dynamique par le code (lien dans ma signature).

merci caféine j'ai déja utilisé ton tutoriel, il m'avait beaucoup aidé.
mais là il ne répond pas à mon problème. En fait la requête, je sais comment la faire (le texte) mais je sais pas comment l'éxécuter à partir de VBA car c'est une requête SQL Direct qui intéroge directement une base oracle avec le pilote microsoft odbc pour oracle.

Bonjour,

Avez-vous finalement réussi à faire du SQL Direct par le code VBA ? J'en ai besoin aussi.

Bonne journée.

il faut que tu mette dans les options d'access (outils/options/tables et requêtes) que tu veux syntaxe compatible sql et tu coches les 2 cases.

ensuite dans ton code tu utilise docmd.runsql "ton instruction"
exemple :

Code:

---

1 2 3 4 5 6 7 8

Dim SQL As String   SQL = "UPDATE Employees " & _ "SET Employees.Title = 'Regional Sales Manager' " & _ "WHERE Employees.Title = 'Sales Manager'"   DoCmd.RunSQL SQL

---

vu que tu passe une chaine tu peux passer des paramètres à toi en concaténant avec &

Bonjour,

Je pense qu'avec ADO cela devrait fonctionner (c'est prévu pour)
il faut pour cela que tu connaisses la chaine de connexion pour oracle.

Bonne journée

Citation:

---

Envoyé par langelot222

il faut que tu mette dans les options d'access (outils/options/tables et requêtes) que tu veux syntaxe compatible sql et tu coches les 2 cases.

ensuite dans ton code tu utilise docmd.runsql "ton instruction"
exemple :

Code:

---

1 2 3 4 5 6 7 8

Dim SQL As String   SQL = "UPDATE Employees " & _ "SET Employees.Title = 'Regional Sales Manager' " & _ "WHERE Employees.Title = 'Sales Manager'"   DoCmd.RunSQL SQL

---

vu que tu passe une chaine tu peux passer des paramètres à toi en concaténant avec &

---

Le problème avec RunSQL c'est qu'il demande confirmation à chaque fois, peut-on faire sauter la demande ?

pour faire sauter les warning tu met

Code:

---

1 2	docmd.warning false

---

true pour les remettre

normalement il faut pas mettre le égal, si il plante, met un =false