Bonjour,

Voici un code VBA pour démarrer une STORED PROCEDURE placée sur un serveur SQL externe.
Ce code est de l'ADO et ne fonctionne pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub  ExecuteStoredProc()
 
    Dim dbs As ADODB.Connection
    Dim rst As ADODB.Recordset
    Dim strSQL As String
 
    dbs.ConnectionString = "DSN=DBName"
    dbs.Open
 
    strSQL = "EXEC StoredProcedureName"
    Set rst = dbs.Execute(strSQL)
 
    rst.Close : Set rst = Nothing 
    dbs.Close : Set dbs = Nothing
 
End Sub
Pourriez-vous corriger ce code et surtout me donner l'équivalent en DAO ?

Merci,

DPhBxl