Ir para conteúdo
Fórum Script Brasil

toretto_PHP

Membros
  • Total de itens

    267
  • Registro em

  • Última visita

Posts postados por toretto_PHP

  1. Obrigado Micheus e Jhonas.

    Ambos contribuiram para que eu conseguisse resolver. Com base no que vocês me passaram eu fiz o seguinte, a grosso modo:

    procedure TFReqMat.removerClick(Sender: TObject);
    var
    i, idMat: integer;
    begin
      With lstReq do
      Begin
           idMat := DataSource.DataSet.FieldValues['id_mat'];
           qlstM.Close;
           qlstM.SQL.Clear;
           qlstM.SQL.Add('DELETE FROM lst_reqm WHERE idMat = "' +codEam +'";');
           qlstM.ExecSQL;
      end;
    end;

    Aqui funcionou... mas beleza... vocês me ajudaram bastante, obrigado novamente.

    Abraços,

  2. E ae véio, beleza?

    Não te respondi antes pois estava de saida do trabalho. :-) Mas vamos lá à solução:

    Vou usar um exemplo simples para ficar mais didatico...

    SELECT a.id, b.id
      FROM table1 AS a INNER JOIN table1 AS b
      ON a.id <> b.id
      WHERE a.id = 1 AND b.id = 5;

    1. Selecionei a mesma coluna duas vezes para formar o resultado com duas colunas iguais;
    2. Defini o ALIAS para tabela1 como A e B e fiz o INNER JOIN;
    3. A lógica está aqui: a.id tem que ser DIFERENTE de b.id
    4. Por fim, havendo o valor 1 no alias a.id e o valor 5 no alias b.id

    O resultado foi duas colunas com todos os resultados com o id = 1 e outra coluna com resultado com id = 5.

    Aqui deu certo dessa forma, tenta fazer o esquema semelhante ao que fiz para você ver o resultado.´

    Abraços.

  3. Ae beleza?

    já tentou usar UNION?

    tipo

    SELECT SUM(nf_item.val_liq_item)as matriz,wfat_mestre.dat_emissao,nf_item.cod_empresa

    FROM nf_item ,wfat_mestre

    WHERE nf_item.num_nff =wfat_mestre.num_nff

    and nf_item.cod_empresa=wfat_mestre.cod_empresa

    and nf_item.cod_empresa ='01'

    UNION SELECT SUM(nf_item.val_liq_item)as matriz,wfat_mestre.dat_emissao,nf_item.cod_empresa

    FROM nf_item ,wfat_mestre

    WHERE nf_item.num_nff =wfat_mestre.num_nff

    and nf_item.cod_empresa=wfat_mestre.cod_empresa

    and nf_item.cod_empresa ='02'

  4. Boa tarde.

    Faz tempo que não posto aqui no ScriptBrasil... como estão?

    Bom, estou montando um sistema em Delphi (sou iniciante) e, embora o meu programa esteja funcionando bem, ainda apresenta alguns problemas que desejo solucionar.

    Como faço para saber qual o índice que está sendo selecionado pelo usuário no DBGrid?

    Fiz um form que monta uma requisição de materiais. O usuário entra com os materiais e automáticamente este vai salvando no bd e exibe no dbgrid. Mas da mesma forma que ele insere eu também quero que seja alterado, excluido, etc. Eu fiz da seguinte forma:

    procedure TFReqMat.btnInsereClick(Sender: TObject);
    var s: string;
    begin
        s := matQtde.Text;
        while Pos(',',s) > 0 do
            s[Pos(',',s)] := '.';
            matQtde.Text := s;
    
       qLstM.Active;
       qLstM.Close;
       qLstM.SQL.Clear;
       qLstM.SQL.Add('INSERT INTO lst_reqm (id_mat, reqm_qtde, id_reqm)');
       qLstM.SQL.Add('VALUES (');
       qLstM.SQL.Add('"'+ IntToStr(idmat) +'",');
       qLstM.SQL.Add('"'+ matQtde.Text +'",');
       qLstM.SQL.Add('"'+ IntToStr(idreqm) +'");');
       qLstM.ExecSQL;
    
       qlstM.Close;
       qlstM.SQL.Clear;
       qlstM.SQL.Add('SELECT');
       qlstM.SQL.Add('materiais.mat_eam, materiais.mat_descr,');
       qlstM.SQL.Add('lst_reqm.reqm_qtde');
       qlstM.SQL.Add('FROM materiais, lst_reqm');
       qlstM.SQL.Add('WHERE materiais.id_mat = lst_reqm.id_mat ');
       qlstM.SQL.Add('  AND lst_reqm.id_reqm = ' + IntToStr(idreqm) + ';');
       qlstM.ExecSQL;
       qlstM.Open;
    
       if qlstM.RowsAffected > 0 then begin
          lstReq.Refresh;  // ATUALIZA O DBGRID
       end;
    
    end;
    Ao apertar o botão Add o usuário vai cadastrar os produtos no bd. Está básico, é claro. Até aí funciona legal. Porém o problema é quando eu quero ver o índice da linha. Suponha que eu inclui dois materiais na requisição, eu selecionei com o mouse a linha 2. Para isso eu fiz um botão e nele fiz o seguinte código
    procedure TFReqMat.removerClick(Sender: TObject);
    var
    i, val: integer;
    begin
      With lstReq do
      Begin
        showmessage(IntToStr(lstReq.SelectedIndex)); // O QUE ME RETORNA É SEMPRE 0.
      end;
    end;

    O que me retorna é sempre zero, independentemente de onde esteja apontando o ponteiro. Porque?

    Obrigado quem vier a me ajudar...

  5. Você usa xampp do linux?

    Se for, você vai ter que instalar manualmente o postgreesql e habilitar ou inserir um LoadModule no arquivo httpd.conf.

    Arquivos de configuração no Linux, como bibliotecas, são os .so. Portanto você terá que localizar o arquivo correspondente ao pg no instalador e inserir em lampp/modules

    aí você vai executar o seguinte comando.

    ./lampp stop

    ./lampp start

    e aí é testar o pg

    Abraços

  6. Tpw... beleza...

    Quanto ao Samba eu sei, sou administrador Linux e também trabalho com Unix. O problema é que não estava conseguindo a comunicação com a Rede Microsoft, fazendo o Linux ser apenas uma simples estação.

    Quanto aos procedimentos que você passou, eu fiz. Eu também já descobri o problema. Não era firewall. O problema estava no Linux que estava configurado realmente incorretamente. Configurei o dhcp.conf e agora está td em ordem... Estou respondendo ao email por ele... :-)

    Qualquer coisa postarei o passo a passo de como fazer o Linux funcionar como estação de rede ms.

    falou aí

    Obrigado a todos.

  7. O fato é que eu consegui instalar a rede e ele envia, mas não está recebendo.

    envia o que?

    recebe o que?

    :D

    Então....

    Talvez (ou totalmente) tenha me expressado mau........

    Quando você entra em propriedades de rede no Linux, assim como no Ruindows, você tem o status da Rede. É este o status... Ele envia, mas não recebe os pacotes de rede que pertencem à rede Microsoft.

    A situação é simples, só que eu não estou entendendo. Tenho um Servidor Win 2003. Por questão de investimento que fizeram e também por causa da licença que renovaram na empresa com a Microsoft, este servidor não poderá ser substituido até que se expire a validade da licença que se renova todos os anos. Enfim, estamos implantando uma rede com estações Linux e precisamos acessar a rede microsoft pelo Linux.

    Como posso montar estação Linux, já que tenho essa situação?

    Abraços

  8. Bom, o problema é o seguinte.

    Já algum tempo administro alguns Servidores Linux. No entanto, estou encontrando um problema para conectar minha estação Linux na empresa em que trabalho.

    O fato é que eu consegui instalar a rede e ele envia, mas não está recebendo.

    Alguém pode me dar uma luz, porque realmente não estou entendo o que está acontecendo, simplesmente deu um branco.

    Estou usando Distro Conectiva 10....

    Abraços

  9. Ae turma, quanto tempo!

    Peguei um programa bullzip que converte o arquivo mdb para mysql, mas estou com alguns problemas.

    Quando vou rodar o programa ele diz q o Driver OBDC não existe. Nesta mensagem, traduzindo, diz q esse driver é do mysql, portanto, me dêem uma luz, qm já converteu por este programa ou por qualquer outro, me ajuda aí, to precisando urgente.

    Abraços

    Eduardo

  10. se continuar a conversa paralela eu fecharei o tópico

    Olha uma coisa o XML já é uma db simples mais é

    então teria que fazer nele sim.

    Agora pra usar uma outra base de dados você poderia se você soube-se aplicar o contexto do xml transformado ele em unidade pra trazer as informações do MySQL

    e mostrar na tela como XSL

    aqui tem muita gente capaz pra ajudar!

    tpw, eu já até consegui fazer o lance q eles pediram, mas apareceu outra dúvida o qual você já me levanto...

    No caso como eu faria isso? XLS, não tow muito habituado com esse tipo de coisa, mas se quiser mandar um tutorial sobre isso, ficaria agradecido, vai ser útil pra mim...

    Abraços

    Eduardo

  11. Galera, tenho estado fora porque estou trampando pra c****** numa empresa que fui convidado aí. Mas quando o trampo amenizar, eu vou voltar aqui e aí eu posso ajudar a galera mais necessitada ae... Mas agora to precisando uma ajuda de vocês... Me dêem uma luz... O causo é o seguinte...

    Eu procuro um comando aqui que faz um trampo do JAVASCRIPT. Mas estou em dúvida sobre como procurá-lo.

    Acontece que estou fazendo um cadastro e no cadastro que to fazendo, gostaria que alguns valores fossem comparados.

    Exemplo:

    O cara digita:

    asdfasdfs

    Gostaria de saber se isso é um email, mas usando uma lógica simples, saber se existe o caractere @ no valor informado.

    Estou com dúvidas em procurar um comando q pegue a variável, e procure na variável se existe tal caractere, se sim, retornar true e continuar o script, ou false, retornando ao cadastro.

    Aguardo uma ajuda ae...

    falou!

  12. cara... não sou de postar para reclamar essas coisa, mas veja bem, você tem toda razão...

    Existem muitos aproveitadores de situação que se dizem isso e aquilo, mas não são nada. Não tanto pela idade, porque hj um pivete de 9 anos pode entrah em n escolas, não citarei nome algum e que me desculpem dizer, com uma certa irresponsabilidade, pois degradam a imagem que nós criamos com muito sacrifício e trabalho. Esses pivete vai faze um cursinho lá e sai diplomado, certificado e n coisas mais, porque todos sabemos que td gira em torno do dinheiro.

    Eu a muito custo fui convidado pra trampar a longa distancia prum comercio online e estou gerenciando o sistema dos cara, mas até onde a gente pode ir com essa pivetaiada, q usando da ingenuidade e "prostitição" por uma nota de 50,00, se vendem para surpir algumas necessidade imbecis, como jogah game na esquina, ou chupá um picolesinho, comprah aquela bike da hora, comprah balinha, pipoca NHAC...! Sai dessa! Acho q isso não leva a lugar nenhum, porque a gente gasta uma grande quantia em grana em cursos em lugares que custam realmente uma fortuna pra gente estuda, sem conta facurty, sem contah as despesas q temos com transporte... Enquanto q essa pivetaiada é ressarcido pelos pais das despesas que tem, ganhando uma mesadinha aki, enquanto q outra galerinha alí fica procurando isso e aquilo, tirando até de qm precisa, não esperando a hora certa de dar o pulo do gato, claro, desvalorizando a nossa imagem criada com tanto sacrifício e investimento.

    Apesar do que eu disse, não os julgo, apenas digo a verdade, pois conheço vários assim por aqui onde moro e em outras cidades onde trabalho. Vejo molekada q devia estar no caderno, aprendendo a escola, mexer com coisa q pra idade é até interessante aprender, mas vai gerar desconforto no futuro...

    Cito ainda o caso dos "prostitutos" que trampam por 50,00, já citei isso em outro tópico e o Jissa levanto bem a questão. Acho que a galerinha ae deveria pensar em como aprender e não aprender apenas para ganhar dinheiro... dinheiro é dinheiro, ganha-se e gasta-se o quanto se ganha, só que mercado cara, uma vez ganho, dificilmente você cai. só se você quiser mesmo ou por pura irresponsabilidade.

    Abraços a todos...

  13. Alguém aqui já criou algum anuncio no ig? Anuncio q teria que inserir os produtos existente no site e mandar para eles?

    Estou aguardando uma resposta deles, mas ainda não me responderam nada, portanto eu preciso disso imediatamente...

    Me Deram um exemplo:

    <?xml version="1.0" encoding="ISO-8859-1"?>

    <LIST>

    <PRODUCT>

      <ID>4667</ID> <!-- codigo do produto -->

      <NAME>SAPATILHA PARA ESPORTES AQUÁTICOS</NAME> <!-- nome do produto -->

      <URL>http://www.lojavirtual.com.br/cgi-bin/ns_mais-info-popup.pl?codigo=4667</URL> <!--  url do produto na loja-->

      <DESCRIPTION>Pratique esportes aquáticos com maior segurança e equilíbrio, sem perder a emoção nas suas manobras mais radicais.</DESCRIPTION> <!-- descrição do produto, este campo tem um tamanho de 2000 caracteres-->

      <PRICE>28.00</PRICE> <!-- preço do produto -->

      <URL_IMG>http://www.lojavirtual.com.br/images/produtos/120/4667.jpg</URL_IMG> <!--  imagem do produto -->

      <CATEGORY>Calçados: esportes </CATEGORY> <!-- categoria do produto na loja -->

      <LAST_UPDATE>01/01/01</LAST_UPDATE> <!-- última atualização do produto -->

    </PRODUCT>

    </LIST>

    Eu teria que inserir um <list> para cada produto ou posso criar um laço abrindo uma conexão pelo mysql a partir do php e enviando, claro as variáveis para xml?

    Tem como? me abram a cabeça ae...

    falou!!

  14. Opa eu testei aqui mas como não tinha os dados do seu banco eu fiz algo mais direto e funcionou

    eu configurei o meu smtp e funcionou normal

    Será que é erro na coleta dos dados?

    Vo tentah aki de novo.. vlw...

    passa o código modificado pra eu dar uma observada beleza?

    falou ae!

  15. A idéia desse script é pegar o valor contido em ref, e puxando o banco de dados, inserir no email os dados do imóvel interessado, para a imobiliária.

    Só que eu não estou vendo o erro, está dando BAD MESSAGE, e eu to achando que é $headers, mas mesmo assim, não estou conseguindo enxergar... o meu servidor está configurado corretamente para testar ini_set(), mas também não me fala da questão do envio..

    Eu até usei para testar um exemplo do codigo do php.net, mas tive que modificar, mas $message carrega a característica do código deles...

    Eis o erro...

    Warning: Bad Message destination in c:\phpdev\www\zanon\mail.php on line 76

    Bom, me ajudem ae, por favor, é emergencial...

    Desde já fico agradecido... :-)

    O código é esse...

    <?

    require("/db/conecta.php");

    $nome_int  = $_POST["nome"];

    $cidade_int  = $_POST["cidade"];

    $email_int  = $_POST["email"];

    $telefone_int = $_POST["telefone"];

    $ref   = $_GET["ref"];

    $tabela  = "imovel";

    $sql_cliente = mysql_query("SELECT * FROM $tabela WHERE ref=$ref'");

    while($linha=mysql_fetch_array($sql_cliente)) {

    $cep  = $linha["cep];

    $detalhes = $linha["detalhes"];

    $val  = $linha["valor"];

    $cidade  = $linha["cidade"];

    $est  = $linha["estado"];

    $endereco = $linha["endereco"];

    $bairro  = $linha["bairro"];

    $area  = $linha["area"];

    $obs  = $linha["obs"];

    }

    $valor  = number_format($val, 2, ",", ".");

    /* Destinatário */

    $to  = "$email_int" ;

    // . ", " ; Observe a vírgula caso queira inserir mais emails...

    /* assunto */

    $subject = "Contato com site Zanon";

    /* mensagem */

    $message = '

    <html>

    <head>

    <title>Birthday Reminders for August</title>

    </head>

    <body>

    <p>Here are the birthdays upcoming in August!</p>

    <table>

    <tr>

      <th>Person</th><th>Day</th><th>Month</th><th>Year</th>

    </tr>

    <tr>

      <td>Joe</td><td>3rd</td><td>August</td><td>1970</td>

    </tr>

    <tr>

      <td>Sally</td><td>17th</td><td>August</td><td>1973</td>

    </tr>

    </table>

    </body>

    </html>

    ';

    $headers  = "MIME-Version: 1.0\r\n";

    $headers .= "Content-type: text/html; charset=iso-8859-1\r\n";

    $headers .= "From: eduardo@pro1000.com.br\r\n";

    ini_set("SMTP","mail.pro1000.com.br");

    mail($to, $subject, $message, $headers); // linha 76

    ?>

  16. Acho que eu entendi o que você qr... eu fiz algo semelhante, mas usei o campo ver e as coordenadas ON e OFF...

    Mas você qr pegar o total de empresas cadastradas ou você quer apenas as empresas que possuirem cadastro ativo?

    falou

×
×
  • Criar Novo...