الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مشكلة في تحديث ألبيانات ؟؟؟

مغلق
بدأه مبرمجة4 في 9 يونيو 2007 · 4 رد · 707 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم..

أنا أعمل حاليا على مشروع تخرج ويحتوي هذا المشروع على 4 أزرار للتنقل بين السجلات وlabel يعرض رقم السجل الحالي

ويحتوي أيضا على 3 أزرارللمسح والإضافة والتحديث ..

إن ما أريده هو عند النقر على زر تحديث يقوم بتحديث البيانات في قاعدة ألبيانات ويعرض رقم السجل ألجديد في label عرض السجل الحالي

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

ولكن عند إغلاق التشغيل وإعادة تشغيل النموذج مرة أخرى كل شيئ تمام ...

وهذا مثال مرفق للمشكلة

إذا ممكن تقولو لي شغلي صح ولا توجد فيه بعض ألأخطاء..من فضلكم أفيدوني

لم أعرف ارفق المثال إلا في صفحة ألمفكرة

قمت بعمل الاتصال بقاعدة بيانات النورثويند عن طريق المعالج

علما بأن المثال على الsql server2000

____________.txt

تم تعديل هذه المشاركة بواسطة مبرمجة4 في 9 يونيو 2007 في 02:48

#2

السلام عليكم

زر التحديث والمشكلة توجد هنا

	  TextBox1.Update()
 TextBox2.Update()

هذا الكود لا يقوم بتحديث البيانات , وانما يقوم بإعادة رسم العنصرين TextBox 1 2

قومي بإستخدام السلوك update التابع للعنصر

Dim dp As SqlClient.SqlDataAdapter

مثلاً

dp.Update(ds,"TableName")

ولا حاجة لفتح الاتصال أو غلاقة ... conn.Open()

في المثال يتضح المقال

#3

ألسلام عليكم ..

جزاك الله خيراً على ردك .. راح أجربه

مشكووووووور وماتقصر أخوي

#4

السلام عليكم أخي ألفاضل عندما كتبت ألكود ألسابق ظهر لي خطأ

يظهر لي خط باللون الاصفر على الجملة التالية

 dp.Update(ds,"TableName")

وما تتحدث البيانات .. مامعنى هذ الخط الاصفر

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

فمثلا عندما أكتب محمد يخزن في القاعدة على شكل ؟؟؟؟

أتمنى ترد على إستفساراتي بأسرع وقت ممكن من فضلك

تم تعديل هذه المشاركة بواسطة مبرمجة4 في 9 يونيو 2007 في 18:35

#5

ممكن أنك تختصر الكود في Form_Load إلى

	Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

		Dim dp As New SqlClient.SqlDataAdapter(str, conn)
		dp.Fill(ds, "Region")

		TextBox1.DataBindings.Add("Text", ds, "Region.RegionID")
		TextBox2.DataBindings.Add("Text", ds, "Region.RegionDescription")

	End Sub

لأنك عند استخدام DataAdapter لا تحتاج إلى فتح و غلق اللإتصال ...

وأيضا ربط TextBox ب ds عن طريق DataBinding يغنيك عن تحديد سجل ما بالطريقة التقليدية فيمكنك الإنتقال بين السجلات عن طريق

Me.BindingContext(ds,"Region").Position = 0 ويمكنك تغيير 0 برقم السجل الدي تريد إظهاره في Textbox ...

مقالاتي في VB.NET وبرامجي على موقعي الجديد :

هذا الموضوع مغلق.

مواضيع مشابهة