تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] يرجى المساعدة ضروري عداد وترقيم تلقائي
#1
Information 
مساء الخير اذا ممكن يا شباب انا عندي مشروع تخرج ومحتاج مساعدتكم


انا بعمل برنامج تسجيل طلاب مدرسة

وفي خانتين :
1 - الرقم المتسلسل : وانا بدي اياه يكوون تلقائي بمعنى المستخدم ما بدخلو هو لحاالو رح ييجي .. وما بدي اياه يكون رقم تلقائي بقاعدة البيانات

بمعنى بدي اذا كان اول سجل يكتب 1 ويخزنو بقاعدة البيانات ثم يقوم بزيادة قيمة 1 على الرقم فإذا اراد المستخدم او يخزن طالب آخر تلقائيا يظهر الرقم 2 وبالتالي يتسلسل الرقم .. وايضا اريد اذا تم حذف سجل يتم إعادة ترتيب الأرقام بالتسلسل أيضاااا .. بمعنى يكون رقم تلقائي ولكن في الفيجوال بيسك وليس في قاعدة البيانات

مثاااال : يتسلسل كالتالي :
1 احمد
2 خالد
3 علي
4 محمد


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

1 احمد
2 علي
3 محمد

بمعنى يتم إعادة ترتيب السجلات


***************************

2 - رقم التسجيل : ايضااا اريده ان يكون متسلسل ك الرقم السابق ولكن المختلف هنا اني اريده ان يبدأ العداد من الرقم 1001 ويتسلسل مع اضافة سجل جديد
1001
1002
1003
1004
...... إلخ

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


يرجى المساااعدة ضروري جدا لانو عندي مشروع تخرج ولازم اخلصه .. وآسف عالاطاالة

وهي صووورة توضح شاشة التسجيل
الرد
تم الشكر بواسطة:
#2
اخي الكريم تفضل كود الترقيم التلقائي  ...............

PHP كود :
sql "Select Top 1 Studentid From tblStudents Order BY Studentid DESC"
 
       ds = New DataSet
        da 
= New SqlDataAdapter(sqlconn)
 
       da.Fill(ds"tblStudents")
 
       dv = New DataView(ds.Tables("tblStudents"))

 
       If dv.Count 0 Then
            txtStudentid
.Text "1"
 
       Else
            txtStudentid
.Text = (Me.BindingContext(dv).Current("Studentid") + 1).ToString
        End 
If 

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

تحياتي ..........
..................  و فوق كل ذي علم عليم  ................
الرد
تم الشكر بواسطة:
#3
كود :
 If Sqlconn.State = ConnectionState.Open Then
           Sqlconn.Close()
       End If
       Sqlconn.Open()
       Dim da1 As New SqlDataAdapter(" select Top 1 ID from Fatora Order BY ID DESC   ", Sqlconn)
       Dim ds1 As New DataSet
       da1.Fill(ds1)
       TextB7.Text = ds1.Tables(0).Rows(0)(0) + 1
       Sqlconn.Close()
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ارجو المساعدة في crystal report 0theghost0 5 148 04-09-18, 12:01 AM
آخر رد: elgokr
  المساعدة في حل كود استعلام نور الهدى الهدى 24 488 19-08-18, 04:03 PM
آخر رد: elgokr
Photo [VB.NET] المساعدة - في جملة الاستعلام MOHAMED_AWAD 3 127 13-08-18, 08:15 PM
آخر رد: elgokr
  [كود] كود يجعل الكابتشا تعمل تلقائي في البرنامج gaber122 4 192 11-08-18, 01:34 AM
آخر رد: elgokr
Wink [سؤال] طلب كود يجعل الكابتشا تعمل في البرنامج تلقائي gaber122 3 107 10-08-18, 04:33 AM
آخر رد: sendbad100
  [VB.NET] فزعتكم يا شباب ضروري البرنامج مايتعرف على sql server 2014 0theghost0 2 108 22-07-18, 12:50 PM
آخر رد: 0theghost0
  [سؤال] المساعدة بتقرير ReportViewer maram2423 1 117 02-07-18, 03:51 PM
آخر رد: Amir_Alzubidy
Heart [سؤال] المرجو المساعدة من طرف خبراء برنامج visual basic studio shem3a 1 129 28-06-18, 07:52 AM
آخر رد: elgokr
  بحث عن ملف بصيغة معينة في الجهاز و تشغيله تلقائي YousefOkasha 0 110 25-06-18, 09:35 PM
آخر رد: YousefOkasha
  طريقة عمل عداد لمستخدمين البرنامج YousefOkasha 17 530 22-06-18, 03:35 PM
آخر رد: elgokr

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم