Distinct value...pls help

[skyseh]

Hi

How can I retrieve the next value from distinct using the code below?

*********************************************************
Qry = "Select distinct size from parttb Where id = '" & txtItem.List(i) & "' "
Set RawSql = New ADODB.Recordset
RawSql.CursorLocation = adUseClient
RawSql.Open Qry, S_GateDb, adOpenDynamic, adLockPessimistic

Size1 = RawSql(0)
//How to get size2 and so on
*********************************************************
Kindly enlightened me. Thanks alot

[RhinoBull]

You need to navigate through the recordset by calling MoveNext (Previous, First, Last) method(s):

RawSql.MoveNext
If RawSql.EOF THen RawSql.MoveLast

[Bolerophone]

Use this

while Rset.EOF = False
 
    ....
    
    RSET.MoveNext
 
wend

[zubairkhan]

Try This

First of all count total records in recordset

then declare an arry subject to totalrecords

start do while loop till eof

move size from table to array


do while Rset.Eof = False
size[1] = Rset!size
Rset.MoveNext
Loop

[skyseh]

Thanks a lot...

I solved it using Do Loop.. then RawSql.MoveNext