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

[ma.andishe]

سلام
دوستان اگه میشه نحوه انتخاب بزرگترین(max) فیلد 1 جدول با استفاده از رکورد ست رو برام بزاریدتو سینتکسش مشکل دارم

[skh1300]

بزرگترين فيلد جدول يعني چه از نظر اطلاعات داخلش يا اندازه فيلد

[ma.andishe]

مقدار فیلد از نوع int هستش

Dim rst As New ADODB.Recordset
Dim strsql As String
Cn.Open
strsql = "select max(number) from table"
rst.Open strsql
Set rst.ActiveConnection = Cn


میخواهم این مقدار داخل textbox بریزه
اگه این ایرادی داره خواهشن برام اصلاح کنید چون من با vb6 کار نکردم

[Dr.Bronx]

dim rs as new adodb.recordset
cn.open
rs.open "SELECT MAX(column_name) FROM table_name"

text1.text = rs("Column_name")

rs.close

موفق باشید

[ma.andishe]

خیلی ممنون از اینکه وقت گذاشتید
اما سر خط rs.open......یک ارور میده


the conection can not be used to perform this operation
it is either closed or invalid in this context

[niko2008]

خیلی ممنون از اینکه وقت گذاشتید
اما سر خط rs.open......یک ارور میده


the conection can not be used to perform this operation
it is either closed or invalid in this context

عزیز باید به این صورت بنویسی
Dim ado As New ADODB.Connection
Dim rs As New ADODB.Recordset


ado.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db.MDB;Persist Security Info=False"
'rs.Open "SELECT MAX(column_name) FROM table_name", ado, adOpenDynamic, adLockPessimistic

با تشکر