تقييم الموضوع :
  • 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()
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارجوا المساعدة في برنامج محاسبة فيجوال بيسك 2008 محمد بوقزاحة 4 92 13-01-17, 12:56 AM
آخر رد: مساعدة
  [VB.NET] المساعدة في الاكواد لبرنامج انتي فايرس 0theghost0 6 107 11-01-17, 11:08 PM
آخر رد: 0theghost0
  [VB.NET] الرجاء المساعدة noway 2 82 10-01-17, 09:28 AM
آخر رد: thevirus
  [VB.NET] لدي فكرة مشروع لمن يريد المساعدة فاليتفضل 0theghost0 10 264 05-01-17, 05:15 PM
آخر رد: 0theghost0
  طباعة صورة PictureBox1 بعرض الصفحة .. أرجو المساعدة ahmed_elwerfalli 3 134 24-12-16, 05:59 PM
آخر رد: ahmed_elwerfalli
  ضروري سؤال حول ملف Flash.ocx adel27 2 103 11-12-16, 02:04 AM
آخر رد: adel27
Thumbs Up برنامج إدارة الجمعيات الخيرية مفتوح المصدر... الرجاء المساعدة Arabia 46 1,802 11-12-16, 12:57 AM
آخر رد: tryold
  [VB.NET] يرجى التعديل على هذا الكود dubai.eig 1 81 10-12-16, 12:18 PM
آخر رد: dubai.eig
  ارجو المساعدة في كود VB.NET 7 151 16-11-16, 03:20 AM
آخر رد: أبو عمر
Rainbow [نقاش] [VB.NET] جعل المشروع يعمل تلقائي nabil-maher 4 202 05-11-16, 02:32 AM
آخر رد: الماجيك مسعد

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


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