Ir para conteúdo
Fórum Script Brasil

fantasma

Membros
  • Total de itens

    901
  • Registro em

  • Última visita

Tudo que fantasma postou

  1. você tem que saber algum tipo de programação para web....tipo asp, php e outros
  2. fantasma

    Upload De Imagem

    você se ajuda http://www.plugmasters.com.br/conteudo/asp/upload
  3. fantasma

    Asp

    você pode postar o cogigo para dar uma olhada
  4. verifica a atualização do browser? que sistema operacional você esta utilizando?
  5. fantasma

    While

    Obrigado a todos pois verifiquei o funcionamento do comando que o bareta passou e deu certo valeu tb Principe minha solução foi essa sql="select distinct email1 from tab_serv where tipo_serv='"&strQ&"'" set objRS=DB.execute(sql)
  6. fantasma

    While

    vamos lá tenho alguns checkbox composto de serviços ai usei o select strQ = "select * FROM tab_serv WHERE tipo_serv ='"& strQ &"'" Set objRS = DB.Execute(strQ) fiz uma tabela no banco accesss com o nome de tab_serv nesta tab os campos são id cliente tipo_serv email1 1 m pro sicial - marcelo@sp.gov.br 2 m WEB DOMINO01 - marcelo@sp.gov.br so que tem email repetidos, então a logica é o seguinte: quando o usuario selecionar alguns checkbox's o select seleciona os serviços que foi escolhido pelo usuario no checkbox mas no campos email pode ter email repetido <%do while not objrs.EOF %><%=objrs("email1")%>;<%objrs.MoveNext%><%Loop%>
  7. fantasma

    While

    vamos lá tenho alguns checkbox composto de serviços ai usei o select strQ = "select * FROM tab_serv WHERE tipo_serv ='"& strQ &"'" Set objRS = DB.Execute(strQ) fiz uma tabela no banco accesss com o nome de tab_serv nesta tab os campos são id cliente tipo_serv email1 so que tem email repetidos, então a logica é o seguinte: quando o usuario selecionar alguns checkbox's o select seleciona os serviços que foi escolhido pelo usuario no checkbox mas no campos email pode ter email repetido <%do while not objrs.EOF %><%=objrs("email1")%>;<%objrs.MoveNext%><%Loop%> ve se você entendeu
  8. fantasma

    While

    você PODE EXPLICAR O COD MELHOR JOGUEI DESTE JEITO E NADA Dim EmailsEnviados EmailsEnviados = "" do while not objRS.eof If InStr(1,EmailsEnviados,objRS("email1")) < 1 Then 'Executa aqui o que você quiser, envia email ou sei la´ End if EmailsEnviados = EmailsEnviados & objRS("email1") & "," objRS.MoveNext Loop
  9. fantasma

    While

    issso vem do check box, onde pode ter dois checkbox selecionados por issso que pode vir email iguais tenho isso strQ = "select * FROM tab_serv WHERE tipo_serv ='"& strQ &"'" Set objRS = DB.Execute(strQ) se o tipo_serv for = strQ vai pegar o email daquela linha so que tem email que é igual e eu não quero que inclua.
  10. fantasma

    While

    não entendi
  11. fantasma

    While

    tenho um campo com email com varios e-mail iguais e tb diferente como faço while para verificar se e igual , se for igual, vai para o prox. quero pegar somente os diferentes ok
  12. fantasma

    Aspas

    então isso é real Campo TEXTO: ' " & variavel & " ' , Campo NUMERO: " & variavel & " , Campo DATA: " & variavel & " , Campo MEMO: ' " & variavel & " ' ,
  13. fantasma

    Select

    vou tentar explicr melhor, não sei sei é isso que você entendeu tenho alguns cliente que usa alguns serviços, e tb tem cliente que usa o mesmo serviço, quando o serviço para de funcionar é startado o e-mail informando que o serviço não esta disponivel, so que o cliente tem vez que tem mais de um e-mail. então fiz um banco com cliente serviços email so que dentro do campos e-mail tem vez que repete, ai queria verificar se o e-mail é diferente, caso seja incluir no campo para , para o envio do e-mail
  14. fantasma

    Select

    mas como ficaria strQ = "select * FROM tab_serv WHERE tipo_serv ='"& strQ &"'" Set objRS = DB.Execute(strQ)
  15. fantasma

    Select

    id cliente cod_serv tipo_serv email1 0 zzzz a a@sp.gov.br 0 zzz a d@sp.gov.br 0 zzzz c t@sp.gov.br 0 ffff d g@sp.gov.br 0 ttt e g@sp.gov.br 0 yyy f h@sp.gov.br 0 hh a j@sp.gov.br serv=Request.form("checkbox") response.write serv If Request.form("checkbox") <> "" Then strQ = Request.form("checkbox") strQ=Replace(strQ,",","' OR tipo_serv='") strQ=Replace(strQ,"=' ","='") strQ = "select * FROM tab_serv WHERE tipo_serv ='"& strQ &"'" Set objRS = DB.Execute(strQ) Ate aqui tudo bem mas eu tenho um campo no form que é um campo chamado para que é ande vai os email <%do while not objrs.EOF %><%=objrs("email1")%>;<%objrs.MoveNext%><%Loop%> beleza tem como fazer um if dentro do do while para pegar somente os email diferentes
  16. fantasma

    Aspas

    alguém pode explicar o trabalho das aspas simples e dupla dentro do sql
  17. fantasma

    Anexar Arquivo No Email

    <% Set Mailer = CreateObject("CDONTS.NewMail") Mailer.From = "eu@dominio.com.br" ' e-mail de quem esta enviando a mensagem Mailer.To = "conta@destinatario.com.br" ' e-mail de quem vai receber a mensagem Mailer.CC = "conta@destinatario.com.br" ' Com Cópia Mailer.BodyFormat = 1 ' parametro de formatação Mailer.MailFormat = cdoMailFormatText ' parametro de formatação Mailer.AttachFile "e:\home\login\dados\arquivo.txt" 'caso queira anexar algum arquivo ao seu e-mail Mailer.Subject = "Assunto do E-mail" Mailer.Body = "Corpo da Mensagem" Mailer.Send Set Mailer = Nothing %>
  18. isso mesme que eu quero.......tem como
  19. tenho este script que quando clica em selecionar todos ele seleciona todos....pergunta tem como selecionar somente alguns, os que eu queira <html> <head> <title>Seleciona todas</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body> <form name="selecao" method="post" action=""> <p> <input name="op1" type="checkbox" id="op1" value=""> Op&ccedil;&atilde;o 1 <br> <input name="op2" type="checkbox" id="op2" value=""> Op&ccedil;&atilde;o 2<br> <input name="op3" type="checkbox" id="op3" value=""> Op&ccedil;&atilde;o 3<br> <input name="op4" type="checkbox" id="op4" value=""> Op&ccedil;&atilde;o 4<br> <input name="op5" type="checkbox" id="op5" value=""> Op&ccedil;&atilde;o 5<br> <input name="op6" type="checkbox" id="op6" value=""> Op&ccedil;&atilde;o 6 </p> <p>Selecionar Todas <input name="todas" type="checkbox" id="todas" value="checkbox" onClick="selecionar_todas(this.checked)"> </p> </form> <script language="JavaScript"> formulario=document.selecao; function selecionar_todas(retorno){ if(retorno==true){ for(i=0;i<formulario.length;i++){ if(formulario.elements.type=="checkbox" && formulario.elements.name!="todas"){ if(formulario.elements.checked==false){ formulario.elements.checked=true; } } } } else { for(i=0;i<formulario.length;i++){ if(formulario.elements.type=="checkbox" && formulario.elements.name!="todas"){ if(formulario.elements.checked==true){ formulario.elements.checked=false; } } } } } </script> </body> </html>
  20. fantasma

    Data

    Obrigado andreia_sp...valeu....qualquer duvida estarei aqui.... Bjs
  21. fantasma

    Data

    Quero acrescenta 5 dias em cima de um data....alguém pode dar um luz
  22. Como faço para imprimir em impressora nota fical
  23. de uma olhada que sabe ajuda;;;; http://www.freecode.com.br/forum/index.php...t=0entry32536
  24. fantasma

    Tecla Voltar

    aqui explica tudo para vc http://forum.brclube.net/index.php?showtopic=4511
  25. fantasma

    Link

    Tem que ir no forum para office http://scriptbrasil.com.br/forum/index.php?showforum=15
×
×
  • Criar Novo...