moshkel dar bargharary ertebat ba bank access

[sm_razavi]

ba salam
man barname'ee neveshteam ba delphi6 ke databaseam ra access2000 entekhab kardeham
baraye amniate dadeha rooye file .mdb password az menue tools\security\setpassword dar access gozashteam.
hala baraye ertebat ba in database ehtiaj daram ta dar evente 'before open' dar adodatabase be noee passworde bank vared shavad lotfan mara rahnamaee konid
mamnoon

[vcldeveloper]

از چه کنترلهایی استفاده می کنید ADO یا BDE ؟

بهتره از ADO استفاده کنید. اگر از ADOConnection استفاده کنید با دوبار کلیک بر روی اون یه پنجره برای ارتباط با بانک اطلاعاتی باز میشه. توی صفحه اول درایور رو Microsoft Jet OleDB 4.0 انتخاب کنید. در صفحه دوم هم مسیر بانک و usernameو password پرسیده میشه.

اگر فقط از ADOTable یا ADOQuery استفاده می کنید می تونید با استفاده از خاصیت Connection String به همون پنجره ذکر شده در بالا دسترسی پیدا کنید.

در کل باید Connection String یه چیزی مثل این باشه :


ADOTable1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;' +
'User ID=Your Username;' +
'Data Source=' Your Database File;' +
'Mode=Share Deny None;' +
'Extended Properties="";' +
'Jet OLEDB:System database="";' +
'Jet OLEDB:Registry Path="";' +
'Jet OLEDB:Database Password="Your 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="Your Password for New Databases";' +
'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';


البته تمامی خطوط بالا الزامی نیست و ممکنه بعضی از تنظیمات شما با کد بالا فرق داشته باشه. اما محل Username و Password کاملا مشخصه

[Delphi-Clinic]

دوست من فارسی بنویس.
دفعه دیگه پستت رو پاک می کنم. :)