پیمایش بین رکوردهای نتیجه شده از دستور select
با سلام با كد زير ميخوام با زدن دكمه next
به ركورد بعد در نتيجه select برود ولي خطا
ميگيره چه تغييري بايد اعمال كنم تا
مشكلش برطرف بشه؟كد:If i
1 ThenDim conn AsNew OleDb.OleDbConnection(
provider=microsoft.jet.oledb.4.0 ; data source=
Application.StartupPath()
calendar.mdb
)Dim adap AsNew OleDb.OleDbDataAdapterDim ds AsNew DataSetDim cmd
AsNew OleDb.OleDbCommand(
select title,matn from messages2 where tarikh='
date1
'
, conn)conn.Open()cmd.ExecuteNonQuery()adap.SelectCommand =
cmdadap.Fill(ds)For j = 2 To iTtitle.Text =
ds.Tables(0).Rows(j).Item(0)tmessage.Text =
ds.Tables(0).Rows(j).Item(1)Next jconn.Close()EndIfمتغير i
قبلا به اين شكل مقدار دهي شده:كد:i =
ds.Tables(0).Rows.Countشما اول بايد Ttitle و tmessage
خودتو به مقادير مورد نظرت bind كني بعد
به راحتي ميتوني از دستور زير ...
