Discussion :

[SIGER_971]

Bonjour à tous,

Je vous explique mon problème :
J'ai lié les tables de ma base Oracle à mon application Access, et maintenant, je souhaite exécuter une procédure qui est stockée sous Oracle via mon code VBA tout en récupérant des infos contenues dans mon formulaire Access.
Je sais, c'est pas simple !
On m'a dit de passer par une requête directe, mais ça bug a chaque fois !
(Vive le copier-coller ! )

Voici un peu de mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim db As DAO.Database
Dim strNomRequete As String
Dim strSQL As String
Set db = CurrentDb
strNomRequete = "AjoutAgent"
Set db.QueryDef = strNomRequete 'ça bloque là !
strSQL = "Execute AjoutAgent('" & Me.Txt_creer_nom.Value & "' ,...)"
db.QueryDefs (strSQL)
Set qdef = Nothing
Set db = Nothing
DoCmd.OpenQuery strNomRequete

J'ai un peu joué dans le code aussi, donc il doit y avoir pas mal d'erreurs !

Merci d'avance !

[Jean-Philippe André]

salut,
pour les requêtes exécution tu peux utiliser:

Code :

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

1
2
3
4
5
Docmd.RunSQL
'ou
CurrentDb.Execute
'ou encore
CurrentDb.QueryDefs().Execute

Je te recommande un peu de lecture :
http://warin.developpez.com/access/dao/

notamment le chapitre
http://warin.developpez.com/access/d...=partie_4#L4.7

Bonne lecture