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

حــدث اللود لصفحة نموذج تعببئه البيانات

طبعاً في هذا الفورم يوجد تكست بكس تستقبل قيم من المستخدم الأسم - رقم الهويه -وإلى أخــره من ضمنها TextBox1.Text  وهذا التكست عبـاره عن أسم الملف  له شرط وشرطه موجود بالأسفل مفعل فيه خاصيه أنيبل = ترو   
هنـا كود تحميل الجدول داخل الدتا قريد فـيو

+
 Dim max As Integer
 For i As Integer = 0 To ds.Tables("All_Data").Rows.Count - 1

                If ds.Tables("All_Data").Rows(i).Item("ID") > max Then
                    max = ds.Tables("All_Data").Rows(i).Item("ID")
                End If
            Next
           ( TextBox1.Text = CStr(max + 1

هذا الكود يضع لي في  TEXTBOX1.TEXT   رقم ID اللي راح يتسجل فيه هذا الشخص 

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

أنـا أبيه إذا فتح مستخدم نموذج تعبئة البيانات يعطيه رقم بس ما يكرره عن مستخدم أخر 

الطريقه الثانيه أكيد بدون

ولكن كيف أظهرها داخل التسكست بكس 1

---

طبقت المثال عطاني رقم 1 وهي قيمة خطأئه

سهل للغايه 
لكن النتيجه 1 

أنا أبحث عن كود بداية تحميل الفورم يضع في التكست بكس 1 رقم ID الخاص السجل نفسه 
بحيث أنه إذا شخص أخر فتح البرنامج وجاء يدخل البيانات يعطيه رقم غير الرقم اللي أخذه المستخدم الأول 

جرب هذا
TextBox1.text = ds.Tables("All_Data").Rows.Count+1

استخدم كود للتأكد من الرقم هل هو موجود ام لا .. قبل عملية الحفظ , فاذا كان موجوداً قم باضافة 1 والبحث من جديد.

(03-11-15, 03:15 PM)silverlight كتب : [ -> ]

كود :

       Dim i As Integer = 0
       Dim max As Integer = 100
       While i < max
           TextBox1.Text = CStr(i)
           i += 1
       End While

خطأ عطاني 99 والمفروض يعطيني 22

---

(03-11-15, 03:47 PM)HASAN6.0 كتب : [ -> ]جرب هذا
TextBox1.text = ds.Tables("All_Data").Rows.Count+1

استخدم كود للتأكد من الرقم هل هو موجود ام لا .. قبل عملية الحفظ , فاذا كان موجوداً قم باضافة 1 والبحث من جديد.

خطأ أيضاُ 

(03-11-15, 03:51 PM)adel27 كتب : [ -> ]خطأ أيضاُ 

اذا ممكن ترفق المشروع او فورم مبسط حتى تكون عمليه فهم المطلوب اسهل ...

لماذا اخذت الكود و نفذته كما هو .........المفروض يا اخي إن قيمة max تعبر عن اخر رقم في الجدول عندك

الأن قاعدة البيانات مدرج داخلها 21 سجل

أريد إذا المستخدم الأول فتح الفورم يظهر له في التسكست بكس 22 
وإذا مستخدم أخر فتح الفورم في نفس الوقت ويظهر له رقم 23 





هذا الرقم هو عبـاره عن الترقيم التلقائي داخل قاعدة البيانات سكيول سيرفر أسم العمود ID

---

أنا مابي أحدد أن أخر قيمه = كذا 
لأني بقدم قاعدة البيانات فارغه وأول صف راح يكون 1

(03-11-15, 04:02 PM)khodor1985 كتب : [ -> ]أخي العزيز قبل أن ننهي مشكلتك أعتقد أنك طلبت في إحدى المشاركات إجراء نسخة إحتياطية لقاعدة البيانات أرجو منك أخي العزيز أن تتعرف جيدا على بيئة Sql لأن كثير من الأمور سوف تصبح سهلة وطيعة بين يديك

أنشــاء الله شاكر لك أهتمامك ياغالي 

الفكره يا أخواني بسيطه هي أن تكست أسم الملف تأخذ قيمة ID 
أي بمعنى 

أن هذا الشخص الذي يتم تسجيله رقمه التسلسلي 21 هذا الرقم يظهر داخل التكست عند حدث اللود 
بحيث أن لو شخص أخر فتح الفورم بعد بثانيه واحده يظهر له رقم 22 هذه الفكره بكل بساطه 


داخل قاعدة البيانات 
بحيث أن عمود ID  وعمود  Malf  يأخذان نفس القيمه 1-1 2-2-3-3-4-4-5-5 ..... إلى أخره