На сервере есть табличка с полями:
Photo - Image
FIO - varchar

Есть процедура с параметрами Image и varchar.

Нужно записывать данные в таблицу посредством этой процедуры из MS Word.
Пробую для примера так:
...
Dim Data() As Byte
Dim size As ADODB.ADO_LONGPTR
Open "E:\n2.jpg" For Binary As #1
size = LOF(1) - 1
ReDim Data(LOF(1) - 1)
Get #1, , Data
Close #1
Dim con As New ADODB.Connection
Dim com As New ADODB.Command
con.Open "..."
com.ActiveConnection = con
com.CommandType = adCmdStoredProc
com.CommandText = "InsPhoto"
*com.Parameters.Append com.CreateParameter("ph", adLongVarBinary, adParamInput, size, Data)
com.Parameters.Append com.CreateParameter("nm", adVarChar, adParamInput, Len("Ivanov"), "Ivanov")
com.Execute
con.Close
...
Строчка помеченная * вызывает ошибку: Application uses a value of the wrong type for the current operation.
И ни в какую.
В чем может быть дело?