|
Здравствуйте.
При использовании AxaptaCOMConnector из VBA столкнулся со следующими проблемами.
Option Explicit
Sub Test()
Dim Axapta As AxaptaCOMConnector.Axapta
Dim MyTable As AxaptaCOMConnector.IAxaptaRecord
Set Axapta = New AxaptaCOMConnector.Axapta
Axapta.Logon
'
Axapta.TTSBegin
Set MyTable = Axapta.CreateRecord("MyTable")
MyTable.Field("Text") = "Text"
' Если поле имеет тип String(Memo) - возникает ошибка "Invalid argument"
MyTable.Insert
Axapta.TTSCommit
'
Axapta.TTSBegin
Set MyTable = Axapta.CreateRecord("MyTable")
MyTable.ExecuteStmt "select * from %1"
MyTable.Delete
' Возникает ошибка "Запись не выбрана для обновления"
Axapta.TTSCommit
'
Axapta.Logoff
End Sub
Ax3.0 Sp3.
PS. Пока решил задачу используя методы таблицы...
|