بدست آوردن بالاترین مقدار

من برای بدست آوردن بیشترین مقدار در اطلاعات ذخیره شده ام دستور زیر را به کار میبرم:

کد:

---

cmd.CommandText = "select max(id)+1 from moshaver_hoqoqi"
            Dim reader As SqlDataReader = cmd.ExecuteReader()
            If reader.Read Then
                Label2.Text = reader.Item("id").ToString()
            End If

---

البته +1 به خاطر این است که میخواهم با بدست آوردن بیشترین مقدار یک فیلد دیگر در ادامه رکوردهای قبلی ایجاد کنم
اما با این خطا مواجه می شوم:

کد:

---

index out of range exception was unhandheld by user code
id

---

روی خط 4
ممنون میشم راهنمایی کنید

شما باید نام ستون را در reader.Item قرار دهی
در صورتی که این query را در خود sqlserver اجرا کنید متوجه خواهید شد که نام ستون شما id نیست

کد:

---

cmd.CommandText = "select max(id)+1 as id  from moshaver_hoqoqi"

---

کد رو به این روش اصلاح کنید

کد:

---


cmd.CommandText = "select max(id)+1 from moshaver_hoqoqi"
          Label2.Text= cmd.ExecuteScaler()
 
          End If

---

چون قراره کد شما فقط یک مقدار رو برگشت بده از ExecuteScaler استفاده کنید

ولی بازم اگه میهوای از کد خودت استفاده کنی کدت رو اینجوری اصلاح کن

کد:

---


cmd.CommandText = "select max(id)+1 from moshaver_hoqoqi"
          Dim reader As SqlDataReader = cmd.ExecuteReader()
    If reader.HasRow Then
            reader.Read
              Label2.Text = reader("id")
          End If

---