Ir para conteúdo
Fórum Script Brasil

jucacabala

Membros
  • Total de itens

    172
  • Registro em

  • Última visita

Tudo que jucacabala postou

  1. jucacabala

    Onde Está O Erro?

    era realmente a tal da permissão agora esta tudo certinho Valeu pela dica beijocas da Juju
  2. jucacabala

    Image Field

    mas você sabe como é
  3. jucacabala

    Onde Está O Erro?

    eu esqueci de mudar o "select" por "update" agora deu este erro
  4. jucacabala

    Onde Está O Erro?

    ola tenho uma pagina que altera os dados do banco altera.asp <!-- #include file="conexao.inc" --> <% Response.Expires = 0 DIM conexaodb, rs, str Dim senha, email, razao, contato, endereco, numero, complemento, bairro, cep, cidade, estado, ddd, ramal, tel1, tel2, fax senha = Trim(Request.form("senha")) email = Trim(Request.form("email")) razao = Trim(Request.form("razao")) contato = Trim(Request.form("contato")) if contato = "" then contato = " " end if endereco = Trim(Request.form("endereco")) numero = Trim(Request.form("numero")) complemento = Trim(Request.form("complemento")) if complemento = "" then complemento = " " end if bairro = Trim(Request.form("bairro")) cep = Trim(Request.form("cep")) cidade = Trim(Request.form("cidade")) estado = Trim(Request.form("estado")) ddd = Trim(Request.form("ddd")) ramal = Trim(Request.form("ramal")) if ramal = "" then ramal = " " end if tel1 = Trim(Request.form("tel1")) tel2 = Trim(Request.form("tel2")) fax = Trim(Request.form("fax")) str = "Select usuarios SET senha = '"&senha&"', email = '"&email&"', razao = '"&razao&"', contato = '"&contato&"', endereco = '"&endereco&"', numero = '"&numero&"', complemento = '"&complemento&"', bairro = '"&bairro&"', cep = '"&cep&"', cidade = '"&cidade&"', estado = '"&estado&"', ddd = '"&ddd&"', ramal = '"&ramal&"', tel1 = '"&tel1&"', tel2 = '"&tel2&"', fax = '"&fax&"'" call abreconexao Set rs = conexaodb.Execute(str) %> <html> <head> <link href="estilos.css" rel="stylesheet" type="text/css"> <title>::.. J&amp;W Tecnologia de Tr&acirc;nsito ..::</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <script language="JavaScript"> <!-- function abre() { var foto = window.open("","janela","width=350,height=360,resizable=no,toolbar=0,location=0,directories=0,status=no,menubar=0"); setTimeout ("document.dados.submit();",10); } //--> </script> <style type="text/css"> <!-- body { margin-left: 0px; margin-right: 0px; margin-bottom: 0px; margin-top: 0px; } --> </style></head> <body> <table width="780" border="0" cellspacing="0" cellpadding="0"> <tr> <td colspan="4"><!--#include file="menu.asp" --></td> </tr> <tr bgcolor="#0265BD"> <td width="171" rowspan="6" valign="top"><!--#include file="menu_lateral.asp" --></td> <td colspan="3" bgcolor="#0265BD"><img src="imagens/spacer.gif" width="10" height="3"></td> </tr> <tr bgcolor="#0265BD"> <td width="594" bgcolor="#E5E5E5"><img src="imagens/spacer.gif" width="10" height="1"></td> <td width="30" rowspan="3" valign="top"><a href="javascript:window.history.go(-1);"><img src="imagens/ico_voltar_noticias.gif" alt="voltar" width="30" height="33" border="0"></a></td> <td width="5" rowspan="5" valign="top" bgcolor="#0265BD"><img src="imagens/spacer.gif" width="5" height="8"></td> </tr> <tr bgcolor="#0265BD"> <td height="4"><img src="imagens/spacer.gif" width="10" height="3"></td> </tr> <tr bgcolor="#0265BD"> <td width="594" bgcolor="#E5E5E5" class="arial_cinza">&nbsp;&nbsp;&Aacute;rea Restrita: Alterar Dados</td> </tr> <% if session("logado")="" then response.redirect"login.asp" end if %> <tr bgcolor="#0265BD"> <td colspan="2"><img src="imagens/spacer.gif" width="10" height="3"></td> </tr> <tr bgcolor="#0265BD"> <td colspan="2" bgcolor="#FFFFFF"> <table width="100%" border="0" cellpadding="10" cellspacing="0" class="arial_textos"> <tr> <td height="200" align="center" valign="middle">Seus dados foram alterados com sucesso. </td> </tr> </table></td> </tr> <tr bgcolor="#0265BD"> <td colspan="4"><img src="imagens/spacer.gif" width="10" height="5"></td> </tr> <tr bgcolor="#1B3855"> <td colspan="4"><img src="imagens/spacer.gif" width="10" height="8"></td> </tr> </table> <% rs.close call fechaconexao Set rs = Nothing %> </body> </html> mas ta dando este erro alguém pode me dar uma luz?
  5. jucacabala

    Option

    FIZ COMO O PRINCIPE FALOU O DEU ERRO TENTEI ISSO E DEU CERTO <option <%if rs("estado") = "AC" then %> selected <%end if%> value="AC">AC</option>
  6. jucacabala

    Image Field

    <input name="enviar" type="image" id="enviar2" src="imagens/bt_enviar.gif" border="0">
  7. consegui fazer usabdo session na variavel
  8. tem como esconder a URL para que o id passado de uma pagina para outra não seja visualizado pelo usuario? evitando que ele mude o atraves da url e consulte os dados de outro usuario? http://localhost/tectrans/login_passou.asp?id=2 agradeço a atenção
  9. estou usando para os botoes de meu form o image field. como posso colocar nele a função de reset, para limpar o form?
  10. ixiiiiiii acho que compliquei demais então resolvi colocar no form um select option onde o usuario informa se ele já esta ou não cadastrado isso já resolveu meu problema o que não consegui fazer ainda é delatar os tals registros do banco conforme a data do servidor... deletar registros mas valeu a atenção!
  11. e como saber por qual pagina ele preencheu a inscrição?
  12. como faço para passar o valor de uma variavel para um campo hidden? eu tenho duas paginas eventos_sim.asp eventos_nao.asp dentro destas paginas possui um link "cadastre-se", que vai para o mesmo formulario. este formulario sera enviado via email o que preciso é saber quando um usuario preenche o formulario por qual pagina ele enviou. abraços
  13. jucacabala

    Excluir Registros

    eu coloquei este codigo no index: <!-- #include file="conexao.inc" --> <% DIM conexaodb, rs, str str = "Delete * from evento where data_evento < #" & date() & "# " call abreconexao Set rs = conexaodb.Execute(str) %> deu esse erro: Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][Driver ODBC para Microsoft Access] Não foi possível excluir items das tabelas especificadas. /tectrans/index.asp, line 6
  14. jucacabala

    Excluir Registros

    erro: Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'data_evento >= #24/2/2005# Delete * from evento where data_evento < #24/2/2005#'. /julyana/eventos.asp, line 8 meu codigo: <!-- #include file="conexao.inc" --> <% DIM conexaodb, rsEvento, strEvento strEvento = "select * from evento where data_evento >= #" & date() & "# " strEvento = strEvento & "Delete * from evento where data_evento < #" & date() & "# " strEvento = strEvento & " order by data_evento desc " call abreconexao Set rsEvento = conexaodb.Execute(strEvento) %>
  15. jucacabala

    Excluir Registros

    então pera ai eu monto no meu index um "select = Delete * from tabela WHERE campo=valor" mas como eu faço para verificar as datas?
  16. jucacabala

    Excluir Registros

    eu gostaria que os registros fossem excluidos automaticamente.
  17. jucacabala

    Excluir Registros

    tem um banco com tres tabelas evento: com uma chave-primaria "codigo" objetivo: com o campo "codigo" (o mesmo valor da tabela evento) programa: com o campo "codigo" (o mesmo valor da tabela evento) esta tabela evento possui um campo data_evento gostaria que quando a data atual fosse maior que a data cadastrada no BD este registro fosse excluido excluindo tambem os registros das tabelas "objetivo" e "programação" que contem o mesmo "codigo" da tabela eventos meu codigo: <% DIM conexaodb, rsEvento, strEvento strEvento = "select * from evento where data_evento >= #" & date() & "# " strEvento = strEvento & " order by data_evento desc " call abreconexao Set rsEvento = conexaodb.Execute(strEvento) %>
  18. deu certo! <!-- #include file="conexao.inc" --> <% DIM conexaodb, rsEvento, strEvento strEvento = "select * from evento where data_evento >= #" & date() & "# " call abreconexao Set rsEvento = conexaodb.Execute(strEvento) %> . . . . . . . <% if rsEvento.Eof then %> <tr> <td colspan="2"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="200" align="center" class="arial_textosObs">Nenhum evento cadastrado!</td> </tr> </table> </td> </tr> <% else Do While Not rsEvento.Eof %> <tr> <td width="15" valign="top"><img src="imagens/det_quadrado.gif" width="7" height="7"></td> <td> <span class="arial_verde"> <% = rsEvento.Fields("nome_evento") %> </span><br> <span class="arial_textos"> Data do evento: <% = rsEvento.Fields("data_evento") %> </span><br> <span class="arial_textos"> Cidade: <% = rsEvento.Fields("cidade") %> </span><br> <a href="eventos_sim.asp?codigo=<% = rsEvento.Fields("codigo") %>" id="link01">Integrados ao Sistema Nacional de Tr&acirc;nsito (municipalizados - clique aqui)</a><br> <a href="eventos_nao.asp?codigo=<% = rsEvento.Fields("codigo") %>" id="link01">N&atilde;o Integrados ao Sistema Nacional de Tr&acirc;nsito (n&atilde;o municipalizados - clique aqui)</a></td> </tr> <tr> <td colspan="2" valign="top">&nbsp;</td> </tr> <% rsEvento.MoveNext LOOP end if rsEvento.close call fechaconexao Set rsEvento = Nothing %>
  19. não tem como fazer uma função que compara a data atual com a data do evento cadastrado no banco e se for inferior a data atual ele não lista este evento?
  20. Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80040E07) [Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério. /tectrans/eventos.asp, line 8
  21. este campo "status" tem que ter no banco de dados? desculpe mas tambem sou iniciante e meia zé mané em asp
  22. ola povo estou com uma duvida tenho um banco com uma tabela "eventos" na pagina "eventos.asp" eu listo todos os eventos cadastrados no banco. o que eu queria era listar somente os eventos da data de hoje e os que ainda não aconteceram. e quando não houver nenhum evento para acontecer, que aparecesse na pagina alguma mensagem como "nenhum evento cadastrado". minha pagina esta assim: <!-- #include file="conexao.inc" --> <% DIM conexaodb, rsEvento, strEvento strEvento = "select * from evento " call abreconexao Set rsEvento = conexaodb.Execute(strEvento) %> . . . . . . . <% Do While Not rsEvento.Eof %> <tr> <td width="15" valign="top"><img src="imagens/det_quadrado.gif" width="7" height="7"></td> <td> <span class="arial_verde"> <% = rsEvento.Fields("nome_evento") %> </span> <br> <span class="arial_textos"> Data do evento: <% = rsEvento.Field ("data_evento") %></span> <br> <span class="arial_textos"> Cidade: <% = rsEvento.Fields("cidade") %> </span> <br> <a href="eventos_sim.asp?codigo=<% = rsEvento.Fields("codigo") %>" id="link01">Integrados ao Sistema Nacional de Tr&acirc;nsito (municipalizados - clique aqui)</a> <br> <a href="eventos_nao.asp?codigo=<% = rsEvento.Fields("codigo") %>" id="link01">N&atilde;o Integrados ao Sistema Nacional de Tr&acirc;nsito (n&atilde;o municipalizados - clique aqui)</a> </td> </tr> <tr> <td colspan="2" valign="top">&nbsp;</td> </tr> <% rsEvento.MoveNext LOOP rsEvento.close call fechaconexao Set rsEvento = Nothing %> brigadinhu....
  23. jucacabala

    Quebra De Linha

    vou testar se não der certo eu grito brigadinhu
  24. jucacabala

    Quebra De Linha

    é isso que não entendo esta tag eu coloco na pagina que puxa o texto do banco ou na pagina que grava o texto no banco? esta tag que coloquei ai em cima é a que puxa o texto do banco e "imprime" na pagina htm
×
×
  • Criar Novo...