Ir para conteúdo
Fórum Script Brasil

fantasma

Membros
  • Total de itens

    901
  • Registro em

  • Última visita

Posts postados por fantasma

  1. <% Set rs = conexao.Execute("SELECT * FROM Tab_sexo ") %>

    <select name="sexo">

    <%

    if not rs.eof then

    while not rs.EOF

    if Request.QUERYSTRING("SEXO") = rs("SEXO") then

    Response.Write "<OPTION VALUE = '" & rs ("SEXO") & "' SELECTED>"

    Response.Write rs("SEXO") & "</Option>"

    rs.movenext

    wend

    end if

    %>

    </select>

  2. como fazer isto funcionar

    <html><head><title>Teste JavaScript</title>
    
    &lt;script language="javascript">
    
    function definir_opcao2 (opcao1){
    if (opcao1.value=="Carros") {
    opcao2.options[0].value = "Ford"
    opcao2.options[1].value = "Fiat"
    opcao2.options[2].value = "Volks"
    }
    else {
    if (opcao1.value = "Países") {
    opcao2.options[0].value = "Brasil"
    opcao2.options[1].value = "Japão"
    opcao2.options[2].value = "EUA"
    }
    
    else {
    opcao2.options[0].value = "Azul"
    opcao2.options[1].value = "Verde"
    opcao2.options[2].value = "Preto"
    }
    }
    }
    
    </script>
    </head>
    <body>
    
    <form>
    <select name="opcao1" size="1" onchange="definir_opcao2(opcao1.options[selectedindex].value)">
    <option>Carros</option>
    <option>Países</option>
    <option>Cores</option>
    </select>
    
    <select name="opcao2" size="1">
    <option>Ford</option>
    <option>Fiat</option>
    <option>Volks</option>
    </select>
    </form>
    
    </body></html>

  3. Necessito utilizar o recurso de formatação condicional do Excel, porém usando uma outra celula como referencia.

    Por exemplo:

    Trocar a cor da font da celula B1 caso o valor da celula A1 seja < 5.

    há como fazer isto???????

  4. tenho esse script

    <%

    set objMail = server.createobject("CDONTS.NewMail")

    objMail.From = "helpdesk@teste.pp.tes.br (Informativo )"

    objMail.To = "marcelompm@ig.com.br"

    ObjMail.BCC = ""& Request.form("para") &""

    objMail.Subject = ""&Request.form("assunto") &"-"& Request.Form("chamado")&""

    MsgBody = "<html><head></head><body>teste</body></html>"

    objMail.Body = MsgBody

    objMail.BodyFormat = 0

    objMail.MailFormat = 0

    objMail.Importance = 1

    objMail.Send

    set objMail = Nothing

    %>

    <form name="form1" action="http://ip/intra/teste/inclusao.asp" method="get">

    <input type="hidden" name="ilha" value="<%=Request.Form("rr")%>">

    <input type="hidden" name="chamado" value="<%=Request.Form("teste4")%>">

    <input type="hidden" name="sistemas_afetados" value="<%=Request.form("teste3")%>">

    <input type="hidden" name="dataparali" value="<%=FormataData(Request.Form("teste2")) %>">

    <input type="hidden" name="horaparali" value="<%=Request.Form("teste1") %>">

    <input type="hidden" name="mensagem" value="<%=Request.Form("teste") %>">

    <script language="JavaScript">

    document.form1.submit();

    function irpara()

    {window.opener = window;

    window.opener.location.href="home.htm';}

    irpara()

    </script>

    <%

    eu preciso incluir em uma banco de dados as informações do formulario, fiz a parte do submit automatico mas de vez enquando inclui outra vezes não, , o banco esta em um url http://ip/intra/teste/ , queria um solução para inclusão de dados.

×
×
  • Criar Novo...