منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

صالح الشنطى كتب :

[COLOR="#0000FF"]شكرا يااستاذى
طبقت الكود ولكنة
لا يعطنى خطاء ..وكذلك لا يقبل التغيير
عفوا مذا تقضد بزر الاتصال[/COLOR]

السلام عليكم

المقصود بزر الاتصال هي فتح الاصال مع قاعدة البيانات

انا قصدي ان تجعل الاتصال في button و التعديل الذي قلته لك في button اخر وجرب

بالتوفيق ان شاءالله

السيد الفاضل امجد
كيف يمكن تعديل الفاعدة بجيث يتم زيادة حقل معين بقيمة عمود في الجريد

كتبت هذا الكود لكن النتيجة لا تكون صحيحة

For i = 0 To Me.Grid.Rows.Count - 1
Dim cmd As New OleDbCommand("update mytable set group1=group1 + @g where ser='100'", dbconnection)
cmd.Parameters.Clear()
cmd.Parameters.Add("@g", OleDbType.Integer).Value = CInt(Me.Grid.Rows(i).Cells(0).Value)
cmd.ExecuteNonQuery()
Next

مثال بالمطلوب

sajad كتب :السلام عليكم

المقصود بزر الاتصال هي فتح الاصال مع قاعدة البيانات

انا قصدي ان تجعل الاتصال في button و التعديل الذي قلته لك في button اخر وجرب

بالتوفيق ان شاءالله

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

amgadtamer كتب :مرفق مثال للتوضيح

بارك الله فيك يااخى امجد
المثال المرفق فعلا ادى الغرض المطلوب
ولكى تعم الفائدة على الجميع ساحاول شرح المثال

شكرا علي سرعة الاسنجابة