Запуск хранимых процедур MSSQL - VB

Формулировка задачи:

Как из Access VBA запустить хранимую процедуру MSSQL ?

Решение задачи: «Запуск хранимых процедур MSSQL»

textual
                            Листинг программы 
                        

                            Dim cn As Connection
Dim cmd As Command
Dim rs As Recordset
 
Set cmd = New Command
Set cn = New Connection
cn.Open 'Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=my_db;Data Source=my_server'
Set cmd.ActiveConnection = cn
cmd.CommandType = adCmdStoredProc
cmd.CommandText = 'sp_MyStoredProcedure'
Set rs = cmd.Execute
 
' Сделай что нибудь с результатами
 
Set rs = Nothing
Set cmd = Nothing
End Sub
                        

Оцени полезность:

9 голосов , оценка 4.444 из 5

Похожие ответы