Help with datasource filter property

[James]

I'm not sure if I'm using the right property but what I have is a table
with Right ID, Right Name, and Offering ID ... each offering can have
more than one Right ID... so my loop is suppose to filter by offering
ID and output those rights from the recordset... here's the code i've
come up with:

Do While Not rl.EOF
rl.Filter = "OfferingID ='" & OfferingID & "'"

If Not IsNull(rl.Fields("Right")) Then
offeringRight = Trim(rl.Fields("Right"))
Else
offeringRight = ""
End If
Loop

It filters and then only returns the first right it comes upon, how to
I make it loop through the rights to return all Rights for a specific
OfferingID? Thanks

 

[Wolfgang Kais]

Hello James.

I'm not sure if I'm using the right property but what I have is a
table with Right ID, Right Name, and Offering ID ... each offering
can have more than one Right ID... so my loop is suppose to filter by
offering ID and output those rights from the recordset... here's the
code i've come up with:

Do While Not rl.EOF
rl.Filter = "OfferingID ='" & OfferingID & "'"

If Not IsNull(rl.Fields("Right")) Then
offeringRight = Trim(rl.Fields("Right"))
Else
offeringRight = ""
End If
Loop

It filters and then only returns the first right it comes upon, how to
I make it loop through the rights to return all Rights for a specific
OfferingID? Thanks

How about this:

rl.Filter = "OfferingID ='" & OfferingID & "'"
Do While Not rl.EOF

If Not IsNull(rl.Fields("Right")) Then
offeringRight = Trim(rl.Fields("Right"))
Else
offeringRight = ""
End If
' Do something with offeringRight

rl.MoveNext
Loop

The first two lines are swapped and a MoveNext was added.