درخواست کمک در مورد adotable

[ghafar.t.d]

سلام
چطور میشه adotable را طوری به بانک اطلاعاتی وصل کرد که وقتی برنامه را از روی سیستم روی یه سیستم دیگه می بریم جواب بده و بهم نریزه منظورم اینه که من با خاصیت connection string مربوط به Adotable وصلش می کنم به بانک اکسس ولی وقتی برنامه رو روی یه سیستم دیگه می برم جواب نمیده تا وقتی که دقیقا یه فولدر مشابه اونجایی که موقع طراحی ساخته شده بود براش طراحی کنم !!!!!!1

[szabeh]

در رویداد oncreat فرمی که کانکشن درآن است از کد زیر استفاده کن (کد نمونه است)

procedure TMain1.FormCreate(Sender: TObject);
Var
Dir : String;
begin
Try
Dir := ExtractFilePath(Application.ExeName);
ADOConnection1.ConnectionString :=
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+Dir+'sample.mdb'+';Persist Security Info=False';
ADOConnection1.Connected := True;
Except
MessageDlg('خطا در بارگذاری بانک اطلاعاتی',mtError,[mbok],0);
End;
end;

[ghafar.t.d]

با سلام
ممنون از اینکه راهنمایی کردید ولی من در مورد ADOTable می خوام این کد شما برای ADOConnection نوشته شده البته تغیرش دادم برای ADOTable ولی جواب نداد؟

[mzjahromi]

فرقی نمیکنه.
بالاخره AdoConnection داری یا نه
اگر نداری Connection String میخوای یا نه.
یه نگاه دقیق به کدهای فوق بیاندازید

[babak869]

دوست عزیز
طبق شکل زیر پس از انتخاب دیتابیس اضافه آدرس رو پاک کن تا فقط اسم دیتابیس باقی بمونه اونوقت برنامه رو هر جا و در هر فولدری اجرا کنی مشکلی پیش نمیاد

[baboozadeh]

آدرس رو بصورت relative بدین، اگر db توی فولدر برنامست آدرس رو sample.mdb بدید مثلا".

[ghafar.t.d]

با سلام
ممنون از راهنمایی شما مشکل حل شد...