COM коннектор на 4-й аксапте

[Serge Kutin]

Vot takoj primer est v oficialnom kurse MS (on, pravda na VB, no vpolne nagladny):

Dim company As String
Dim language As String
Dim objectServer As String
Dim configuration As String
Dim axapta1 As New Axapta
company = "dmo"
language = "en-us"
objectServer = "objectServerName"
configuration = "configurationName"
axapta1.Logon(company, language, objectServer,
configuration)

Mogu predpolozhit, chto vy ne mozhete zakonnectitsa iz-za togo chto ne ukazali ostalnye parametry - naprimer objectServer i configuration. Poprobujte peredat vse 4 parametra.

[Serge Kutin]

esli ne pomoget - poprobujte eshe zaloginitsia ot imeni Business Connector Proxy User:

Dim company As String
Dim language As String
Dim objectServer As String
Dim configuration As String
Dim axapta1 As Axapta
Dim bcProxyCredentials As New
NetworkCredential("proxyUsername","proxyPassword","domain")
Dim username As String
Dim domain As String
company = "dmo"
language = "en-us"
objectServer = "objectServerName"
configuration = "configurationName"
username = "proxyUsername"
domain = "domain"
axapta1.LogonAs(username, domain, bcProxyCredentials,
company, language, objectServer, configuration)

[cutter]

да всё оказалось гораздо проще, сработала вот какая конструкция
...
uses
SysUtils, ComObj, ActiveX;
var ax, ret: Variant;
begin
try
CoInitialize(nil);
ax:=CreateOleObject('AxaptaCOMConnector.Axapta3.1');
ax.Logon();
...
все параметры берутся из настроек клиента
спасибо за ответ