Io farei così:

id_del_sig_rossi = 34
recordperpag = 5
conta = 1
do while not rs.eof
if RS("ID") = id_del_sig_rossi then
exit do
else
RS.movenext
conta = conta + 1
end if
loop
if not rs.eof then
if conta mod recordperpagina > 0 then
pagina = fix(conta / recordperpagina) + 1
else
pagina = conta / recordperpagina
end if
else
pagina = null
end if


Davide Pongan