1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Formulario Retorno Html

Discussão em 'Web Development' iniciada por cesar sa, 7 de Novembro de 2007. (Respostas: 9; Visualizações: 1421)

  1. Ola amigos...

    é A MINHA PRIMEIRA VEZ QUE ESTOU NESTE FORUM...

    SERÁ UM PRAZER..ESTAR CONVOSCO, EMBORA EU SEJA IGNORANTE NESTAS COISAS.

    tENHO UMA DÚVIDA SE ME PUDEREM AJUDAR, FICAVA GRATO...

    TENHO UM SITE ON LINE QUE FOI CONCEBIDO POR UM AMIGO DE BORLA EU NA ALTURA PEDI PARA ME COLOCAR O FORMULÁRIO DE RETORNO PARA OS VISTANTES ME CONTACXTEM... SO QUE NÃO FUNCIONA (EU QUERIA QUE DEPOIS DE PREENCHIDO FOSSE REDIRECCIONADO PARA O MEU EMAIL ) COMO FAZER? O SITE FOI CONSTRUIDO EM FRONT PAGE HTML
    OBRIGADOS
     
  2. Asas de Papel

    Asas de Papel Power Member

  3. Obrigado Asas Brancas...

    Já agora queria te pedir um favor...pelos vistos somos de quase vizinhos eu de Viana.

    Haveria hipotese de me ver o site ou corrigir esse erro do formulario...é que eu nisto nao sou grande coisa

    o meu site www.detectivesdeviana.com

    obrigado
     
  4. asas de papel... desculpa chamaei te asas brancas foi sem querer...peço desculpa
     
  5. Asas de Papel

    Asas de Papel Power Member

    Não sei bem como explicar isto, mas eu apenas "dou uns toques" com o HTML puro e CSS. Quanto ao PHP, scripts de flash ou lá o que é, CGi e por aí fora ..eu não percebo nada de nada, porque aliás isso funciona através de servidores e eu não possuo um.
    Dei uma vista e olhos na tua página e achei interessante (: ,agora ..
    desculpa-me quanto ao não poder ajudar mais, mas eu também ando na aprendizagem destas "coisas".

    Aqui fica o meu último trabalho HTML, interagi-o com o HI5.
    http://nepkms.googlepages.com/hi5.html
     
    Última edição: 18 de Novembro de 2007
  6. slack_guy

    slack_guy Power Member

    Pelo que vi do servidor onde o teu site está alojado, podes executar scripts Perl.
    Neste caso, aqui vai uma possibilidade.
    1. Copia e cola o código abaixo num ficheiro com o nome 'envia_mail.cgi';
    2. Colocas o ficheiro na pasta 'cgi-bin' no servidor e atribuis permissão de execução (755)
    3. É suposto existirem duas páginas (para não estarmos a mexer na página que existe): uma com a mensagem de OK e outra com mensagem de erro.
    4. Na página onde tens o formulário, tens de modificar o seguinte:
      Código:
      <form method=post action="http://detectivesdeviana.com/contactos.html" enctype="multipart/form-data">
      para:
      Código:
      <form method=post action="http://detectivesdeviana.com/cgi-bin/envia_mail.cgi" enctype="multipart/form-data">
      

    Atenção: NÃO testei este código com o teu formulário. Na dúvida, não uses.

    Código:
    #!/usr/bin/perl
    use strict;
    use warnings;
    use CGI;
    my $Q = new CGI;
    
    # ------------- POR CONFIGURAR ----------------------- #
    my $dominio       = q|http://www.meudominio.com|;
    my $to            = [email protected]_dominio.com|;
    my $from          = [email protected]_dominio.com|;
    my $subject       = q|Assunto do email|;
    my $redirect_ok   = qq|$dominio/contactos_1.htm|;
    my $redirect_erro = qq|$dominio/contactos_2.htm|;
    my @obrigatorios  = qw/nome email assunto mensagem/;
    # -------------- FIM --------------------------------- #
    
    # Se este script for chamado de fora do dominio, reencaminhamos para a home page
    # Atenção: isto não evita todas as 'brincadeiras', mas é uma 'mini-ajuda'
    if ( $ENV{HTTP_REFERER} !~ /^$dominio/ ) {
        print $Q->redirect( $dominio ), $Q->header;
    }
    
    # Tratamos os dados que veem do formulario. Pelo que vi no site, os nomes dos
    # campos estão correctos
    my $fields = {
        nome     => substr( $Q->param(q|nome|),    0, 200 )  || q|-----|,
        email    => substr( $Q->param(q|email|),   0, 200 )  || q|-----|,
        assunto  => substr( $Q->param(q|assunto|), 0, 200 )  || q|-----|,
        mensagem => substr( $Q->param(q|body|),    0, 2000 ) || q|-----|,
    };
    
    # Se algum dos campos obrigatorios não estiver preenchido, reencaminhamos para a
    # página de erro
    my $valido = 1;
    foreach (@obrigatorios) {
        if ( $fields->{$_} eq q|-----| ) { undef $valido; last; }
    }
    if ( !$valido ) { print $Q->redirect($redirect_erro), $Q->header }
    
    # Se chegámos aqui é por está OK.
    # Processamos o E-mail
    my $texto_mail = <<"MSG";
    
    Novo contacto:
    
        NOME: $nome
       EMAIL: $email
     ASSUNTO: $assunto
    MENSAGEM: $mensagem
    
    MSG
    
    use Mail::Sendmail;
    
    my %mail = (
        To      => $to,
        From    => $from,
        Subject => $subject,
        Message => $texto_mail,
        smtp    => q|localhost|
    );
    
    sendmail(%mail) || die $Mail::Sendmail::error;
    
    # Reencaminhamos para a página de OK
    print $Q->redirect($redirect_ok), $Q->header;
    
     
  7. Boas pessoal....

    Há dias coloquei uma dúvida ...relativamente ao formulário de retorno no meu site, já me tentaram ajudar e tentei ..mas o certo continua na mesma a dar erro alguem me conseguira ver qual o erro? obrigado
     
  8. slack_guy

    slack_guy Power Member

    e quais foram os progressos?
     
  9. ola amigo...

    Muito obrigado pela sua disponibilidade....mas esta dificil.

    Da me erro na mesma...nem sou eu que mexi com a sua ajuda foi o meu filho que da uns toques...mas a nivel de programaçao nao entende muito...

    Vc nao consegue aceder ao site e tentar ver qual o erro ou código que seja necessario mudar mto obrigado
     
  10. Boa noite

    sou um infeliz...ninguem me ajuda a resolver este caso....mas como a esperança é a ultima a morrer v tendo esperança....

    abraço
     

Partilhar esta Página