استفاده از recordset

[iman2023]

سلام من وقتي دستور روبرو رو به اين شكل مي نويسم set rst1=db.openrecordset("table1")
تمام ركوردهاي مورد نظر واكشي ميشه. ولي وقتي به اين شكل مينويسم set rst1=db.openrecordset("select * from table1")تنها يك ركورد واكشي ميشه. دليليش چيه؟

[amirzazadeh]

سلام من وقتي دستور روبرو رو به اين شكل مي نويسم set rst1=db.openrecordset("table1")
تمام ركوردهاي مورد نظر واكشي ميشه. ولي وقتي به اين شكل مينويسم set rst1=db.openrecordset("select * from table1")تنها يك ركورد واكشي ميشه. دليليش چيه؟
سلام
در اين حالت شما بر روي ركورد اول قرار دارين بنابراين recordcount شما عدد يك رو نشان خواهد داد با استفاده از كد زير به تمامي ركوردها دسترسي خواهيد داشت:

Private Sub Command0_Click()
Dim rs1 As Recordset
Set db = CurrentDb
Set rs1 = db.OpenRecordset("select * from table1")
rs1.MoveLast
MsgBox (rs1.RecordCount)
End Sub
......................
موفق باشيد

[iman2023]

بي نهايت سپاسگذارم