+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] جلب اكبر قيمة في SQL DB (/showthread.php?tid=29544)
جلب اكبر قيمة في SQL DB - DK-x - 04-05-19
مرحبا 
محتاج كود جلب اكبر قيمة Int بالداتا
وكود الترقيم التلقائي لل ID وشكرا
محتاج كود جلب اكبر قيمة Int بالداتا
وكود الترقيم التلقائي لل ID وشكرا
RE: جلب اكبر قيمة في SQL DB - asemshahen5 - 04-05-19
تفضل هذا كود ترقيم تلقائي :
PHP كود :
Dim StrSQL as String= "Select IIF(Max(Id) Is NULL,1,Max(Id)+1)As ID From TestTable"
Dim cn As New SqlConnection("Server =(local);database=TestDB;integrated security=false;User ID=UserName;Password=Password")
Dim da As New SqlDataAdapter(StrSQL, cn)
Dim dt As New DataTable
da.Fill(dt)
Txt_Id.Text=dt.Rows(0)(0).ToString()
لجلب أكبر قيمة :
PHP كود :
Dim StrSQL as String= "Select Max(Id)As ID From TestTable"
Dim cn As New SqlConnection("Server =(local);database=TestDB;integrated security=false;User ID=UserName;Password=Password")
Dim da As New SqlDataAdapter(StrSQL, cn)
Dim dt As New DataTable
da.Fill(dt)
Txt_Id.Text=dt.Rows(0)(0).ToString()