Всем доброго времени суток.
работаю с акцессовой базой данных, прописываю connection string
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | procedure Tsites_form . FormCreate(Sender: TObject);
begin
sites_form . ADOConnection1 . Close;
sites_form . ADOConnection1 . ConnectionString:=
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;' +
'Data Source=' +extractfilepath(Application . ExeName)+ 'base\base.db' + ';' +
'Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";' +
'Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";' +
'Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;' +
'Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;' +
'Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;' +
'Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don' 't Copy Locale on Compact=False;' +
'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False' ;
sites_form . ADOConnection1 . open;
end ;
|
к базе успешно подключается, но при запуске возникает access violation at adress 00697632 бла бла бла read of adress 0000038C
Как его победить? Что я сделал не так?