Показать сообщение отдельно
Старый 01.04.2005, 13:26   #4  
mne2001 is offline
mne2001
Участник
 
29 / 10 (1) +
Регистрация: 10.08.2004
у меня вот так работает:
COM _application;
COM _report;
COM _RecordSet;
COM _Database;
COM _DatabaseTables;
COM _DatabaseTable;
COM _CProperties;
SysSQLsystemInfo _SysSQLsystemInfo=new SysSQLsystemInfo();
;
_application = new COM("CrystalRuntime.Application");
_report = new COM("CrystalRuntime.Report");
_report = _application.OpenReport(_nameReport, 1);

_Database =_report.database();
_DatabaseTables= _Database.tables();
_DatabaseTable=_DatabaseTables.item(1);

_CProperties=_DatabaseTable.ConnectionProperties();
_DatabaseTable.DllName("crdb_ado.dll");
_SysSQLsystemInfo.init();

_CProperties.DeleteAll();
_CProperties.Add("Provider", "SQLOLEDB.1");
_CProperties.Add("Data Source", _SysSQLsystemInfo.getLoginServer());
_CProperties.Add("Initial Catalog", _SysSQLsystemInfo.getloginDatabase());
_CProperties.Add("User ID", _SysSQLsystemInfo.getLoginName());
_CProperties.Add("Password", "пароль");