گرفتن رکردها

[jeny]

سلام
چطور ميشه رکورد رو بر حسب id گرفت؟ Access VB6
تيبل من سه سوتون داره
مثلاً ميخوام از رکورد 1 تا 50 رو توی يک ليست باکس نمايش بدم
اگه ميشه با کد پاسخ بديد
با تشکر

[lord_viper]

با سلام
یه راحش اینه با استفاده از دستورات sql

کد:

select * from [table name] where id<51

توجه داشته باشین که به جای table name اسم جدولتونو باید بگزارید
موفق باشید

[PouriaAmid]

Use this Code
replace "i" value with your ID, that you want to get

کد:

Sub AddFieldsToList()
Dim i As Integer
Dim RecordPosition As Integer
Dim Currentfield As Integer

    Dim DB As Database
    Dim rs As Recordset

    Set DB = OpenDatabase(App.Path & "\YourData.MDB", True, False, ";pwd=" & "")
    Set rs = DB.OpenRecordset("DB")

    For i = 1 To 5
    rs.MoveNext
    
    RecordPosition = RecordPosition + i

        List1.AddItem rs.Fields(Currentfield)
Next i

End Sub

موفق باشی