Stored Procedure dans VBA
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
