مقدار cmShareExclusive را چگونه به Mode یک Adononection نصبت بدهیم
d.asle.Connected:=false;
d.asle.ConnectionString:='Provider=Microsoft.Jet.O LEDB.4.0;User ID=Admin;Data Source='+
pchar(open.FileName)
+';Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry
Path="";Jet OLEDB:Database Password=¶$‘ÂöøøòÑíÇá¡ËÂŽÅÃÜ«; Jet OLEDB:Engine Typ'+
'e=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';
d.asle.Mode:=cmShareExclusive;
d.asle.Connected:=false;
خوب لطفا بگید کجای این کد اشکال داره که نمی تونم بعد از تغییر بانک با دستور زیر مقدار Mode را تغییر بدم
d.asle.Mode:=cmShareExclusive;
هرکاری می کنم نمی تونم این مقدار را تغییر بدم و مقدار Mode برابر با cmShareDenyNone می شود و نمی توان این مقدار را تغییر داد و در نهایت فایل مزبور دوباره دیده می شه ( فایلی با علامت قفل و هم نام با فایل اکسس و با پسوند LDB )
