Randomiza repete

[augustoclaro 2]

Olá!

 

é o seguinte, eu tenho a seguinte função:

 

 

function randomiza(maior,menor)
Randomize()
randomiza = Int((maior-menor+1)*Rnd+menor)
end function

Ela funciona bem, o problema é que ela é "lerda".

 

Eu tenho na página assim:

 

function randomiza(maior,menor)
Randomize()
randomiza = Int((maior-menor+1)*Rnd+menor)
end function

rand = randomiza(1,100)
response.write rand

Quando eu abro ela aparece um numero, se eu atualizo, aparece O MESMO NÚMERO, e para outro número aparecer eu tenho que atualizar a página vááárias vezes, por isso "lerda" ^^.

 

 

É isso gentem gostaria de saber o que eu faço pra esta função realmente randomizar! =D

 

Valeu!

[xanburzum 169]

Guarde os números sorteados na array, mas antes disso verifique se o número já existe na mesma e associar a uma instrução sql:

[augustoclaro 2]

sql? pra que? oO não entendi direito.

 

Isso que está acontecendo é erro da ling. msm ou é burrice minha? :D

 

 

valeu!

[hargon 64]

Como não houve "validação" é comum acontecer isso. Mas aqui, o mesmo código funcionou normal, exibiu vários números diferentes sem repetir.

 

Você pode armazenar em um Array os valores que já sairam e verificar se estão lá, mas acredito que isso vai tornar a função muito lenta quando trabalhar com intervalos alto.

[augustoclaro 2]

então, aqui eu não sei pqe isso acontece, não é bem que o número repete, como acontece normalmente, as vezes, a página não muda.

tanto no servidor quanto aqui no meu pc, eu fico atualizando a página que nem louco e aquele maldito 42 que foi o primeiro randomiozado não sai de lá, só depois de mtooo tempo que muda o número e as alterações que eu fiz na página. muito esquesito isso.

[xanburzum 169]

Guarde os números sorteados na array

[Ted k' 126]

Eu nem uso mais esse lance de randomize... agora só uso a data junto da hora:

 

ex: 10102009151545 - data e e hora 10/10/2009 15:15:45

 

nao tem como repetir, Mais fica muito grande!

 

É como o próprio nome já diz... randomicos e nao infinitos!

[xanburzum 169]

olha um exemplo

[hargon 64]

Augusto, nesse caso verifica se não está ficando armazenado no cache, já que o problema é outro agora.

[xanburzum 169]

usa esse para naun armazenar

 

expirar pagina

<% 
Response.Buffer=true 
Response.AddHeader "cache-control", "private" 
Response.AddHeader "pragma", "no-cache" 
Response.ExpiresAbsolute = #January 1, 1990 00:00:01# 
Response.Expires=Now()-1 
Response.AddHeader "Cache-Control", "must-revalidate" 
Response.AddHeader "Cache-Control", "no-cache" 
Response.Addheader "Last-Modified:", Now() 

% >