تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مستعجل بخصوص ارقام جلوس للطلاب
#1
اريد كود ادراج ارقام الجلوس في جدول الطلاب البالغ عددهم 250 طالب في قاعدة بيانات يبداء برقم محدد
اسم الجدول : student
حقل الرقم : stu_id
حقل الاسم: stu_nam
حقل رقم الجلوس :glose
ياريت اجابه مستعجله
الرد
تم الشكر بواسطة:
#2
(26-10-21, 04:00 PM)malik98 كتب : اريد كود ادراج ارقام الجلوس في جدول الطلاب البالغ عددهم 250 طالب في قاعدة بيانات يبداء برقم محدد
اسم الجدول : student
حقل الرقم : stu_id
حقل الاسم: stu_nam
حقل رقم الجلوس :glose
ياريت اجابه مستعجله

هل اجد اجابة لسؤالي يارواد الفيجوال بيسك
الرد
تم الشكر بواسطة:
#3
السلام عليكم و رحمة الله و بركاته
أخي الكريم 
أي كود حفظ بأي ملف مفتوح بقسم الأمثلة سوف يفي بالغرض إن شاء الله
تحياتي
مجموعتنا على الفايسبوك
الرد
تم الشكر بواسطة:
#4
(27-10-21, 02:06 AM)عبد العزيز البسكري كتب :
السلام عليكم و رحمة الله و بركاته
أخي الكريم 
أي كود حفظ بأي ملف مفتوح بقسم الأمثلة سوف يفي بالغرض إن شاء الله
تحياتي

كود الحفظ واضح عندي
لكن المطلوب هو كيف انشاء وادراج ارقام الجلوس مرة واحدة لكل الطلاب بارقام متسلسلة يبدء من اول طالب برقم ١٠ كمثال  الى ٠٠٠٠ اخر طالب في  الجدول
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#5
خذها مني كنصيحة 
أشتغل بالتعليم منذ أكثر من 25 سنة 
عمرك و لا تعمل أرقام الجلوس تلقائيا بالكود يجب كتابتها يدويا
هذا رقم جلوس يعني رقم تسجيل .. و أثناء التصحيح أو بما يسمى عملية الإغفال يتم حذف كل البيانات الخاصة بالمترشح و يحتفظون فقط برقم الجلوس و على أساسه يتم القبول أو الرسوب
المركز الواحد صحيح يبدأ برقم معين و يتم تسلسل باقي المترشحين على أساس الرقم الأولاني
لكن ببعض الأحيان و ببعض الحالات كانسحاب مترشح أو حتى وفاته يتم تخطي الترقيم التسلسلي لهذا المترشح
إذن طريقة كيف ستكون ؟
الكود سيكون كالتالي :
إذا كان جدول المترشحين فارغا من البيانات .. أكتب رقم التسجيل الأول المسجل لديك و الباقي مثلما ذكرت لك يدويا أو بإضافة + 1 لرقم التسجيل الأول مع التفكير بما ذكرته لك من مخاطرة بمستقبل الكثيرين
تحياتي
مجموعتنا على الفايسبوك
الرد
تم الشكر بواسطة: أشرف كريم 2
#6
(27-10-21, 01:11 PM)عبد العزيز البسكري كتب :
خذها مني كنصيحة 
أشتغل بالتعليم منذ أكثر من 25 سنة 
عمرك و لا تعمل أرقام الجلوس تلقائيا بالكود يجب كتابتها يدويا
هذا رقم جلوس يعني رقم تسجيل .. و أثناء التصحيح أو بما يسمى عملية الإغفال يتم حذف كل البيانات الخاصة بالمترشح و يحتفظون فقط برقم الجلوس و على أساسه يتم القبول أو الرسوب
المركز الواحد صحيح يبدأ برقم معين و يتم تسلسل باقي المترشحين على أساس الرقم الأولاني
لكن ببعض الأحيان و ببعض الحالات كانسحاب مترشح أو حتى وفاته يتم تخطي الترقيم التسلسلي لهذا المترشح
إذن طريقة كيف ستكون ؟
الكود سيكون كالتالي :
إذا كان جدول المترشحين فارغا من البيانات .. أكتب رقم التسجيل الأول المسجل لديك و الباقي مثلما ذكرت لك يدويا أو بإضافة + 1 لرقم التسجيل الأول مع التفكير بما ذكرته لك من مخاطرة بمستقبل الكثيرين
تحياتي
اشكرك اخي عبدالعزيز على النصيحة الهامة 
هذا الكود احتاجة بصورة او باخرى لادراج ارقام الجلوس اليا وليس يدويا

