Terry,

It wouldn't work if there're deleted records and could pick the same record twice.

>I've tested out the following:
>
>

>For I = 1 to 150
>  lnQuesKey = CEILING( INT( RAND() * 2500) )
>* Fetch the question rec with lnQuesKey as PK
>Endfor
>

>
>Can't guarantee that it will give every no. from 1 to 2500 (without testing it an infinite no. of times!!!) but it seems to suffice, and HAS returned 1, and nos 1-10.
>