Stored Procedure SQL Serveur

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. :aie:

Code:

---

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 ? :bug:

Merci,

DPhBxl