Ir para conteúdo
Fórum Script Brasil

marcos_804

Membros
  • Total de itens

    379
  • Registro em

  • Última visita

Tudo que marcos_804 postou

  1. Para manter estado tente assim: $category = (isset($_POST['category'])) ? trim($_POST['category']) : $_GET['category']; $type = (isset($_POST['type'])) ? trim($_POST['type']) : $_GET['type']; } $sql = "select s.url, s.data, s.thumb, s.descryption, c.cat, t.type from site as s inner join cat as c on s.id_cat=c.id_cat inner join type as t on s.id_type=t.id_type where c.id_cat like '%".$category."%' and t.id_type like '%".$type."%' order by s.id_site desc "; //altere (tabela) para o nome de sua tabela. $resultado = mysql_query($sql) or die ("Impossible do it!!!"); Na paginação você coloca assim: echo "| <a href=\"1.php?pg=".($pg + 1[b])."&category=". $category ."&type=". $type ."[/b]\" targe=\"_self\">Next</a>\n"; // link de sua Da maneira acima você vai manter o estado dos dados... Se tiver mais dúvidas poste aí. Abraço.
  2. Cara, desculpa não responder "100%" é que estou saindo para trabalhar agora. Vai uma dica: você não está mantendo o "estado" do filtro, por isso ele não está funcionando corretamente. Ou seja, quando você passa para a próxima página, a sua consulta "perde" os dados de quem ela deve filtrar. Espero ter começado a te ajudar na resolução deste problema. Abraços. Marcos Oliveira
  3. Tenta isso: <html> <head> </head> <body> <script language="Javascript"> function calcularTotal(strQtde, strTotal){ if(strQtde.value != ""){ strTotal.value = parseInt(strQtde.value) * 50; }else{ strTotal.value = ""; } } </script> <form name="frm_aluno"> Quantidade: <input type="text" name="txtQtde" onkeyup="calcularTotal(this, frm_aluno.txtTotal)"><br> Valor: 50<br> Total: <input type="text" name="txtTotal" readonly> </form> </body> </html> []'s Marcos
  4. Tente assim: <script language="Javascript"> function somar(strCampo, strValor){ strCampo.value = parseInt(strValor) + 1; } </script> <input type="button" value="1" onclick="somar(this, this.value)"> []'s Marcos Oliveira
  5. Ludimila, Pense o seguinte, você tem um identificador único para cada notícia, certo? Então, é só criar uma nova tabela com os dados deste identificador que se relaciona com o comentário postado. Exemplo da tabela: TB_Comentarios (idx, id_noticia, de_nome_usuario, de_comentario, de_dta_cadastrado) Onde: idx = indexador da tabela TB_Comentarios id_noticia = identificador da notícia de_nome_usuario = nome do usuário que cadastrou o comentário de_comentario = o comentario em si de_dta_cadastrado = data do cadastro do comentario. Daí depois é só fazer o "select" no banco pelo id_noticia fornecido e mostrar os dados na tela. Espero ter ajudado. []'s Marcos Oliveira
  6. marcos_804

    Música sequencial em php

    Gente, O negócio é muito simples. Não aconselho fazer isso em PHP e se for só pegue a resposta do servidor e trate local no cliente. Para o JS, crie um array que armazene as informações das músicas, depois é só percorrer por este array e agregar ao player. []'s Marcos Oliveira
  7. Quando vi este post comecei a brincar um pouco, afinal programar significar um hobby para mim. Vai o código aí amigo. <html> <head> <title>.:: Create Range ::.</title> <script language="javascript"> var arr_formata = Array("i---<i><!--replace--></i>", "u---<u><!--replace--></u>", "b---<b><!--replace--></b>", "hr---<!--replace--><hr>\n", "br---<!--replace--><br>\n", "sp---<!--replace-->&nbsp;", "tab---<!--replace-->&nbsp;&nbsp;&nbsp;&nbsp;", "a---<!--replace-->"); function saidaHtml(strId, strTexto){ if(strTexto.value.length == 0){ document.getElementById(strId).innerHTML = "<span style='color:#FF0000'>Digite algo na caixa de texto para ver a saída aqui.</span>" }else{ document.getElementById(strId).innerHTML = strTexto.value; } } function selFormata(strTp){ for(i = 0; i < arr_formata.length; i++){ tmp = arr_formata[i].split("---"); if(tmp[0] == strTp){ return tmp[1]; } } return false; } function MexerSelecao(strTexto, strTp){ var tmp_tp = selFormata(strTp); if (document.selection){ strTexto.focus(); sel = document.selection.createRange(); if(tmp_tp){ tmp_tp = tmp_tp.replace("<!--replace-->", sel.text); sel.text = tmp_tp; } strTexto.focus(); }else{ tmp_tp = selFormata(strTp); startPos = strTexto.selectionStart; endPos = strTexto.selectionEnd; strTmpIniTexto = strTexto.value.substring(0, startPos); strTmp = strTexto.value.substring(startPos, endPos); strTmpFimTexto = strTexto.value.substring(endPos); strTmp = tmp_tp.replace("<!--replace-->", strTmp); strTmp = strTmpIniTexto + strTmp + strTmpFimTexto; strTexto.value = strTmp; strTexto.focus(); } } function acaoTecla(e){ if(document.all){ var key = event.keyCode; }else{ var key = e.which; } return key; } function trocaEnter(e, strTexto){ if(acaoTecla(e) == 13){ MexerSelecao(strTexto, 'br'); } } </script> </head> <body> <form name="frm_range"> <input type="button" value="itálico" onclick="MexerSelecao(frm_range.texto, 'i');"> <input type="button" value="negruito" onclick="MexerSelecao(frm_range.texto, 'b');"> <input type="button" value="sublinhado" onclick="MexerSelecao(frm_range.texto, 'u');"> <input type="button" value="traço" onclick="MexerSelecao(frm_range.texto, 'hr');"> <input type="button" value="tab" onclick="MexerSelecao(frm_range.texto, 'tab');"> <input type="button" value="espaço" onclick="MexerSelecao(frm_range.texto, 'sp');"> <hr> <textarea cols="30" rows="10" name="texto" onkeyup="saidaHtml('verFormatacao', this)" onkeypress="trocaEnter(event, this);"></textarea> </form> <div id="verFormatacao"></div> </body> </html> Abraço.
  8. O exemplo que o nosso amigo forneceu é genérico, ou seja, todos os links da sua página ficarão com o mesmo padrão. Você pode mudar somente blocos, veja: <style> #menu a{color:#0000FF} #menu a:hover{color:#FF0000} #menu_novo a{color:#000000} #menu_novo a:hover{color:#111111} </style> <div id="menu"> <a href="#">Link 1</a> <a href="#">Link 2</a> <a href="#">Link 3</a> </div> <div id="menu_novo"> <a href="#">Link 1</a> <a href="#">Link 2</a> <a href="#">Link 3</a> </div>
  9. marcos_804

    musica

    Cara, não tem segredo não. Faz o upload da sua música da maneira que seu server aceita (ftp / painel de controle / etc); copia a url e tem que funcionar, se o arquivo estiver lá.
  10. Amigo, você pode fazer o seguinte: 1. Caso a janela tenha nome você pode referenciar ao campo da janela usando o nome dela, caso não tenha use "parent". Na janela de "popup" <a href="#" onclick="parent.document.getElementById('mudarNome').value = 'Novo Nome'; window.close();">Mudar o nome</a> []'s espero ter ajudado. Marcos Oliveira
  11. Cara, se elas não aparecem não é problema no asp, e COM CERTEZA SIM no html. ASP executa no servidor, quem interpreta o "visual" do site é o BROWSER. Abraço. Marcos Oliveira
  12. marcos_804

    Acesso direto via browser

    Amigo, como este site utiliza o método via POST você deverá fazer uma "gambiarrinha" para solucionar o problema. Você pode criar um página como a que envio abaixo medicamento.asp <% strCdMedicamento = request.querystring("cd_medicamento") %> <html> <head> <title>Carregando...</title> </head> <body onload="documentfrm_medicamento.submit();"> <form action="https://sngpc.anvisa.gov.br/ConsultaMedicamento/index.asp" name="frm_medicamento"> <input type="hidden" value="<%=strCdMedicamento%>" name="NU_REG"> </form> </body> </html> Aí quando você acessá-la pela url "medicamento.asp?cd_medicamento=11111111" ela automaticamente irá redirecionar para a página que mostra os dados do medicamento da anvisa. Espero ter ajudado. Macos Oliveira
  13. marcos_804

    categorias

    Com base nas suas informações da tabela (PS.: Estas informações foram postadas em um outro tópico) +---------+------------+---------+---------------+-------+----------+ |id codigo| nome | decricao precounitario | img | categoria| +---------+------------+---------+---------------+-------+----------+ | 1 555 | doflex | remedio | $ 12 | 1.gif | Gore | | 2 666 | amoxilina | remedio | $ 44 | 2.gif | cook | | 3 777 | morfina | remedio | $ 55 | 3.gif | Ev3 | | 4 888 | carbotratos| remedio | $ 12 | 7.gif | Gore | +---------+------------+---------+---------------+-------+----------+ Você pode fazer o seguinte código ASP que VAI DAR CERTO... Set RS = server.CreateObject("ADODB.RecordSet") DSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& server.MapPath("SEU.BANCO.mdb") id_categoria = request.querystring("id_categoria") if(IsEmpty(id_categoria)) Then strSQL = "SELECT * FROM TESTE" Else strSQL = "SELECT * FROM TESTE WHERE categoria ='"& id_categorai &"'" End if rs.Open strSQL, DSN, 3,3 [... EXECUTE SEU CODIGO AQUI COM O OBJETO DO RS...] F L W
  14. marcos_804

    categorias

    Luiz, você poderia por favor descrever quantas tabelas você tem e quais os campos delas? Além do mais posta todo o codigo ASP aí... porque assim fica dificil ajudar.
  15. Qual está sendo a saída HTML?
  16. Mas aí andrea, como ele vai saber que chegou no ultimo registro? smez, estou meio sem tempo. À noite eu posto uma outra solução.
  17. Cara, Se você quiser fazer um PARA ADQUIRIR CONHECIMENTOS estou aqui para ajudar, do contrário. Acho que não são muitas pessoas que irão ceder assim um script como estes. F L W
  18. Veja se isso resolve: Mude de: For x = 0 to 6 val(x) = rs("p_refe") Next Para: For x = 0 to 6 'SAI DO LOOP SE JÁ TIVER CHEGADO AO FIM DO NÚMERO DE REGISTROS if rs.EOF then exit for val(x) = rs("p_refe") 'MOVE PARA O PROXIMO REGISTRO DO RESULT SET rs.MoveNext Next Testa aí e diz o resultado
  19. Marcelo, Tinha percebido isso antes, mas só agora tive tempo. O problema é na função que gera a tabela Atual está assim: Function getGridColunas(Celula1,Celula2,Celula3,Celula4,Celula5,Celula6) Dim temp temp = "<tr>" temp = temp & "<td>" temp = temp & Celula1 temp = temp & "</td>" temp = temp & "<td>" temp = temp & Celula2 temp = temp & "</td>" temp = "</tr>" temp = "<tr>" temp = temp & "<td>" temp = temp & Celula3 temp = temp & "</td>" temp = temp & "<td>" temp = temp & Celula4 temp = temp & "</td>" temp = "</tr>" temp = "<tr>" temp = temp & "<td>" temp = temp & Celula5 temp = temp & "</td>" temp = temp & "<td>" temp = temp & Celula6 temp = temp & "</td>" temp = "</tr>" getGridColunas = temp End Function Tente usar assim: Function getGridColunas(Celula1,Celula2,Celula3,Celula4,Celula5,Celula6) Dim temp temp = "<table cellpadding='2' cellspacing='2' border='1'>" temp = temp & "<tr>" temp = temp & "<td>" temp = temp & Celula1 temp = temp & "</td>" temp = temp & "<td>" temp = temp & Celula2 temp = temp & "</td>" temp = temp & "</tr>" temp = temp & "<tr>" temp = temp & "<td>" temp = temp & Celula3 temp = temp & "</td>" temp = temp & "<td>" temp = temp & Celula4 temp = temp & "</td>" temp = temp & "</tr>" temp = temp & "<tr>" temp = temp & "<td>" temp = temp & Celula5 temp = temp & "</td>" temp = temp & "<td>" temp = temp & Celula6 temp = temp & "</td>" temp = temp & "</tr>" temp = temp & "</table>" getGridColunas = temp End Function Na primeira função em algumas partes do código eu não concatenava a variável, por isso não aparecia. Tente aí... qualquer coisa dá um grito aí... E olha passa o HTML gerado. falou. PS.: Aguardo 10 minutinhos
  20. Cara, Desculpa a ignorância, mas não tenho bola de cristal. Qual erro? Descreva melhor quem sabe posso te ajudar.
  21. Não sei bem se entendi a sua pergunta, mas vou responder com base no que entendi. 1. Crie um formulário com o método get <form method="get" action="pagina.asp"> 2. Na sua página asp você coloca o seguinte: URL = "pagina.asp?nome=Marcos&sobrenome=Oliveira&idade=20" <% 'Capturando os valores campo1 = request.querystring("nome") campo2 = request.querystring("sobrenome") campo3 = request.querystring("idade") 'Saida do script Response.write "Nome "& campo1 &"<br>" Response.write "Sobrenome "& campo2 &"<br>" Response.write "Idade "& campo3 &"<br>" %>
  22. marcos_804

    categorias

    Bom amigo, Você pode seguir a seguinte solução para o banco, no mais o ASP é muito simples. 1. Faça uma tabela que contenha as categorias [font="Lucida Console"] +---------------------------+ | TB_Categoria | +-------------+-------------+ |id_categoria |de_categoria | +-------------+-------------+ | 1 |Novos | +-------------+-------------+ | 2 |Usados | +-------------+-------------+ | 3 |Semi-novos | +-------------+-------------+[/font] 2. Faça uma tabela que contenha os produtos [font="Lucida Console"] +-----------------------+ | TB_Produto | +-----------+-----------+ |id_produto |de_produto | +-----------+-----------+ | 1 |Produto 1 | +-----------+-----------+ | 2 |Produto 2 | +-----------+-----------+ | 3 |Produto 3 | +-----------+-----------+[/font] 3. Faça uma tabela para relacionar os produtos com as categorias. - Neste momento você pode se perguntar, "para quê três tabelas?", porque você pode ter um produto para duas categorias, desta maneira você não cria uma redundância no banco. [font="Lucida Console"] +-------------------------+ | TB_ProdutoCategoria | +-----------+-------------+ |id_produto |id_categoria | +-----------+-------------+ | 1 | 1 | +-----------+-------------+ | 1 | 2 | +-----------+-------------+ | 2 | 3 | +-----------+-------------+ | 2 | 1 | +-----------+-------------+ O SQL seria o seguinte: [font="Lucida Console"]SELECT * FROM TB_ProdutoCategoria a INNER JOIN TB_Produto b ON a.id_produto = b.id_produto INNER JOIN TB_Categoria c ON a.id_categoria = c.id_categoria WHERE c.id_categoria = 1;[/font] DER [font="Lucida Console"] +---------------------+ | TB_Produto | |---------------------+ +------+ id_produto | | |---------------------+ | |de_produto | +---------------------+ | +---------------------+ | TB_ProdutoCategoria | | +-----------+---------| | |id_produto +---------------------+ +---------------------| +---------------------+ |id_categoria +---------------------+ | TB_Categoria | +---------------------+ | |---------------------+ +------+ id_categoria | |---------------------+ |de_categoria | +---------------------+[/font] Cara, qualquer dúvida posta aí.
  23. PS.: Cara acabei de terminar um código como este que está funcionando... Estou correndo para o trabalho, mais tarde eu posto o código e passo o link para você ver.
  24. Cara é assim, quando eu declarei "Dim val(6)" eu queria um array dentro do intervalo de 0 e 6. O fato é que não me lembro muito bem destas conexoes Tente mudar "Dim val(6)" para "Dim val(10)", assim você reserva 10 espaços dentro do array. E olha para você ver realmente o que está se passando no loop faça o seguinte. Coloque a atribuição como comentário depois coloque para imprimir "x", assim: For x = 0 to (rs.RecordCount - 1) 'Imprima a variável de X assim você ver se ele está mesmo indo somente de 0 a 6. Response.Write( x &"<br>") 'Coloque esta linha como comentário 'val(x) = rs("p_refe") Next 'Pare a execução do código nesta linha Response.End Vai postando o resultado aí que vamos analisar... OOOOOOOOOOPPPPPPPPPSSSS! Cara faz o seguinte... 'Deixe o espaço para 10 posições Dim val(10) 'Aqui você só precisa ir de 0 até 5 For x = 0 to 5 'Nesta linha você verifica se ainda há dados do banco, se não houver ele sai do laço if rs.EOF then exit for 'Atribui val(x) = rs("p_refe") Next
  25. Como assim "[...] e fica permanentemente a tentar"? Descreva um pouco melhor, e coloque o codigo da página de login ai. Marcos Oliveira
×
×
  • Criar Novo...