Ir para conteúdo
Fórum Script Brasil

marvi

Membros
  • Total de itens

    860
  • Registro em

  • Última visita

Tudo que marvi postou

  1. marvi

    número aleatório

    Rafael, tive vendo uma nota aqui e a nota ela tem um numero geral e um numero para cada produto, no caso terei que criar um campo para cada numero do produto... Tipo: código, descrição, unidade, valor, valor total... Jonathan, então eu irei pegar esse codigo de número aleatório gerar o numero e depois fazer uma consulta no banco para ver se existe, se não existir eu exibo no formulário, pode ser assim? E se caso exista eu faço uma soma com + 1
  2. marvi

    número aleatório

    beleza, vou continuar com o sistema... qualquer coisa posto coisas novas aqui! há, aproveitando... você tem alguma interface de cadastro de estoque para ver se existe algo padrão mesmo para criar nos formulários? A minha tela ficou no outro tópico que você transferiu para o pessoal de lógica...
  3. marvi

    número aleatório

    Então Jonathan, como irei gerar a autonumeração se o usuário quer ver o novo número do código ainda no formulário que está sendo preenchido para cadastrar ainda no bancio... o número tem que aparecer antes de entrar no banco, ainda no forumlário sendo preenchido. Ok Rafael, então terá um campo chamado Nota Fiscal Nº e pronto para isso, certo?
  4. marvi

    número aleatório

    "Bom... quando tenho que fazer sistemas que precisam desse tipo de numeração, ex.: bloquetos bancários, uso simplesmente o último número de id (campo autonumerico no bd) + 1... simples assim... e comigo sempre funciona..." Como você faz o processo se ainda não cadastrei no banco e preciso exibir o numero ainda no formulário de cadastro? Estou usando o SQL Server 2000
  5. marvi

    número aleatório

    Será assim... a pessoa pede um produto... chega na loja com a nota... ela vai e cadastra no controle de estoque da loja o produto. Sendo assim não precisa de número aleatório? Já que ela mesma que vai digitar?
  6. marvi

    número aleatório

    Mas o cadastro será a primeira vez... o campo para preencher então não tem como pegar nada do banco pois não foi inserido no banco ainda, entende? É para inserir ainda... e se não inseriu no banco não tem autonumeração... Quando a gente pega uma nota fiscal que vem codigo--- produto---- valor 123--- celular---- 20,00 Esse código é digitado ou ele gera automáticamente? E para cadastrar produto no controle de estoque preciso gerar um código aleatório ou o usuário que digita? Pois se for ele que digita não precisarei disso...
  7. marvi

    número aleatório

    Olá pessoal, Estou realizando um formulário para controle de estoque... ele vai inserir um produto, mas terá que ter o código da nota... um código aleatório e que não pode se repetir para poder cadastrar o produto... Pesquisando encontrei esse código que funciona bem... alguém sabe me informar se ele poderá gerar números repetidos? Pois seria bom se não se repetisse. <% ' Em primeiro lugar vamos criar uma função chamada GerarChave() ' esta função ira criar e definir um array alfanumérico de ' 0 a 9 Function GerarChave(valores) Dim chr_Array(9) chr_array(0) = "0" chr_array(1) = "1" chr_array(2) = "2" chr_array(3) = "3" chr_array(4) = "4" chr_array(5) = "5" chr_array(6) = "6" chr_array(7) = "7" chr_array(8) = "8" chr_array(9) = "9" ' Agora vamos fazer um Randomize em todo Array Randomize ' Ok, feito a bagunça no Array vamos preparar ' para gerar a senha ' Enquanto a chave tiver a quantidade de caracteres ' menor que 10 o loop continua gerando ela. do while len(chave) < 10 num = chr_array(Int(9 * Rnd )) chave = chave + num loop ' Chave gerada com sucesso então definimos a ' função GerarChave GerarChave = chave End Function ' Finalizando a função ' Mostrando a senha no browser. ' Obs: O número dez significa o tamanho da senha em ' carateres que será criado response.write "Senha gerada: " & GerarChave(10) & vbcrlf %> Obrigado! Marcelo
  8. Olá pessoal, Gostaria de contar com a dica e experiências de vocês para aperfeiçoar uma seção para cadastro de celular e chips para loja de celular. Abaixo vocês verão uma imagem do campo que criei para cadastro de celular / chip... Veja a imagem seguida da explicação: Veja que no topo tem os campos fixos como se fosse uma nota fiscal (fornecedor, data e etc)... Abaixo vem os itens do celular. Vem o fabricante, quantidade de unidades e modelos dessas unidades para cada item e ao lado tem uma seção chamada IMEI / Serial 1 que corresponde a seção item do lado, no caso o item 1. Lá coloco os seriais dos celulares... Veja que o usuário coloca 2 unidades e sendo assim teremos dois campos para serial do item 1 na seção IMEI / Serial1. No item 2, que está abaixo do item 1, é a mesma coisa e assim vai... Percebi que tenho que colocar um campo chamado código, acho que é um campo só que ficará no topo com os campos fixos, falta isso não é? Esse campo posso gerar um código aleatório que não se repete, isso? O que falta mais para área de celular? Tenho que colocar uma opção avisando se é chip ou celular? Onde ficaria? Preciso que os modelos estejam cadastrados com vinculo direto com as marcas. Dessa forma facilita a manipulação dos dados. A minha lógica está indo certa? Gostaria da análise de vocês! Obrigado pelas dicas! Marcelo
  9. Beleza Rafael! Acho que a questão já foi resolvida! Qualquer coisa posto de novo! Obrigado!
  10. Ms aí ele acusa: Objeto Response, ASP 0104 (0x80070057) Operação não permitida /vivo/inserirfabricantessql.asp 'aqui começa o loop para percorrer a consulta atras de registros repetidos for i=1 to session("novo") 'aqui faz a consulta dentro do primeiro loop teste= "Select * from fabricantes where nome = '" & request.form("nome"&i)& "'" 'setando o recordset Set rsfabricantesteste=Conexao.Execute(teste) 'aqui você começa a percorrer os registros comparando o recordset com a variavel vinda do form While Not rsfabricantesteste.EOF 'condicional comparativa if request.form("nome"&i) <> rsfabricantesteste("nome") then 'se for igual não faz nada, indo para o próximo registro! else rsfabricantesteste.MoveNext 'fim das condicionais end if wend 'termino do primeiro loop next
  11. Olá Rafale, Fiz, mas deu: Erro de compilação do Microsoft VBScript (0x800A0400) Instrução esperada /vivo/inserirfabricantessql.asp, line 92 wend Codigo: 'aqui começa o loop para percorrer a consulta atras de registros repetidos for i=1 to session("novo") 'aqui faz a consulta dentro do primeiro loop teste= "Select * from fabricantes where nome = '" & request.form("nome"&i)& "'" 'setando o recordset Set rsfabricantesteste=Conexao.Execute(teste) 'aqui você começa a percorrer os registros comparando o recordset com a variavel vinda do form While Not rsfabricantesteste.EOF 'condicional comparativa if request.form("nome"&i) <> rsfabricantesteste("campodobd") then 'faça a instrução instrução de insert, update ou delete 'insert into... response.write("teste") 'se for igual não faz nada, indo para o próximo registro! else rsfabricantesteste.MoveNext LINHA 92: wend 'fim das condicionais end if 'termino do primeiro loop next Acho que esse wend, onde é o erro, não é reconhecido como parte do While, coloquei Do While Not rsfabricantesteste.EOF com loop e dar a mesma coisa... Acho que não reconhece por causa do else que diz se vai ou não para o resto da linha que tem o wend... Tirei esse web daí e coloquei la no fim da página loop next Onde passa pela mensagem que criei de erro... Mas, parece que ele funciona se caso tenha algo no banco... mas caso não tenha ele não insere... isso é o problema...
  12. Tava tentando fazer algo do tipo: teste= "Select * from fabricantes where nome = '" & request.form("nome"&i)& "'" Set rsfabricantesteste=Conexao.Execute(teste) IF rsfabricantesteste.EOF then conta = 0 While Not rsfabricantesteste.EOF nome = rsfabricantesteste("nome") conta = conta +1 rsfabricantesteste.MoveNext If Not rsfabricantesteste.EOF Then If rsfabricantesteste("nome") <> nome Then response.write("nome") conta = 0 End If End If Wend Mas não deu ainda... Alguém tem uma dica?
  13. Mas isso o meu já não faz? pecorre o banco todo com o loop? E porque esse: while rsfabricante... for i=1 to session("novo") next Fazendo o while no proprio session que já vem com seu valor fixo? Vou ver na pratica isso, pois não entendi a lógica...
  14. Mas ai o Set rsfabricantesteste=Conexao.Execute(teste) só vai ser executado uma vez, não? Pois ele não está no loop... Se foi criado 4 campos nomes no formulário, ele só vai ver um aí... não?
  15. Certo! Acho que entendi sim, mas como fazer isso? Veja meu código como estar: for i=1 to session("novo") teste= "Select * from fabricantes where nome = '" & request.form("nome"&i)& "'" Set rsfabricantesteste=Conexao.Execute(teste) next IF not rsfabricantesteste.EOF Then já tem algo else INSERT É isso que fala? Pois está assim... só que esse rsfabricantesteste.EOF só dar a informação depois de todos os loops feitos. Como segurar só um loop e testar, segurar outro loop e testar...?
  16. Olá Rafale, elimina uns dos tópicos meu que está repetido, por favor :) Funciona o session sim, mas a questão é: Porque ele dará o loop... quando passa o nome Ok (que já foi digitado) ele ver que está no banco, mas terá que dar outro loop de novo para ver os nomes Ok 2 e Ok 3 que não foi digitado antes e assim ao acabar os loops ele irá considerar o último loop que foi com o nome Ok 3 e assim "esquece" que logo no inicio o nome Ok já está no banco e acaba cadastrando tudo: Ok (de novo), Ok 2, Ok 3. Entendeu? Veja o tópico... Abraço!
  17. Olá pessoal, vamos lá... Como resolver essa lógica: Tem um formulário que pode gerar vários campos e se a pessoa resolver gerar dois campos ocorre isso: Nome: Nome: Aí a pessoa digita, por exemplo: Nome: Ok Nome: Ok1 E envia para o banco de vez. Código: <% for i=1 to session("qtfabri") %> <tr> <td width="24%" height="23"> Nome do fabricante:</td> <td width="76%" height="23"> <input type="text" name="nome<%=i%>" size="72" style="font-family: Verdana; font-size: 10 px; color: #3A5278; border: 1px solid #3A5278; background-color:#EEEEEE" value="<%=request.form("nome"&i)%>"></td> </tr> <td width="24%" height="1" bgcolor="#BAC8DC"> <img border="0" src="imagens/linhatransparente1.gif" width="62" height="1"></td> <td width="76%" height="1" bgcolor="#BAC8DC"> <img border="0" src="imagens/linhatransparente1.gif" width="62" height="1"></td> </tr> <%next%> Até aí tudo bem, ele roda normal e insere normal no banco. Mas aí a pessoa resolve gerar dois campos ou mais campos de novo do formulário e digita: Nome: Ok (veja que esse nome já foi digitado antes e estar no banco) Nome: ok 2 Nome: ok 3 Aí na hora de inserir criei esse teste antes para ver se já existe o nome no banco, se existe ele não insere. Ele manda uma session com a quantidade de campos criados no formulário que é preenchido para inserir no banco e faz o teste: for i=1 to session("novo") teste= "Select * from fabricantes where nome = '" & request.form("nome"&i)& "'" Set rsfabricantesteste=Conexao.Execute(teste) next Só que aí é que está o problema... Se o nome Ok, que já foi digitado e inserido no campo, for o primeiro dos campos do formulário, como no exemplo acima, ele não reconhece neste teste que fiz. Isso ocorre por esse motivo lógico: porque ele dará o loop... quando passa o nome Ok (que já foi digitado) ele ver que está no banco, mas terá que dar outro loop de novo para ver os nomes Ok 2 e Ok 3 que não foi digitado antes e assim ao acabar os loops ele irá considerar o último loop que foi com o nome Ok 3 e assim "esquece" que logo no inicio o nome Ok já está no banco e acaba cadastrando tudo: Ok (de novo), Ok 2, Ok 3. Ele só funciona se o nome Ok foi digitado no último campo gerado no formulário, pois terá o loop testando Ok 2, Ok3 e o último será o Ok e assim ele irá considerar o ultimo loop que foi com o nome Ok (que já foi cadastrado antes) e verá que não pode cadastrá-lo e acusa que não pode cadastrar. Então como resolver isso? Como fazer com que o teste reconheça o que já foi cadastrado, como esse nome Ok por exemplo, em qualquer posição do loop? Tipo se ele foi cadastrado no primeiro campo, segundo ou terceiro campo do formulário, não importa, o importante é que ele reconheça que uma vez já foi cadastro esse nome Ok e em um determinado momento do Loop acusou isso (não importa se foi no ultimo loop ou o primeiro loop do teste). Pois assim não deixo que a pessoa insira o mesmo nome já cadastrado juntos com outros nomes novos. Como resolver isso, alguém pode ver isso? Já tentei aqui e nada... Obrigado!! Marcelo
  18. Colquei em divs dentro da tabela: Minhas divs: <div name="tabEndereco" id="tabEndereco" style="display:none"> <%=lazer%> </div> <div name="tabFone" id="tabFone" style="display:none"> <iframe width="684" height="183" src="imagemnova.asp?id=<%=varvalor%>" name="I1" style="border: 1px solid #F4F3F1; " border="0" frameborder="0"></iframe> </div> <div name="tabEmail" id="tabEmail" style="display:none"> <iframe width="684" height="183" src="imagensplantas.asp?id=<%=varvalor%>" name="I1" style="border: 1px solid #F4F3F1; " border="0" frameborder="0"></iframe> </div> <div name="tabLegal" id="tabLegal" style="display:none"> <iframe width="684" height="183" src="imagensilustracao.asp?id=<%=varvalor%>" name="I1" style="border: 1px solid #F4F3F1; " border="0" frameborder="0"></iframe> </div> <div name="tabVideo" id="tabVideo" style="display:none"> <iframe width="684" height="183" src="imagensvideos1.asp?id=<%=varvalor%>" name="I1" style="border: 1px solid #F4F3F1; " border="0" frameborder="0"></iframe> </div> <div name="tabLocal" id="tabLocal" style="display:none"> <!--#include file="local.asp"--> </div> <div name="tabPreco" id="tabPreco" style="display:none"> <!--#include file="financiamento.asp"--> </div> Acho que vou desistir... vou colocar o lightbox de volta e quando eu precisar abrir um HTML com efeito eu uso mesmo um POP UP ou algo assim... acho que já embolei de mais a minha programação...infelizmente... Obrigado pela ajuda! OBS: eu coloquei um <input type="hidden" name="imagem1" id="valor_escondido"> no form e ele acabou inibindo os efeitos de cores ao passar do mouse nas abas, tirei esse campo do form e os efeitos de cores voltou... Acredito que esse valor_escondido conserva a figura que conserva a cor ao passar o mouse para ficar vermelho e azul
  19. Então tenho que criar um campo no form com esse nome e um valor fixo?
  20. Ok então! coloque o atributo name="form" no seu form Re: já coloquei! E na função fiz: function selTab(tab) { //o elemento abaixo é div, porque as abas estão dentro de um div. tabs = document.getElementsByTagName("div"); //aqui cai no que eu já tinha dito: você poderá ter quantas abas quiser. Aqui simplesmente contará quantas abas você tem. for (n=0;n < tabs.length;n++) { //aqui vai comparar se o nome do id do seu div é igual a aba que você selecionou. Se for, ele vai mostrar o conteúdo da aba selecionada. Caso contrário, não exibe nada. if (tabs[n].id == tab) { tabs[n].style.display = "inline"; document.getElementById('col' + tab.substring(3,tab.length)).style.borderBottom = "none"; document.getElementById('col' + tab.substring(3,tab.length) + '1').style.borderBottom = "none"; } else { document.getElementById('col' + tabs[n].id.substring(3,tabs[n].id.length)).style.borderBottom = "black 0px solid"; document.getElementById('col' + tabs[n].id.substring(3,tabs[n].id.length) + '1').style.borderBottom = "black 0px solid"; tabs[n].style.display = "none"; } } } Esse valor_escondido vem o valor imagem1 logo quando carrega, não... valor_escondido = "imagem1" document.form.valor_escondido.value=valor_escondido mouseClick(valor_escondido) Na verdade essas questões de ABAS achei navegando na internet e o codigo original é esse: http://imasters.uol.com.br/artigo/4144/asp...personalizadas/ E adaptei com as setas das imagens http://www.livrojquery.com.br/temp/slider/
  21. Oi! Eu fiz o que você falou, pode conferir la nos links que passei, só não fiz nada na função, pois esse tabs[n].style.display = "none"; já tem lá... Não? E esse <form não tem a ver com as ABAS la em baixo não... já estava no layout antes das abas... veja que o </form> fecha antes das ABAS... O problema continua acusando o erro...
  22. Pessoal, eu tenho em um site uma ABA onde a pessoa clica e vai aparecendo as informações... mas, apesar de funcionar bem, ele sempre exibe no status do navegador do Internet Explorer um erro... Vejam http://www.ideiabiz.com/monteiro/pre_lancamento.asp?id=11|21 e veja que tem as ABAS azul lá em baixo, com nome apresentação e etc... só que ao clicar em alguma ABA lá, tipo: Apresentação, apesar de funcionar, o navegador fala que teve um erro com o script... Veja o codigo de fonte da página e veja o script que faz isso também aqui: http://www.ideiabiz.com/monteiro/s/s.asp Uma função também tem: function selTab(tab) { //o elemento abaixo é div, porque as abas estão dentro de um div. tabs = document.getElementsByTagName("div"); //aqui cai no que eu já tinha dito: você poderá ter quantas abas quiser. Aqui simplesmente contará quantas abas você tem. for (n=0;n < tabs.length;n++) { //aqui vai comparar se o nome do id do seu div é igual a aba que você selecionou. Se for, ele vai mostrar o conteúdo da aba selecionada. Caso contrário, não exibe nada. if (tabs[n].id == tab) { tabs[n].style.display = "inline"; document.getElementById('col' + tab.substring(3,tab.length)).style.borderBottom = "none"; document.getElementById('col' + tab.substring(3,tab.length) + '1').style.borderBottom = "none"; } else { tabs[n].style.display = "none"; document.getElementById('col' + tabs[n].id.substring(3,tabs[n].id.length)).style.borderBottom = "black 1px solid"; document.getElementById('col' + tabs[n].id.substring(3,tabs[n].id.length) + '1').style.borderBottom = "black 1px solid"; } } } Alguém ver no codigo fonte algum erro? Obrigado mesmo!
×
×
  • Criar Novo...