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


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
Sem saber nada amigo fica complicado, dica do Ted
Pesquise sobre:
DreamWeaver
IIS
ASP
JavaScript
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.
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!
Me salvou!!!! Valeu, cara!! Teus códigos são demais!!
Modifiquei como o Leandro sugeriu
Ficou D+