Discussion :

[PipoWIL]

Bonjour,

J'ai créé une requête sur le datawarehouse. Elle fonctionne très bien. Dans MS Access, quand je double-clique sur le nom de la requête, elle s'effectue parfaitement.

Maintenant que cela fonctionne, je veux exécuter cette requête en VBA.

j'ai essayé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
currentdb.execute NomDeLaRequete
 
dim dbs as DAO.Database
Set dbs = Application.CurrentDb
dbs.Execute strSQL, dbFailOnError
 
DoCmd.RunSQL strSQL   où strSQL est mon statement SQL
 
 
DoCmd.OpenQuery ("NomDeLaRequete")

Toutes ces méthodes me donnent une erreur

ODBC--call failed.
[Microsoft][ODBC SQL Server Driver][SQL Server]The SELECT permission was denied on the object NomDeLaView, database NomDeLadbSQL, schema dbo. (#229)

La seule raison qui me vient à l'esprit est la nature de cette vue SQL.
D'habitude, sur ce serveur SQL les vues sont basées sur d'autres tables SQL. Ici, cette vue est basée sur une table Oracle.

Avez-vous déjà eu ce genre d'erreur ?
Comment l'avez-vous résolu ?

Merci pour votre aide

[marot_r]

Bonjour.

Ta requête est-elle une requête de modification ?

Si non pour afficher le résultat tu as juste besoin de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DoCmd.OpenQuery ("NomDeLaRequete")

Tout le reste du code ne sert à rien.

A+

[PipoWIL]

Bonjour,

Oui, la requête est bien une requête de modification. Elle ajoute des lignes à une table existante.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

currentdb.execute "NomDeLaRequete"

est suffisant pour exécuter la requête et toutes les autres lignes de codes sont là pour vous montrer les autres solutions que j'ai essayées.

Aujourd'hui, j'ai essayé encore une autre solution :
J'ai retiré toutes les autres requêtes, tables, formulaires, tous les autres modules, fonctions ou sub de ma base de données Access. Je n'ai gardé que la table dans laquelle la requête ajoute les lignes, le lien vers la vue SQL dans mon Data Warehouse et la fonction simplifiée avec la ligne currentdb.execute "NomDeLaRequete"

Surprise : ça marche !!
Pourquoi cela fonctionne-t-il dans ma base simplifée et pas dans la base originelle ?

Je vais continuer à simplifier mon code pour mettre en évidence l'élément erroné.

Merci pour l'intérêt que vous portez à mon problème.

[PipoWIL]

Bonjour,

A la suite de ma surprise de ce matin, j'ai modifié la séquence de mon processus.
Cette base exécute environ 150 requêtes, l'une après l'autre. C'est une function VBA qui les lance. Cette requête-ci était exécutée au milieu de la liste.
Fort heureusement, cette requête ne dépendait pas des résultats des autres requêtes et j'ai pu la déplacer en première position. Elle est donc exécutée au départ du processus.
Maintenant, cela fonctionne. Je ne comprends pas pourquoi mais ça marche.