Randomize so funciona com f5

Olá pessoal, estou pegando dados randomicos de um bd da seguinte maneira:

randomize

intNumlist = (CInt(1000 Rnd) + 1) -1

depois no select em order by coloco: order by Rnd(TB_Anuncios.ID * " & intNumlist &") DESC"

Esta funcioando legal e pegando os dados aleatorios, mas os registros so mudam com f5 mas se vou para outra pagina e volto os registros continuam os mesmos.

O que tenho que fazer, existe algo para limpar o randomize e gera-lo novamente pegando outros registros a cada troca de pagina?