Ir para conteúdo
Fórum Script Brasil

marcos_804

Membros
  • Total de itens

    379
  • Registro em

  • Última visita

Posts postados por marcos_804

  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. 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

  5. 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

  6. 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.

  7. Procura por linha do seu codigo fonte e mude a cor dos links para branco:

    a:link {
        color: #FFFFFF;
        text-decoration: none;
    }
    a:visited {
        color: #FFFFFF;
        text-decoration: none;
    }
    a:hover {
        color: #FFFFFF;
        text-decoration: none;
    }
    a:active {
        color: #FFFFFF;
        text-decoration: none;
    #FFFFFF = BRANCO
    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>

  8. 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

  9. 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

  10. 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.

  11. 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

  12. 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

  13. 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>"
    
    %>

  14. 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í.

  15. 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

×
×
  • Criar Novo...