حل مشكلة هذه اللافتة
#11
إقتباس :L'opération doit utiliser une requête qui peut être mise à jour

في النت هناك عشرات الاجابات على السؤال
هذه الرسالة من الاكسيس هناك خطا في كتابة sql  ربما بسبب استعمال join
الرد
#12
(25-11-2023, 10:10 AM)Delphi2020 كتب :
(25-11-2023, 08:52 AM)ahmedhossin كتب :
(24-11-2023, 09:19 PM)DAMOCLES كتب : - السواقة C لا تسمح لك في انجاز كل مهام تطبيقك الا اذا كان عنده صلاحيات المسؤول...
- ADOConnection تحتوي على مسار قاعدة البيانات، اكتبه كاملا هنا من فضلك...

مسار ado connecte  
هو E:\chahdat\ch.mdb

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\chahdat\ch.mdb;Persist Security Info=False

السلام عليكم ورحمة الله وبركاته ،
المشكلة في تحديد مسار قاعدة البيانات،
كما ترى : داخل البرنامج أنت حددت المسار التالي : E:\chahdat\ch.mdb 
و عند الزبون تريد أن تثبت البرنامج في القرص الصلب C: ،
مما يسبب مشكلة في الوصول إلى  قاعدة البيانات.
الحل بسيطط أخي الحبيب ،
كل ما عليك هو أن تجعل المسار يتحدد أوتوماتيكيا في اي قرص و داخل اي مجلد.
كل ما عليك فعله هو كالآتي :
1- في بيئة البرمجة دلفي ،
2 - قم بغلق الاتصال بقاعدة البيانات،
3-قم بمسح كامل المسار الموجود في ال ADOConnection.

4- في الحدث OnCreate للفورم الرئيسي ، قم بكتابة الكود التالي :
PHP كود :
Var cheminApplication : string ;
cheminApplication := ExtractFilePath(Application.ExeName);
  ADOConnection1.Close;
  ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ cheminApplication +'ch.mdb;Persist Security Info=False';
ADOConnection1.Connected := True; 

بالتوفيق أخي الحبيب.
اخي جزاك الله خيرا و حفظك على المعلومة الرائعة و نسأل الله لك الصحة و العافية فقط  رقم 03 قم بمسح كامل المسار الموجود في ADOCONNECTION 
الصورة مرفقة Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=E:\chahdat\ch.mdb;Mode=Share Deny None;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBBig Grinatabase Password="";Jet OLEDB:Engine Type=5;Jet OLEDBBig Grinatabase 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 OLEDBBig Grinon't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False;
  أم هذا المسار الصورة الثانية E:\chahdat\ch.mdb


الملفات المرفقة
.png   1.png (الحجم : 7.07 ك ب / التحميلات : 7)
.png   2.png (الحجم : 13.93 ك ب / التحميلات : 3)
[-] كل من 1 user says قال شكرا ل ahmedhossin على المشاركة المفيدة
  • Delphi2020
الرد
#13
امسح الاثنين .
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم