easyDelphi Q&A
0 تصويتات
72 مشاهدات
السلام عليكم
أحاول الاضافة في جدولين مربوطين معا يحتوي أحدهما على مفتاح رئيسي و الاخر على أجنبي و بطبيعة الحال لا يمكن الاضافة في الثاني حتى تكون القيمة أصلا موجودة في جدول المفتاح الرئيسي
استعملت الكود التالي

with ADOQuery1 do

begin

Active := False;

SQL.Clear;

SQL.Add('INSERT INTO Apprenti (Nbr_insc) VALUES (''+ sEdit3.Text + '')') ;

SQL.Add('INSERT INTO Intgration (Nbr_insc) VALUES (''+ sEdit3.Text + '')') ;

 ExecSQL;

  end;

 end;
سُئل في تصنيف vcl بواسطة (1,350 نقاط) | 72 مشاهدات
 

1 إجابة واحدة

+2 تصويتات
ساعطيك فكرة بسيطة اولا عليك باضافة المفتاح الرئيسي  تم غلق الاتصال و عمل تحديت لقاعدة البيانات تم اضافة المفتاح التانوني
تم الرد عليه بواسطة (6,450 نقاط)
وجدت الحل ربي يحفضك
with ADOQuery1 do
begin
Active := False;
SQL.Clear;
SQL.Add('INSERT INTO Apprenti (Nbr_insc) VALUES ('''+ sEdit3.text + ''')');
SQL.Add('INSERT INTO Intgration (Nbr_insc,Nbr_Intg,Nbr_Semtr_Intg) VALUES (''' + sEdit3.Text + ''','''+ sedit2.Text + ''',''' + sEdit5.Text + ''')');
ExecSQL;
Active := False;
SQL.Clear;
SQL.Add('select * from Intgration ');
ADOQuery1.Open;
end;
ممكنق فكرة عن كيفية الحذف في هذه الحالة
"غلق الاتصال و عمل تحديت لقاعدة البيانات " هذا خطأ، ليش عليك عمل اي شيء طالما انت تعمل ضمن transaction واحد
مزيد من التوضح استاذ ربي يحفضك
كل  العمليات التي تقع في ترانساكشن واحد تستطيع أن ترى نتائج بعضها البعض دون الحاجة لاجراء خاص، معناها هنالك مشكلة اخرى يجب حلها.

قم فتح الترانساكشن Transaction قبل العمليات المتعددة، و عند الانتهاء منها كلا قم بعمل commit
ليس لدي خبرة بال ADO ، كنت وضعتها اجابة.
المهم اعطيتنا فكرة  و طرف الخيط ربي يحفضك استاذنا مشكور

اسئلة متعلقة

0 تصويتات
1 إجابة
سُئل أغسطس 31، 2018 في تصنيف vcl بواسطة Yamada Fakir (1,350 نقاط) | 66 مشاهدات
+2 تصويتات
1 إجابة
0 تصويتات
0 إجابة
سُئل منذ 7 ساعات في تصنيف vcl بواسطة Djamal Med (290 نقاط) | 7 مشاهدات
+2 تصويتات
2 إجابة
سُئل سبتمبر 1، 2018 في تصنيف vcl بواسطة Yamada Fakir (1,350 نقاط) | 60 مشاهدات
+3 تصويتات
1 إجابة
سُئل أغسطس 13، 2018 في تصنيف vcl بواسطة bravesofts (14,220 نقاط) | 55 مشاهدات
ادعُ اصدقائك في الفايسبوك لمشاركتك
Comodo SSL

مرحبًا بك إلى EasyDelphi Q&A، حيث يمكنك طرح الأسئلة والحصول على الإجابة عليها من المستخدمين الآخرين.

لا يسمح بطلب او السؤال عن كراك او تفعيل او كسر او فك او اي شيء يخالف اتفاقيات الترخيص  مهما كان السبب ومهما كان البرنامج ونوعه. ولا حتى نشر روابط تحتوي على مثل هذه الاشياء لا في الاسئلة ولا في الاجابات ولا التعليقات . نهائيا

307 سؤال
512 إجابة
894 تعليق
214 مستخدم