Доступ к SQL Server из Axapta

[gershun]

Часто необходимо организовать взаимодействие Axapta и других программ, хранящих свою информацию в MS SQL Server. Ниже приведен пример того, как можно обращатся к базе данных из системы. Дополнительную информацию можно посмотреть в документации по MS SQL Server.

Программа читает табличку из базу Northwind и показывает ее на экране в infolog.

PHP код:

void clicked()
{
    COM cn = new COM("ADODB.Connection");
    COM rs = new COM("ADODB.Recordset");
    COM flds;
    COM fld;
    COMVariant cv1,cv2;
    ;
    cn.Provider("sqloledb");
    cn.Open("DSN=BMSDSM;DATABASE=Northwind;Trusted_Connection=Yes");

    rs.Open("SELECT * FROM Customers",cn);

    rs.MoveFirst();

    while(!rs.eof()) {
        flds = rs.Fields();
        fld = flds.Item("CustomerId");
        cv1 = fld.Value();
        fld = flds.Item("CompanyName");
        cv2 = fld.Value();

        info(cv1.bStr()+" - "+cv2.bStr());

        rs.MoveNext();
    }

    super();
}