Ir para conteúdo
Fórum CódigoFonte.net

wmo_btu

Membros
  • Total de itens

    9
  • Registro em

  • Última visita

  1. wmo_btu

    Ajuda!!!

    Tenho um listbox onde é possível fazer multiplas seleções usando o shift ou control, porém quando dou um DataBind(), no banco ele só insere o primeiro registro do listbox. Gostaria de saber o que fazer, se terei que usar uma condição while e como fazer! Obrigado....
  2. wmo_btu

    ajuda

    Galera preciso criar um calendario, tipo outlook, onde mostra todos os dias do mês, onde consiga mudar para mostrar também a semana e até o dia. Esse calendario gostaria de colocar ocupado toda a tela. Gostaria que pudessem me ajudar.. Obrigado...
  3. wmo_btu

    urgente ajuda

    Boa noite pessoal, Gostaria de colocar em uma tela inicial, alguns alertas, tipo: data e uma descrição, esses alertas terão que vir de um banco de dados em access, ex: Quando fizer alguma modificação em algum registro do campo descrição no banco de dados, ele terá que aparecer na tela inicial, como uma alerta, mais ou menos como se fosse uma notícia que aparece e fica até que a pessoa aperte para visualizar. Gostaria de saber se alguém poderia me ajudar? Desde já obrigado. William
  4. wmo_btu

    Ajuda!!

    Não é bem isso, mas acho que você pode me ajudar... Bom é o seguinte: Tenho um form de pesquisa, quando o usuário digita o valor no campo de texto, esse valor teria que ser armazenado em um cookies ou session, porque só irei requisitá-lo duas páginas à frente, nessa página quer irei requisitá-lo preciso fazer a comparação desse valor que foi armazenado na session ou cookies com o banco de dados, para que ele retorne os valores desejados. Será que você pode me ajudar... Obrigado...
  5. wmo_btu

    Ajuda!!

    Pessoal como faço para requisitar um determinado valor de um campo de texto que está para trás, tipo longe da página em que estou solicitando, já tentei mas ele não acha, acredito que seja porque essa página está longe da que estou requisitando, espero que tenham me entendido... Desde já obrigado..
  6. wmo_btu

    Ajuda!!

    Boa Tarde Pessoal. Gostaria que se possível alguém me ajudasse. Estou com esse código em uma tela de pesquisa, ele está funcionando legal, exceto na última condição "<% if request.Form("pesq") = "autor" or request.Form("pesq") = "reu" then%>", nesse condição tem um laço, mas não está funcionando. Se alguém puder me ajudar fico grato. Até.... <% campoRadio1 = request.Form("categoria") set conn = server.createobject ("ADODB.connection") conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\Documents and Settings\William\Desktop\projeto\banco.mdb" if request.Form("categoria") = campoRadio1 then inst_sql="SELECT * from processo where categoria = '"& request("categoria") &"'" end if if request.Form("pesq") = "processo" then inst_sql="SELECT * from processo where categoria = '"& request("categoria") & "' and ano = '"& request("ano") & "' and numero = '"& request("numero") &"'" end if if request.Form("pesq") = "autor" then inst_sql="SELECT * from processo where categoria = '"& request("categoria") & "' and autor = '"& request("nome") &"'" end if if request.Form("pesq") = "reu" then inst_sql="SELECT * from processo where categoria = '"& request("categoria") & "' and reu = '"& request("nome") &"'" end if Set Pedidos = Server.CreateObject("ADODB.Recordset") Pedidos.Open inst_sql, conn, 3, 3 %> <% set conn = server.createobject ("ADODB.connection") conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\Documents and Settings\William\Desktop\projeto\banco.mdb" if request.Form("pesq") = "processo" then sql="SELECT * from andamento_processo where numero ='" & request("numero") &"'" end if if request.Form("pesq") = "autor" then sql="SELECT * from andamento_processo where autor = '" & request("nome") &"'" end if if request.Form("pesq") = "reu" then sql="SELECT * from andamento_processo where reu = '" & request("nome") &"'" end if Set andamento = Server.CreateObject("ADODB.Recordset") andamento.Open sql, conn, 3, 3 %> <% set conn = server.createobject ("ADODB.connection") conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\Documents and Settings\William\Desktop\projeto\banco.mdb" if request.Form("pesq") = "processo" then sql="SELECT * from andamento_processo where numero ='" & request("numero") &"'" end if if request.Form("pesq") = "autor" then sql="SELECT * from andamento_processo where autor = '" & request("nome") &"'" end if if request.Form("pesq") = "reu" then sql="SELECT * from andamento_processo where reu = '" & request("nome") &"'" else end if Set andamento1 = Server.CreateObject("ADODB.Recordset") andamento1.Open sql, conn, 3, 3 %> <% if pedidos.recordcount = 0 then response.Redirect("erro.asp") end if %> <% if request.Form("pesq") = "processo" then %> <% Do While Not Pedidos.EOF %> <div id="Layer1" style="position:absolute; left:236px; top:346px; width:544px; height:417px; z-index:1; overflow: auto; background-color: #FFFFFF; layer-background-color: #FFFFFF; border: 1px none #000000;"> <table width="100%" border="0"> <tr valign="baseline"> <td height="45"> <div align="right"> <form name="form2" method="post" action="cliente.asp"> <input type="submit" name="Submit" value="Voltar"> </form> </div></td> <td>&nbsp;</td> </tr> <tr> <td width="93%" height="213"><table width="100%" border="0" bordercolor="#999999" bgcolor="#F1F3F3"> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td width="37%" valign="top" bordercolor="#999999"><font size="2">Processo :</font></td> <td width="63%" bordercolor="#999999"> <strong><font size="2"> <% =Pedidos.Fields("tipo") %> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2">N&ordm; do Processo :</font></td> <td bordercolor="#999999"> <strong><font size="2"> <% =Pedidos.Fields("numero") %> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2">Comarca/F&oacute;rum : </font></td> <td bordercolor="#999999"> <strong><font size="2"> <% =Pedidos.Fields("comarca") %> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2">Cart&oacute;rio / Vara :</font></td> <td bordercolor="#999999"> <strong><font size="2"> <% =Pedidos.Fields("cartorio") %> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2">A&ccedil;&atilde;o :</font></td> <td bordercolor="#999999" bgcolor="#F1F3F3"> <strong><font size="2"> <% =Pedidos.Fields("acao") %> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2">Tipo de Distribui&ccedil;&atilde;o :</font></td> <td bordercolor="#999999"> <strong><font size="2"> <% =Pedidos.Fields("tipodedistribuicao") %> </font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2">Distribu&iacute;do em :</font></td> <td bordercolor="#999999"> <strong><font size="2"> <% =Pedidos.Fields("distribuido") %> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td height="30" valign="top" bordercolor="#999999">&nbsp;</td> <td bordercolor="#999999">&nbsp;</td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td height="71" colspan="2" valign="top" bordercolor="#999999"> <div align="center"> <hr size="3" noshade> <p><strong>PARTE(S) DO PROCESSO</strong></p> </div></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td height="20" valign="top" bordercolor="#999999"><font size="2">Autor :<em> </em></font></td> <td bordercolor="#999999"><strong><font size="2"><%=Pedidos.fields("autor")%> &nbsp;</font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td height="20" valign="top" bordercolor="#999999"><font size="2">R&eacute;u<em> : </em></font></td> <td bordercolor="#999999"> <strong><font size="2"><%=Pedidos.fields("reu")%></font></strong></td> </tr> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td height="126" colspan="2" valign="top" bordercolor="#999999"> <p align="center"><strong><font size="2"></font></strong></p> <p align="center">&nbsp;</p> <div align="center"> <hr size="3" noshade> <strong><br> ANDAMENTO(S) DO PROCESSO</strong></div> <div align="center"> <div align="center"></div> </div></td> </tr> <% DO While Not andamento.EOF %> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td height="24" valign="top" bordercolor="#999999"><font size="2"><%=andamento.fields("data")%></font></td> <td valign="top" bordercolor="#999999"><strong><font size="2"><%=andamento.fields("andamento")%></font></strong></td> </tr> <% andamento.MoveNext Loop %> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td colspan="2" valign="top" bordercolor="#999999"><p>&nbsp;</p> <p>&nbsp;</p> <hr size="3" noshade> <div align="center"> <p><strong>S&Uacute;MULA(S) DA(S) SENTEN&Ccedil;A(S) DO PROCESSO</strong></p> <p>&nbsp;</p> </div></td> </tr> <% DO While Not andamento1.EOF %> <tr bordercolor="#F1F3F3" bgcolor="#F1F3F3"> <td valign="top" bordercolor="#999999"><font size="2"><%=andamento1.fields("data")%>&nbsp;</font></td> <td valign="top" bordercolor="#999999"><font size="2"><%=andamento1.fields("sentenca")%>&nbsp;</font></td> </tr> <% andamento1.MoveNext Loop %> </table> <div align="right"><a href="cliente.asp"><br> </a> <form name="form3" method="post" action="cliente.asp"> <input type="submit" name="Submit2" value="Voltar"> </form> </div></td> <td width="7%"><p>&nbsp;</p> <p>&nbsp;</p></td> </tr> </table> </div> <% Pedidos.MoveNext Loop %> <% end if %> <% if request.Form("pesq") = "autor" or request.Form("pesq") = "reu" then%> <% Do until Pedidos.eof %> <div id="Layer3" style="position:absolute; left:187px; top:359px; width:598px; height:71px; z-index:3"> <table width="100%" border="0" bgcolor="#F1F3F3"> <tr bgcolor="#FFFFFF"> <td width="18%"><font size="2"><strong>Nome</strong></font></td> <td width="12%"><font size="2"><strong>N&ordm; Processo</strong></font></td> <td width="12%"><font size="2"><strong>Dist.</strong></font></td> <td width="16%"><font size="2"><strong>Vara</strong></font></td> <td width="5%"><font size="2"><strong>Ano </strong></font></td> <td width="27%"><font size="2"><strong>A&ccedil;&atilde;o</strong></font></td> <td width="10%"><font size="2"><strong>Advogado</strong></font></td> </tr> <tr> <td><font size="2">&nbsp;<%=Pedidos.fields("autor")%></font></td> <td><div align="center"><font size="2"><%=Pedidos.fields("numero")%>&nbsp;</font></div></td> <td><font size="2"><%=Pedidos.fields("distribuido")%>&nbsp;</font></td> <td><font size="2"><%=Pedidos.fields("cartorio")%>&nbsp;</font></td> <td><font size="2"><%=Pedidos.fields("ano")%>&nbsp;</font></td> <td><font size="2"><%=Pedidos.fields("acao")%></font></td> <td><font size="2"><%=Pedidos.fields("advogado")%></font></td> </tr> </table> <form name="form4" method="post" action="cliente.asp"> <input type="submit" name="Submit3" value="Voltar"> </form> <p>&nbsp;</p> </div> <% Pedidos.MoveNext Loop %> <%end if %>
  7. wmo_btu

    Ajuda!!

    Estou passando um link, é + ou - o que eu quero, quando o usuário selecionar o radio processo ele obrigatóriamente terá que digitar o ano, se não digitar aparece uma mensagem para ele, pedindo que digite o ano, caso ele não selecione o radio processo a pesquisa será feita normalmente. http://www.geocities.com/wmo_btu/index.html
  8. wmo_btu

    Ajuda!!

    Obrigado pela resposta, mas não entendo muito a respeito de javascript, será que você poderia colocar um exemplo. Desde já obrigado...
  9. wmo_btu

    Ajuda!!

    Bom Dia! Estou tento problema com uma tela de pesquisa, como não entendo de Javascript, está difícil para resolver, bom o problema é o seguinte: Tenho um radio que pode ser opcional a escolha, o usuário pode escolher ou não, mas quando o usuário escolhe o radio, ele habilita um campo de texto e coloca o foco nesse campo, bom até aí tudo bem, o que eu gostaria é que, quando o usuário escolher esse radio e deixar o campo sem dados surgisse uma mensagem (MSGBOX), dizendo que o campo não pode ficar em branco, caso o usuário não escolha o radio ele não deverá fazer o bloqueio. Será que alguém poderia me ajudar. Obrigado, William
×
×
  • Criar Novo...