لدي برنامج قواعد بيانات وعملية الربط بواسطة الأداة Adodc
عند استعراض محتويات قاعدة البيانات في النموذج إذا غير المستخدم البيانات في الحقل يتم التغيير مباشرة في قاعدة البيانات
أنا أريد أن لا تحفظ التغييرات الا عند الضغط على زر حفظ التعديل
أرجوا المساعدة لو سمحتم
أرفقت المثال هناprogram.rar
=================================================================
[وسط]فَإِذَا عَزَمتَ فَتَوَكَّل عَلَى اللَّهِ إِنَّ اللَّهَ يُحِبُّ المُتَوَكِّلِينَ
=================================================================[/وسط]
مهم جداً
كلمات اتعبت الملائكة في كتابة الأجر فذهبوا وشكوا إلى ربهم .... ماذا يفعلون
فقال لهم سبحانه وتعالى اطووها بصحائفها وضعوها تحت عرشي فتبقى حسناتها إلى يوم القيامة الله اكبر
(( اللهم لك الحمد كما ينبغي لجلال وجهك وعظيم سلطانك))
لأنك تربط مربعات النص مباشرتاً مع آداة الـ Adodc ولكن يمكنك فصل مربعات النص عن الآداة وفعل ما ترغب فية كما يلي :
1- عرض قيمة من الآداة :
Text1.Text = Adodc1.Recordset("FieldName").Value2- إرسال قيمة :
Adodc1.Recordset("FieldName").Value = Text1.Textشكراً
لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي
ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك
أنت وتصرفاتك
ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه
اشد آلام ... فصمتي أنا عنوان
ارجو التوضيح اكثر
كلمات اتعبت الملائكة في كتابة الأجر فذهبوا وشكوا إلى ربهم .... ماذا يفعلون
فقال لهم سبحانه وتعالى اطووها بصحائفها وضعوها تحت عرشي فتبقى حسناتها إلى يوم القيامة الله اكبر
(( اللهم لك الحمد كما ينبغي لجلال وجهك وعظيم سلطانك))
اقتباسارجو التوضيح اكثر
بإختصار شديد ، أنت تربط الأدوات مع آداة الـ Adodc من خلال خاصية DataSource و DataField !!!
لا تستخدم هذه الخصائص !!!
مثال للتوضيح ، نفرض أنك تربط مع جدول يدعي Emp ، وهذا الجدول يحتوي علي حقول خاصة مثل رقم الموظف وإسم الموظف والنوع والراتب وتاريخ الميلاد وتاريخ التعيين و ..... الي آخرة
أربط طبيعي مع الجدول كما تشاء بإستخدام الآداة Adodc ومن ثم لا تربط ربط مباشر مع أدوات الإدخال مثل الـ TextBox و الـ ComboBox وغيرها !!!
ولكن في حالة عرض قيمة معينة يمكنك كما يلي :
Text1.Text = Adodc1.Recordset("رقم الموظف").Value
Text2.Text = Adodc1.Recordset("إسم الموظف").Value
Text3.Text = Adodc1.Recordset("النوع").Value
Text4.Text = Adodc1.Recordset("الراتب").Value
Text5.Text = Adodc1.Recordset("تاريخ الميلاد").Value
Text6.Text = Adodc1.Recordset("تاريخ التعيين").Valueوالكود السابق يستخدم لعرض حقول سجل محدد أثناء التنقل بين السجلات .
أما لإرسال قيم جديدة تتم بنفس الطريقة ولكن بالعكس !!!
Adodc1.Recordset("رقم الموظف").Value = Text1.Text
Adodc1.Recordset("إسم الموظف").Value = Text2.Text
Adodc1.Recordset("النوع").Value =Text3.Text
Adodc1.Recordset("الراتب").Value = Text4.Text
Adodc1.Recordset("تاريخ الميلاد").Value = Text5.Text
Adodc1.Recordset("تاريخ التعيين").Value = Text6.Textأبحث بالمنتدي ستجد العديد من الشروحات ، حيث أن هناك أدوات أفضل من آداة الـ Adodc
بالتوفيق
لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي
ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك
أنت وتصرفاتك
ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه
اشد آلام ... فصمتي أنا عنوان
الف شكر لك اخي
كلمات اتعبت الملائكة في كتابة الأجر فذهبوا وشكوا إلى ربهم .... ماذا يفعلون
فقال لهم سبحانه وتعالى اطووها بصحائفها وضعوها تحت عرشي فتبقى حسناتها إلى يوم القيامة الله اكبر
(( اللهم لك الحمد كما ينبغي لجلال وجهك وعظيم سلطانك))
الشكر الجزيل للاخوان MMA_EG_Cairo و layan على المرور
والشكر بصفة خاصة للأخ MMA_EG_Cairo على حل المشكلة (الله يبارك فيك وينفعنا بعلمك يالغالي)
=================================================================
[وسط]فَإِذَا عَزَمتَ فَتَوَكَّل عَلَى اللَّهِ إِنَّ اللَّهَ يُحِبُّ المُتَوَكِّلِينَ
=================================================================[/وسط]