Axapta как объект COM

[laptev]

Axapta 3.0 без SP

Подскажите, please, как экспортировать данные из Excel в Аксапту.

Стандартными средствами импорт (через Группы определений) не получается - исходная таблица Excel сложной структуры (неизвестно число столбцов).

Реализован экспорт из Excel в 1С:
(Visual Basic)

Sub Macro()
Dim x As Object
Dim Заявка
Dim Res
Set x = CreateObject("v77s.application")
Res = x.Initialize(x.RMtrade, "De:\database\wholesaletrade", " ")
If Res = 0 Then
MsgBox ("Ошибка открытия 1С:Предприятия")
Else
Set Заявка = x.CreateObject("Документ.Заявка")
...

Как сделать то же в Аксапту?

Или лучше делать через буферный XML - файл?

[Антон Солдатов_imported]

Dim Axapta As Object
Dim MyRecord As Object
Set Axapta = CreateObject("AxaptaCOMConnector.Axapta")
Axapta.Logon "Admin", "", "", ""
Set MyRecord = Axapta.CreateRecord("MyTable")
MyRecord.InitValue
MyRecord.Field("Name") = "MyName"
MyRecord.Field("Address") = "MyAddress"
MyRecord.Insert

Аналогично с классами и прочими объектами системы.

Учтите, что перед этим необходимы некоторые административные шаги по регистрации/настройке COM коннектора. Как это делается, и где почитать - уверен, публиковалось на форуме и сайте Сергея уже неоднократно.

[laptev]

Спасибо, будем работать!