|
21.02.2006, 18:04 | #1 |
Участник
|
Можно попробовать черезКласс / SysAnyType и parmObject
|
|
21.02.2006, 19:34 | #2 |
Участник
|
Сделал так:
1. Создал класс в аксапте qqq_CreateSale,
2. Код: Dim ax As Axapta Dim salestable As Variant Dim Container As IAxaptaContainer Set ax = CreateObject("AxaptaCOMConnector.Axapta") ax.Logon "myuser", "", "", "Myconfiguration" Set Container = ax.CreateContainer Container.Append "Element1", 2, 3.3 Set qqq_CreateSales = ax.CreateObject("qqq_CreateSales", Container) qqq_CreateSales.Call "CreateSale" ax.Logoff qqq_CreateSales = nothing ax = nothing |
|