Auto Numeração

[Ghosty]

Eu to iniciando em asp e queria tirar uma duvida...

eu criei um formulário q gera um pedido aqui pra minha empresa, esse formulário chega em 3 emails e eu queria q esse pedido se auto numerasse, tipo: cada pedido enviado adquira um numero de identificação pra q depois eu crie uma espécie de pesquisa desses pedidos, eu pensei no modelo de número assim: 001/04; 002/04 e assim por diante.

vocês tem alguma ideia de como eu faço isso? n sei se por access ou arquivo de texto...

por favor alguém me ajude!!

[cyberalexxx]

Não pode usar um campo autonumeração???

[Ghosty]

Eu tentei fazer isso mas, ele sempre começava do 17 no banco de dados pronto q tinha aqui na minha empresa, dai eu n consegui voltar ao zero, e outra, com o auto numeraçao como eu faria pro numero assumir a forma 001/04; 002/04 e assim por diante? isso é possível?

Obrigado pela ajuda!

[cyberalexxx]

faz assim:

Pegue o ultimo registro da tabela, supondo que o campo seja numero

<%
set RS=conexao.execute("select top 1 * from pedidos order by numero desc")
do while not Rs.Eof
   nr = Rs.Fields("numero") ' pegando ultimo numero
loop
nr_int = split(nr,"/") ' separando a informação nr de /004
novo_nr = Cint(nr_int(0)) + 1

'funcão para formatar numero para usar ex: formata(1,3,"04") resultado=001/04
function formata(valor,tam,final)
cZero = ""
if Len(Trim(cStr(valor))) < tam then
For n = 1 to tam - Len(Trim(cStr(valor)))
cZero = cZero&"0"
Next
end if
formata = cZero&Trim(cStr(valor))&"/"&final
end function

novo_nr = formata(novo_nr,3,"04")
%>

Pronto o valor do novo registro esta armazenado na variavel novo_nr

[Guest Guest]

Putz! cara c é bom mesmo!!! valeu!!!

[cyberalexxx]

Putz! cara c é bom mesmo!!! valeu!!!

Não tenha essa de bom não.

Rapidinho c pega as manha, quer uma dica?? acompanhe o forum, você aprende muito aki, pelo menos eu to aprendendo.