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

السلام عليكم ورحمه الله وبركاته

وجدت كود vb.net يوضع داخل كلاس للترقيم التلقائي لكل الشاشات ويعمل جيدا

كود :

   Public Function GetMaxID(TableName, CoulmnName) As Integer

        Dim dt As New DataTable

        Dim adp As New SqlDataAdapter

        dt.Clear()

        adp = New SqlDataAdapter("select MAX(" & CoulmnName & ") from " & TableName & "", Con)

        adp.Fill(dt)

        Dim autoNumber As Integer

        If IsDBNull(dt(0)(0)) = True Then

            autoNumber = 1

        Else

            autoNumber = dt(0)(0) + 1

        End If

        Return autoNumber

    End Function

وفى داخل الشاشه التي تريد الترقيم بها يوضع هذا السطر

كود :

StudentID.Text = GetMaxID("Student", "StudentID")

قمت بتحويل للكود الى سي شارب عن طريق موقع لتحويل الاكواد واصبح كالتالى

كود :

public int GetMaxID(object TableName, object CoulmnName)

{

    DataTable dt = new DataTable();

    SqlDataAdapter adp = new SqlDataAdapter();

    dt.Clear();

    adp = new SqlDataAdapter("select MAX(" + CoulmnName + ") from " + TableName + "", Con);

    adp.Fill(dt);

    int autoNumber;

    if (IsDBNull(dt(0)(0)) == true)

        autoNumber = 1;

    else

        autoNumber = dt(0)(0) + 1;

    return autoNumber;

}

وفى داخل الشاشه التي تريد ترقيم بها يوضع هذا السطر

كود :

StudentID.Text = GetMaxID("Student", "StudentID");

لكن عند استخدامه بتظهر اخطأ فى الكود
هل من الممكن تتصحيح الاخطاء
وجزكم الله كل خير

تفضل أخي الكريم ضع هذا بالكلاس :

PHP كود :

       public static Int32 GetMaxIDColumn(string TableName, string ColumnIDName)
        {
            Int32 IdX = 0;
            String StrSQL = "Select IIF(Max(" + ColumnIDName + ") Is NULL,1,Max(" + ColumnIDName + ")+1) From " + TableName;
            //SqlConnection Con = new SqlConnection("Server =(local);database=Accounts;integrated security=true");
            SqlDataAdapter da = new SqlDataAdapter(StrSQL, Con);
            DataTable dt = new DataTable();
            da.Fill(dt);
            IdX = Convert.ToInt32(dt.Rows[0][0].ToString());
            return IdX;
        } 

و هكذا يتم استخدامه :

PHP كود :

textBox1.Text = Class1.GetMaxIDColumn("Employee", "EmployeeID").ToString(); 

(30-07-19, 11:23 PM)asemshahen5 كتب : [ -> ]تفضل أخي الكريم ضع هذا بالكلاس :

PHP كود :

public static Int32 GetMaxIDColumn(string TableName, string ColumnIDName) { Int32 IdX = 0; String StrSQL = "Select IIF(Max(" + ColumnIDName + ") Is NULL,1,Max(" + ColumnIDName + ")+1) From " + TableName; //SqlConnection Con = new SqlConnection("Server =(local);database=Accounts;integrated security=true"); SqlDataAdapter da = new SqlDataAdapter(StrSQL, Con); DataTable dt = new DataTable(); da.Fill(dt); IdX = Convert.ToInt32(dt.Rows[0][0].ToString()); return IdX; }

و هكذا يتم استخدامه :

PHP كود :

textBox1.Text = Class1.GetMaxIDColumn("Employee", "EmployeeID").ToString();

الله ينور ياغالى تسلم ايدك
والف شكر لاهتمامك
وجزاك الله كل خير

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

او على الأقل شرح المتغيرات في الكود مثل
GetMaxIDColumn
ColumnIDName
"Employee", "EmployeeID"

(25-04-21, 09:12 PM)علي المروعي كتب : [ -> ]السلام عليكم ورحمة الله وبركاته لو ممكن توضيح الكود السابق للترقيم لأني حاولت اطبقه ما عرفت ولو مثال بسيط اكون لك من الشاكرين

او على الأقل شرح المتغيرات في الكود مثل
GetMaxIDColumn
ColumnIDName
"Employee", "EmployeeID"

عند استدعاء الدالة تتطلب معاميل
اسم الجدول
واسم العمود الرقمي المراد ترقيمه

كود :

textBox1.Text = Class1.GetMaxIDColumn("اسم العمود", "اسم اجدول").ToString();

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

amonem

asemshahen5

amonem

علي المروعي

alfaiz678