رجاء المساعده فى برنامج

استبدل سطر الاضافة بهذا السطر 

 cmdinsert.CommandText = " insert into la (nam,ad,age,tl) values ('" + TextBox1.Text + "','" + TextBox2.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "')"

استبدل جملة البحث بالكود :

   cmdselect.CommandText = "select * from la where nam Like '%" & TextBox1.Text & "%'"

الملف بعد التعديل دكتور.zip

الف شكر اخى العزيز ربنا يبارك فيك

اشتغل تمام

فيه مشكله هى ان زر اضافه ممكن ان يضيف رغم عدم وجود بيانات فى text  وتبقى فى الجدول فارغه

اكتب هذا الكود قبل الاجراء في زر الاضافة أو شيء قبل تنفيذ امر الاضافة للتأكد من وجود بيانات من عدمه ,,

AbuHazem.vb2012 كتب:

 

اكتب هذا الكود قبل الاجراء في زر الاضافة أو شيء قبل تنفيذ امر الاضافة للتأكد من وجود بيانات من عدمه ,,

 

If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Or TextBox4.Text = "" Then

            MsgBox("حقول اجبارية ... يلزم ادخال بيانات", MsgBoxStyle.Exclamation, "تنبيه")

            Exit Sub

        End If

 

يالتيت تبحث عن هذه المواضيع في المنتدى فهي كثيرة جدا .. وهناك مشاريع وأمثلة تفيدك ..

 .اي خدمة حاضرين ...

 

الله يبارك فيك اخى  ابو حازم  على اهتمامك وتجاوبك السريع

 جربت الكود  الله ينور عليك  اشتغل تمام 

اخى العزيز مجال البرمجه من وجهه نظرى صعب جدا ولا يمكن الخوض فيه بدون مساعده  -انا ابحث من سنه تقريبا على المنتديات وشاهدت فيديوهات -مثلا تجد عده طرق لربط قواعد البيانات

تجد عده طرق لكتابه الكود فهذا لى كمبتدأ صعب جدا

نرجع الى البرنامج

عند اضافه (nmnm) تم التخزين  وعن البحث عن اسم (nm) وعمل بحث بدل ما تظهر رساله عبر موجود  ظهرت الحقول امامى (nmnm)

يعنى لا يبحث بالكلمه كامله انما بحرف او حرفين من الكلمه