Подскажите, пожалуйста, как передать табличные параметры в процедуры сервера sql из Excel vba.
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmd As New ADODB.Command
Dim constring As String
conn.ConnectionString="My Connection String"
conn.Open
With cmd
.ActiveConnection = conn
.CommandType = adCmdText
.CommandText = "declare @tbl tbl insert into @tblvalues('fdsdf',15)"
.Execute
End With
Мой тип таблицы следующий:
CREATE TYPE [tbl] AS TABLE
(
myNO VARCHAR(10),
myVALUE FLOAT
)
Моя процедура выглядит следующим образом:
create procedure mydata
(
@tbl tbl readonly
)
as
select * into #tbl from @tbl
select * from #tbl
end
Теперь я хочу выполнить процедуру, взяв ввод этого @ tbl
With cmd
.ActiveConnection = conn
.CommandType = adCmdStoredProc
**param = .CreateParameter("@po", adUserDefined, adParamInput)
.Parameters("@po").Value = param**
.CommandText = "mydata"
Set rs = .Execute
End With
Пожалуйста, предположите, что я получаю ошибку в .Parameters ("@ po"). Значение =
Спасибо