انا سويت دالة وتنفيذ للدالة لكن المشكلة ان التنفيذ ياخذ وقت اطول من اللازم اذا كان عدد الطلاب اكثر من مائة طالب وكلما زاد اعداد الطلاب كلما تاخر اكثر 
وهذ Function
و  
إقتباس :
PHP كود :
   Function get_record(TableNameorderbyfield) As Integer
        get_record 
0
        Dim STR 
"select * from " TableName " order by " orderbyfield
        Dim ADP 
= New SqlClient.SqlDataAdapter(STRsqlconn)
 
       Dim DS = New DataSet
        ADP
.Fill(DS)
 
       Dim DT As DataTable
        DT 
DS.Tables(0)
 
       If DT.Rows.Count <> 0 Then
            Dim i 
DT.Rows.Count 1
            get_record 
Val(DT.Rows(i).Item(orderbyfield))
 
       End If
 
   End Function
 
  
وهذ كود التنفيذ
PHP كود :
 Private Sub Button4_Click(sender As ObjectAs EventArgsHandles Button4.Click
        Dim adp 
As New SqlClient.SqlDataAdapter("Select * from student"sqlconn)
 
       Dim cmds As New SqlClient.SqlCommand(""sqlconn)
 
       Dim dt As New DataTable
        adp
.Fill(dt)
 
       For i 0 To dt.Rows.Count 1
            cmds
.CommandText "UPDATE  student set glose=" get_record("student""glose") + " where  stu_id =" " "
 
           If sqlconn.State 1 Then sqlconn.Close()
 
           sqlconn.Open()
 
           cmds.ExecuteNonQuery()
 
           sqlconn.Close()
 
       Next
        MsgBox
("تمت العملية")
 
   End Sub 
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#7
(27-10-21, 06:48 PM)malik98 كتب :
(27-10-21, 01:11 PM)عبد العزيز البسكري كتب :
خذها مني كنصيحة 
أشتغل بالتعليم منذ أكثر من 25 سنة 
عمرك و لا تعمل أرقام الجلوس تلقائيا بالكود يجب كتابتها يدويا
هذا رقم جلوس يعني رقم تسجيل .. و أثناء التصحيح أو بما يسمى عملية الإغفال يتم حذف كل البيانات الخاصة بالمترشح و يحتفظون فقط برقم الجلوس و على أساسه يتم القبول أو الرسوب
المركز الواحد صحيح يبدأ برقم معين و يتم تسلسل باقي المترشحين على أساس الرقم الأولاني
لكن ببعض الأحيان و ببعض الحالات كانسحاب مترشح أو حتى وفاته يتم تخطي الترقيم التسلسلي لهذا المترشح
إذن طريقة كيف ستكون ؟
الكود سيكون كالتالي :
إذا كان جدول المترشحين فارغا من البيانات .. أكتب رقم التسجيل الأول المسجل لديك و الباقي مثلما ذكرت لك يدويا أو بإضافة + 1 لرقم التسجيل الأول مع التفكير بما ذكرته لك من مخاطرة بمستقبل الكثيرين
تحياتي
اشكرك اخي عبدالعزيز على النصيحة الهامة 
هذا الكود احتاجة بصورة او باخرى لادراج ارقام الجلوس اليا وليس يدويا

انا سويت دالة وتنفيذ للدالة لكن المشكلة ان التنفيذ ياخذ وقت اطول من اللازم اذا كان عدد الطلاب اكثر من مائة طالب وكلما زاد اعداد الطلاب كلما تاخر اكثر 
وهذ Function
و  
إقتباس :
PHP كود :
   Function get_record(TableNameorderbyfield) As Integer
        get_record 
0
        Dim STR 
"select * from " TableName " order by " orderbyfield
        Dim ADP 
= New SqlClient.SqlDataAdapter(STRsqlconn)
 
       Dim DS = New DataSet
        ADP
.Fill(DS)
 
       Dim DT As DataTable
        DT 
DS.Tables(0)
 
       If DT.Rows.Count <> 0 Then
            Dim i 
DT.Rows.Count 1
            get_record 
Val(DT.Rows(i).Item(orderbyfield))
 
       End If
 
   End Function
 
  
وهذ كود التنفيذ
PHP كود :
 Private Sub Button4_Click(sender As ObjectAs EventArgsHandles Button4.Click
        Dim adp 
As New SqlClient.SqlDataAdapter("Select * from student"sqlconn)
 
       Dim cmds As New SqlClient.SqlCommand(""sqlconn)
 
       Dim dt As New DataTable
        adp
.Fill(dt)
 
       For i 0 To dt.Rows.Count 1
            cmds
.CommandText "UPDATE  student set glose=" get_record("student""glose") + " where  stu_id =" " "
 
           If sqlconn.State 1 Then sqlconn.Close()
 
           sqlconn.Open()
 
           cmds.ExecuteNonQuery()
 
           sqlconn.Close()
 
       Next
        MsgBox
("تمت العملية")
 
   End Sub 

ممكن تكتفي بالكود ده
كود :
   Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
       Dim adp As New SqlClient.SqlDataAdapter("Select * from student", sqlconn)
       Dim dt As New DataTable
       adp.Fill(dt)
       Dim j As Integer = 10
       For i = 0 To dt.Rows.Count - 1
           dt.Rows(i)("glose") = (j + i)
       Next
       Dim cmd As New SqlClient.SqlCommandBuilder(adp)
       adp.Update(dt)
       MsgBox("تمت العملية")
   End Sub

لكن راجع كلام اخي عبد العزيز
الرد
تم الشكر بواسطة: عبد العزيز البسكري , سعود
#8
شكراَ اخي كريم هذا هو المطلوب
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] استفسار بخصوص vb.net yassoo1985 3 151 25-11-21, 03:20 AM
آخر رد: yassoo1985
  استفسار بخصوص التقارير Hamza Elshare 1 130 03-11-21, 03:35 PM
آخر رد: أشرف كريم 2
  ادخال ارقام بشكل منتظم في الدليل المحاسبي بسام محمدغانم 3 254 29-10-21, 03:16 PM
آخر رد: بسام محمدغانم
  سؤال مستعجل وضرووووووري ابو انس 18 693 26-10-21, 10:31 PM
آخر رد: Taha Okla
  [سؤال] كيفية ادراج ارقام متسلسلة لحقل في جدول مكون من 100 صف sql server ismaeel 0 185 24-10-21, 05:00 PM
آخر رد: ismaeel
Star [كود] سؤال بخصوص تحديث كميات المواد المباعه في المستودع momani33 1 223 24-10-21, 02:42 PM
آخر رد: ابو انس
  ممكن مساعدة بخصوص كويري معين حدتت به اخطاء Alanwalker 9 988 21-10-21, 01:27 PM
آخر رد: mahmoud_f
  كود منع ادخال ارقام او حروف داخل التيكست بوكس ابو نور الهدى 2 431 05-10-21, 11:14 AM
آخر رد: ابو نور الهدى
  سؤال بخصوص ميزان الباركود momani33 0 282 23-09-21, 11:06 PM
آخر رد: momani33
  سؤال بخصوص حفظ التاريخ في قاعدة البيانات من نوع mysql 3loosh44 2 460 19-09-21, 08:47 PM
آخر رد: 3loosh44

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


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