Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

silas_i

Autonumeracao com 8 dígitos

Recommended Posts

Como eu faço para gerar uma autonumeracao de 8 dígitos !? E outra eu tenho que comecar esse número apartir desse: 00000415 !alguém sabe !?Valeus

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta este script=======================if Len(user_email)<>0 and InStr(user_email,"@")<>0 thenDim numero,nCount,sret,nNumber,nLength, sValidChars,nNoChars Const szDefault = "1234567890" Randomize 'init random sValidChars = szDefault 'Passa para a variavel os caracteres da seguencia szDefault nLength = Len( sValidChars ) 'Verifica o tamanho da string sValidChars For nCount = 1 To 9 nNumber = Int((nLength * Rnd) + 1) sRet = sRet & Mid( sValidChars, nNumber, 1 ) Next numero = sRet user_senha=numero

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.