No sé como será tu lógica ya que no mostrás código, pero se me ocurre algo así:
Código:
'comprobación del usuario contra las bases de datos
if (existe en BD) then
if (si no existe en BD2) then
session(pagina)=1
else
session(pagina)=2
end if
end if
Código:
sub accede_a(verificar_en, ses_pagina)
if verificar_en <> ses_pagina then response.write "Fuera de aquí!"
end sub
'para verificar acceso a pag1
call accede_a(session(pagina), 1)
'para verificar acceso a pag2
call accede_a(session(pagina), 2)