-
petvv (14.05.09 08:37) [0]Собственно как ???
Сделано так:
procedure TMainForm.FormCreate(Sender: TObject);
var
Ini: Tinifile;
begin
MainConnection.Connected:=false;
MainConnection.CleanupInstance();
MainConnection.ConnectionName := 'MSSQLConnection';
MainConnection.DriverName := 'MSSQL';
MainConnection.GetDriverFunc := 'getSQLDriverMSSQL';
MainConnection.LibraryName := 'dbxmss30.dll';
MainConnection.VendorLib := 'oledb';
with MainConnection do begin
ConnectionName := 'MSSQLConnection';
MainConnection.LoadParamsFromIniFile(extractfilepath(paramstr(0))+'PharmaCOM.ini');
end;
//***************************
MainConnection.Connected:=True;
AdvOfficeStatusBar1.DoubleBuffered := True;
if MainConnection.ConnectionState=csStateOpen then
AdvOfficeStatusBar1.Panels[0].Text:='Установлено соединение с БД';
AdvOfficeStatusBar1.Refresh;
end;
а собственно после
//***************************
MainConnection.Connected:=True;
получаю матангу -
petvv (14.05.09 08:38) [1]Вот INI файл:
[MSSQLConnection]
SchemaOverride = sa.dbo
ServerName = VLADIMIR\SQLSERVER
User_Name = sa
Password = xxxxxx
DBName = Main
BlobSize = -1
MSSQL TransIsolation = ReadCommited
OS Authentication = False
Prepare SQL = True -
petvv (14.05.09 09:01) [2]а ругается так:
'Cannot open file "E:\MainPr\PharmaCOM\MDIAPP.exe " Системе не удаётся найти указанный путь'. -
MainConnection.LibraryName := 'dbxmss30.dll';
А это что за драйвер такой? -
> 'Cannot open file "E:\MainPr\PharmaCOM\MDIAPP.exe " Системе не удаётся найти указанный путь'.
что то у меня сомнения, что подобную ошибку может выдавать коннект.
что будет если вместо LoadParamsFromIniFile внести параметры вручную непосредственно в параметры компонента и в дизайнтайме установить Connected в True?
и еще а почему для MSSQL не используется ADO? имхо, более естественный для него выбор. -
petvv (15.05.09 08:10) [5]Ну обшибся не *.ехе, а *.ini
-
Виталий Панасенко (15.05.09 09:24) [6]Может, и имя ошибочное?