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

Flash+ASP - Formulário para envio de email - Ajuda por favor!

Discussão em 'Programação' iniciada por pinifarina, 4 de Março de 2009. (Respostas: 0; Visualizações: 1253)

  1. Boas!
    Sou novo nestas andanças e apresento-me já. Sou o Bernardo, do Porto e ando aqui ás aranhas em terrenos pantanosos de flash e asp :)

    Não tenho nenhuma experiência e preciso mesmo que alguma alma caridosa me dê uma ajudinha.

    Estou a utilizar um flash template gratuito para converter no meu futuro site. Até aqui tudo bem. Sempre que me aparece um obstáculo lá perco eu umas horitas para resolvê-lo, ou no fla, ou no html...mas aqui a coisa complica-se.

    O site tem um pequeno formulário de pedido de contacto direccionado a mim:

    CAMPOS:
    your name
    your company
    telephone
    e-mail
    Message

    OPÇÕES:
    reset
    send

    Já compilei e alojei o site, e tudo funciona bem. Mas quando testo um pedido de contacto através do formulário, abre-se nova janela a dizer que foi enviado, mas nada é enviado.

    Já tentei n configurações a nivel do email, smtp, etc e nada altera isto.

    Todos os ficheiros no alojamento estão na pasta httpdocs que contém, entre outros, um swf (a publicação do fla), o index.html, o contact.asp e o contact.php

    Os códigos originais são:

    ------------------------------------------
    CONTACT.ASP
    Código:
    <%
        for i=1 to 7
             message=Request("message")
        next
             message=message + Request("message")    
            smtpServer = "enter your SMTP SERVER HERE"
            smtpPort = 25
            
    
            name = Request("Your_Name:")
            Set myMail = CreateObject("CDO.Message") 
            myMail.Subject = "from " & name
            myMail.From = Request("Your_Email:")
            myMail.To = Request("recipient")
            myMail.HTMLBody = "<html><head><title>Contact letter</title></head><body><br>" & message & "</body></html>"
            myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
            myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
            myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpPort
            myMail.Configuration.Fields.Update 
            myMail.Send
        
    %>
    
    -------------------------------------------------------------
    CONTACT.PHP
    Código:
    <?
    Error_Reporting(E_ALL & ~E_NOTICE);
    
     while ($request = current($_REQUEST)) {
         if (key($_REQUEST)!='recipient') {
            $pre_array=split ("&777&",  $request);
            $post_vars[key($_REQUEST)][0]=$pre_array[0];
            $post_vars[key($_REQUEST)][1]=$pre_array[1];
        }
        next($_REQUEST);
    }
    
    
    
    reset($post_vars);
    
    
    $subject="From ".$post_vars['your_name'][0] ;
    $headers= "From: ".$post_vars['your_email'][0] ."\n";
     $headers.='Content-type: text/html; charset=iso-8859-1';
     $message='';
      while ($mess = current($post_vars)) {
          if ((key($post_vars)!="i") && (key($post_vars)!="your_email") && (key($post_vars)!="your_name")) {
    
             $message.="<strong>".$mess[1]."</strong>&nbsp;&nbsp;&nbsp;".$mess[0]."<br>";
        }
        next($post_vars);
     }
    
    mail($_REQUEST['recipient'], $subject,  "
    <html>
    <head>
     <title>Contact letter</title>
    </head>
    <body>
    <br>
      ".$message."
    </body>
    </html>" , $headers);
    echo ("Your message was successfully sent!");
    
    ?>
    <script>
        resizeTo(300, 300);
    </script>
    --------------------------------------------------------------------------

    Alguem me pode ajudar? Preciso mesmo resolver isto....
    Á alma caridosa peço que me explique como se fosse muito burro, lool.
    Assim, caso seja necessário deixo os exemplos para substituição:

    o meu email (do alojamento) para receber os pedidos de contacto » [email protected]
    servidor de envio (do alojamento) » mail.meu-alojamento.com
    username (autenticação) » contacto
    password (autenticação) » 123456789

    Obrigado!
     
    Última edição pelo moderador: 5 de Março de 2009

Partilhar esta Página