Como sortear um número randômico em asp

Aqui vai uma função bem simples para gerar números randômicos em ASP sem complicação, possibilitando delimitar o máximo e o mínimo.

Dim menor, maior, sorteado
RANDOMIZE
meno = 1
maior = 5
sorteado = Int((maior-menor+1)*Rnd+menor)

Para aplicação prática do número sorteado para banners rotativos, por exemplo, você pode utilizar um SELECT CASE, como o exemplo abaixo:

SELECT Case sorteado

Case "1"
    banner = "banner1.swf"
Case "2"
    banner = "banner2.asp"

end select

Exemplo de aplicação

Estou usando esse random em asp para exibir os anúncios com a API Boo-Box (no Shopping a direita do texto).

Quando não existem tags cadastradas para aquela publicação um Random é usado para selecionar tags pré-definidas (com o select case) por mim para montar a vitrine.

Se existem tags são usadas, senão o random, então sempre existem produtos para visualizar.

Espero ter ajudado!
Dúvidas, críticas e contribuições nos comentários... ;)