Gerando Números aleatórios, Randomize

Agência OFF, desenvolvimento de soluções web para as Agências Digitais

Gerar números randômicos é bem fácil.
Fica mais fácil criar uma função para receber os valores, assim tornando a função “livre” para ser usada em todo o projeto!

<%
Function GerarRandomize(Valores)
	Dim Numeros : Numeros = "0123456789"
	Randomize
	For I = 1 To Valores
		Dim Num : Num = Mid(Numeros, Int(35 * Rnd) + 1, 1)
		Dim Chave : Chave = Chave + Num
	Next
	GerarRandomize = Chave
End Function

Response.Write(GerarRandomize(10)) 'o número 10 significa quandos números serão gerados
%>

Significado das funções:
MID(): Serve para tirar uma string entre dois valores
Sintaxe: MID(String, CaracterInicio, TamanhoSeleção)

RND(): Devolve um numero aleatório.
Antes de se usar esta função, use Randomize, para ele se basear no relógio do sistema e desta maneira não repetir valores.

Qualquer dúvida é só postar:
Acesse também: Webly

Agência OFF, desenvolvimento de soluções web para as Agências Digitais


Tags:

5 Respostas para Gerando Números aleatórios, Randomize

  1. gostaria de que vc pudesse me desse um passo a passo pra que eu construa numeração de cartelas
    nao sei programar e pior quais os programas, tenho facilidade de aprender, mas nao sei por onde começar como funciona a coisa e que softwares são usados para tornar textos e comandos em softwares .exe

    por incrivel que pareça a internet não tem muito pra pessoas como eu

  2. Sem saber nada amigo fica complicado, dica do Ted
    Pesquise sobre:
    DreamWeaver
    IIS
    ASP
    JavaScript

  3. Esta função não funciona, redefinição de váriaveis e um calculo exatamente incompleto que quando gera mais de 1 caracter é geralmente 0.

  4. Testado e aprovado! Testei aqui com ASP e gerou legal, alterei o 10 por 80 e acrescentei letras junto aos núemros e ficou muito bom. Parabéns pelo post!

  5. Me salvou!!!! Valeu, cara!! Teus códigos são demais!!
    Modifiquei como o Leandro sugeriu
    Ficou D+

Deixe seu Comentário