كيف أحدد مسار قاعدة البيانات ADOConnection

[nebchadelphi]

كيف أحدد مسار قاعدة البيانات برمجيا ADOConnection
بحيث عند بدء تشغيل البرنامج تسند ل ADOConnection قيمة بها مكان قاعدة البيانات
مثلا: ExtractFilepath(application.ExeName)+'data\data1.mdb'
بحيث:
ExtractFilepath(application.ExeName) هو مسار ملف التنفيذ للبرنامج
'data\data1.mdb' هي قاعدة البيانات في المجلد data

[Najy Ibraheem]

السلام عليكم...

يمكنك ذلك عند ضبط الخاصية ConnectionStrin، مثلاً:

كود :

ADOConnection1.Close; ADOConnection1.ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + IncludeTrailingBackslas(ExtractFilepath(Application.ExeName)) + 'data\data1.mdb;Persist Security Info=False'; ADOConnection1.Open;

نرجو الاستفادة و السلام.

[nebchadelphi]

السلام عليكم
لم تجدي نفعا، هل هناك طريقة اخرى
شكرا والسلام

[aissa35]

العبارة السابقة صحيحة
أضف المعلوملت المتعلقة بالجدول
adotable1.connection:=adoconnection1;
adotable1.tablename:=nom_table;
adotable1.active:=true;