delphi4arab منتديات دلفي للعرب
حل مشكلة هذه اللافتة - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : حل مشكلة هذه اللافتة (/showthread.php?tid=12456)

الصفحات: 1 2


RE: حل مشكلة هذه اللافتة - Ndagor - 25-11-2023

إقتباس :L'opération doit utiliser une requête qui peut être mise à jour

في النت هناك عشرات الاجابات على السؤال
هذه الرسالة من الاكسيس هناك خطا في كتابة sql  ربما بسبب استعمال join


RE: حل مشكلة هذه اللافتة - ahmedhossin - 25-11-2023

(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


RE: حل مشكلة هذه اللافتة - Delphi2020 - 25-11-2023

امسح الاثنين .