كود بحث بالاسم ارجو مساعدتي :(

أختي الفاضلة فاطمة

السلام عليكم ورحمة الله وبركاتة

مرفق مشروعك بعد تنفيذ كود البحث عليه

VbFatmah_up.rar

أستاذ محمد .. شكرا شكرا شكرا ولو انها لاتفي بحقك : )

الفورم الثاني يبحث كما اردت بالتمام

لكن الفورم الثالث لايبحث .. لااعلم ماهي المشكله !

فضلا لا امرا هل ممكن انك ي استاذي  تنفذ كود البحث ع الفورم الثالث كما فعلت بالفورم الثاني ؟

أختي الفاضلة

لا شكر علي واجب

لا يوجد في المشروع المرفق فورم ثالث !!! الموجود بالمشروع فورم 1 وفورم 2 فقط

ارجو المراجعة

اعتذر استاذي منك .. فعلا في المرفق الذي وضعته لم اضع فيه الفورم الثالث : (

 اعدت انشاء مشروعي واضفت فورم ثالث ونسخت فيه كود البحث الذي وضعته انت في الفورم

الثاني مع بعض التغييرات لتناسب الفورم واشتغل معي بكل سهوله ..

لكن واجهتني مشكله اخرى وهو ( زر الديليت ) في الفورم الثاني والثالث ووظيفته حذف سجل او صف كامل مشار اليه داخل الداتا قريد

وقد كان سابقا يعمل معي ليست فيه مشكله ..

لكن الان عندما اختار سجل او صف لحذفه بدل من ان يحذف يقوم بالتكرار :  (

ارجو من يعرف حل هذه المشكله ان يساعدني

وهذا هو مشروعي 

أختي الفاضلة فاطمة

تم اصلاح عملية البحث في Form3

تم اصلاح زر الحذف في Form2 و Form3

مرفق المشروع

Fatmah2008.rar

شكرا جزيلا لك أستاذي ..

هناك مشكله صغيرة وقد كنت احاول في اليومين الماضيين حلها بنفسي وعدم ازعاجك مره جديده ي استاذي الفاضل

لكنني فشلت بحلها : (واعود لطلب مساعدتك مره اخرى ..

المشكله هي كالتالي :

( زر الديليت ) يحذف لي كل السجلات التي تكون بنفس السجل الذي اضع التحديد عليه ..

اريده ان يحذف لي فقط السجل الذي اضع المؤشر عليه حتى وان كان هناك نفس الاسم في سجلات اخرى

ارجو ان لااكون اثقلت عليك استاذي : )

وسؤال اخير النسخه اللي قمت بتحميلها للفيجوال بيسك 2010 نسخه مجانيه لمدة شهر وتنتهي بعد عدة ايام ..

هل سوف ينحذف مجلد برنامجي الموجود داخل هذا المسار D:\Fatmah2008\Fatmah2008\bin\Debug

ام سوف ينحذف فقط برنامج الفيجوال بيسك  ويبقى البرنامج الذي انشأته بااستطاعتي فتحه واستخدامه بااي وقت ؟

أختي الفاضلة فاطمة

السلام عليكم ورحمة الله وبركاتة

رمضان كريم وكل عام وأنت بخير

دعيني اوضح لك بعض الامور

من الطبيعي ان جملة الحذف تحذف كل ما هو متاشبه لانك لم تقومي بانشاء حقل مميز داخل قاعده البيانات لا تتكرر بياناته وتعتمدي عليه في جملة الحذف

لذلك قمت كما تشاهدين بالصورة المرفقة بعمل التالي

1-  قمت بعمل تعديل علي قاعده البيانات وانشئت حقل مميز لا تتكرر بياناته اسمة IDAuto وهذا الحقل نوع بياناته AutoNumber

بحيث لا تتكرر بياناته وفي نفس الوقت يقوم بحفظ ارقام تلقائية لكل سجل بدون تكرار وقد اسندت هذا الحقل لجملة الاستعلام الخاصة بالحذف بحيث اذا أردت حذف سجل بعينة بغض النظر ان كود

الموظف مكرر في سجل آخر يقوم بحذفة ولا يحذف السجل الاخر المسجل بنفس اسم الموظفز

2- قمت باضافة هذا الحقل في DataGridview وعندما تضغطين علي السجل المختار من DataGridview يظهر رقم السجل الغير مكرر في TextBox

3- أسندت جملة الاستعلام لهذا الحقل بحيث يعتمد عليه في عملية الحذف وهذه هي جملة الحذف بعد التعديل

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        cn.Open()

        Dim cmd As New OleDbCommand()
        cmd.CommandText = "DELETE FROM Tb1 WHERE IDAuto =?"

        cmd.Parameters.Add(New OleDb.OleDbParameter("@", TextBox1.Text))

        cmd.Connection = cn
        cmd.ExecuteNonQuery()
        cn.Close()

        MsgBox("DELET OK")

        ds.Clear()

    End Sub

مرفق المشروع بعد عمل التعديلات اللازمة عليه

بخصوص سؤالك الثاني

اقتباس

هل سوف ينحذف مجلد برنامجي الموجود داخل هذا المسار D:\Fatmah2008\Fatmah2008\bin\Debug

لا لن ينحذف ملف المشروع لكن ستنتهي فترة البرنامج التجريبية كأي برنامج له فترة محدده ويمكنك فتح المشروع في أي وقت آخر تقومي بتنصيب النسخة الاصلية أو باعاده تنصيب النسخة التجريبية مرة أخري لمده شهر اضافي 

بالتوفيق

Fatmah2008_up2.rar

جزاك الله كل خير استاذي .. كثر الله من امثالك

وافرج الله عنك كل الكرب كما افرجت كربتي

اشتغل معي البرنامج بشكل ممتاز واكثر من ممتاز ..

وكل الازرة تعمل بشكل جيد ..

لك شكري وامتناني ..ولن انساك من دعواتي : )

لا شكر علي واجب

ولاتنسينا من الدعاء