انتخاب بزرگترین عدد در بانک اکسس

[ebrahimhoze]

یه تکه کد میخوام که آخرید شماره توی بانک اکسس رو انتخاب کنه این کار رو توی بانک sql انجام دادم ولی با بانک اکسس جواب نمیده
یه چیزی شبیه این کد برای بانک اکسس

Dim maxid As New SqlCommand
maxid.Connection = Coon
maxid.CommandText = "select max(tedadvorod) from userdb where UserName='" & i & "'"
Coon.Open()
Dim max As Object = maxid.ExecuteScalar()
If max Is DBNull.Value Then
max = 0
End If

[saman_itc]

بزرگترین id رو برمیگردونه
SELECT bookid,BookName FROM bookinfo order by ID

[ebrahimhoze]

میشه مثال منو کامل کنید ممنون

[saman_itc]

Dim maxid As New SqlCommand
maxid.Connection = Coon
maxid.CommandText = "select max(tedadvorod) from userdb order by UserName
Coon.Open()
Dim max As Object = maxid.ExecuteScalar()
If max Is DBNull.Value Then
max = 0
End If

فیلدتUserNameباید Number باشه !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

[saman_itc]

اگه مشکلت حل نشد از این هم میتونی استفاده کنی


SELECT TOP (2) ColumnA FROM Table1
ORDER BY ColumnA

[visual_sadegh]

کدتو اینطوری اصلاح کن

Dim maxid As New SqlCommand
maxid.Connection = Coon
maxid.CommandText = "select Top 1 tedadvorod from userdb where UserName='" & i & "' Order By tedadvorod Desc"
Coon.Open()
Dim max As Object = maxid.ExecuteScalar()
If max Is DBNull.Value Then
max = 0
End If

[saman_itc]

با تشکر از شما
مثال بود صادق جان.برنامه اجرایی نبود که