Problema com Form php

[Henrique Flausino]

Caros.

Estou com um problema no sistema de formulário em php.

Desenvolvi este código e estava funcionando corretamente mas de uma hora para outra para de funcionar sem mensagem de erro.

Aparece a página que o form foi enviado mas não chega o e-mail, nem como spam.

Isso vem ocorrendo com frequencia e quando mudo para outro domínio ele funciona normalmente.

Detalhe, ele para de funcionar temporáriamente e volta sem dar nenhum erro e sem ser moficado.

Os dois domínios são locaweb e não é diferença de programação nem nada.

Será que alguém poderia me ajudar?

Código:

<?

$Form_Arquivo        =    substr (strrchr ($HTTP_REFERER, "/"),1);        



if (!empty($Form_Arquivo))                                                

{                                                                        

    $Form_Dominio    =    str_replace($Form_Arquivo, "", $HTTP_REFERER);    

}

else

{

    $Form_Dominio    =    $HTTP_REFERER;                                    

}



$Form_Envia_Html        =    strtoupper($HTTP_POST_VARS["Form_Envia_Html"]);    // Envia HTML Mail? (sim/não)

$Form_Cor_Do_Fundo        =    strtoupper($HTTP_POST_VARS["Form_Cor_Do_Fundo"]);    // Cor do BackGround em Hexadecimal (ex. #0066ff)

$Form_Cor_Da_Letra        =    strtoupper($HTTP_POST_VARS["Form_Cor_Da_Letra"]);    // Cor da Fonte em Hexadecimal (ex. #0066ff)

$Form_Tamanho_Da_Letra    =    $HTTP_POST_VARS["Form_Tamanho_Da_Letra"];            // Tamanho da Fonte (de 1 a 7)

$Form_Url_Logo        =    $HTTP_POST_VARS["Form_Url_Logo"];                // Url do Logotipo

$Form_Alinha_logo        =    strtoupper($HTTP_POST_VARS["Form_Alinha_logo"]);    // Alinhamento do Logotipo (esquerda / centro / direita)

$Form_Titulo        =    $HTTP_POST_VARS["Form_Titulo" ];// Título do Mail

$Form_Alinha_titulo    =    strtoupper($HTTP_POST_VARS["Form_Alinha_titulo"]);    // Alinhamento do Título do Mail (esquerda / centro / direita)

$Form_Email_Destinatario    =    $HTTP_POST_VARS["Form_Email_Destinatario"];            // Email do Destinatário

$Form_Email_Remetente        =    $HTTP_POST_VARS["Form_Email_Remetente"];                // Email do Remetente

$Form_Assunto        =    $HTTP_POST_VARS["Form_Assunto"];                    // Assunto do Email

$Form_Pagina_Ok=    $HTTP_POST_VARS["Form_Pagina_Ok"];                        // Url de Agradecimentos

$Form_Envia_Em_Branco    =    $HTTP_POST_VARS["Form_Envia_Em_Branco"];            // Envia ou não os campos em branco



$Pos_Logo_Url        =    strpos($Form_Url_Logo, "tp:");                    

$Pos_Url_Ok        =    strpos($Form_Pagina_Ok, "tp:");                            



$Remet_Verif_1        =    strpos($Form_Email_Remetente, "@");                    // Veh se tem "@" em $Cf_Remetente

$Remet_Verif_2        =    strpos($Form_Email_Remetente, ".");                    // Veh se tem "." em $Cf_Remetente



if (empty($Form_Envia_Em_Branco))

{

    $Form_Envia_Em_Branco = "SIM";

}



if (empty($Form_Titulo) or empty($Form_Email_Destinatario) or empty($Form_Assunto) or empty($Form_Pagina_Ok))

{                                    

    include ("form.hlp");    

    if ($REQUEST_METHOD != "POST")        

    {

    }

    echo ("http://www.xxxxxxx.com.br/cgi");

    die();

}



if (empty($Form_Email_Remetente) or empty($Remet_Verif_1) or empty($Remet_Verif_2) or $Remet_Verif_1 == 0)        

{

    echo ("&lt;script language=\"JavaScript\">\n");

    echo ("<!--\n");

    echo ("alert (\"Por favor escreva seu endereço de email corretamente.\");\n");

    echo ("history.back();\n");

    echo ("//-->\n");

    echo ("</script>\n");

    die();

}



if ($Form_Envia_Html == "SIM")

{

    if (empty($Form_Cor_Do_Fundo))

    {

        $Form_Cor_Do_Fundo = "#FFFFFF";

    }



    if (empty($Form_Cor_Da_Letra))

    {

        $Form_Cor_Da_Letra = "#000000";

    }



    if (empty($Form_Tamanho_Da_Letra))

    {

        $Form_Tamanho_Da_Letra = 2;

    }

    else if ($Form_Tamanho_Da_Letra > 7)

    {

        echo ("<b>Form_Tamanho_Da_Letra</b> tem tamanho máximo de <b>7</b>!");

        die();

    }



    if (empty($Form_Alinha_logo) or $Form_Alinha_logo == "CENTRO" or $Form_Alinha_logo == "CENTER")

    {

        $Form_Alinha_logo = "center";

    }

    else if ($Form_Alinha_logo == "DIREITA" or $Form_Alinha_logo == "RIGHT")

    {

        $Form_Alinha_logo = "right";

    }

    else if ($Form_Alinha_logo == "ESQUERDA" or $Form_Alinha_logo == "LEFT")

    {

        $Form_Alinha_logo = "left";

    }



    if (empty($Form_Alinha_titulo) or $Form_Alinha_titulo == "CENTRO" or $Form_Alinha_titulo == "CENTER")

    {

        $Form_Alinha_titulo = "center";

    }

    else if ($Form_Alinha_titulo == "DIREITA" or $Form_Alinha_titulo == "RIGHT")

    {

        $Form_Alinha_titulo = "right";

    }

    else if ($Form_Alinha_titulo == "ESQUERDA" or $Form_Alinha_titulo == "LEFT")

    {

        $Form_Alinha_titulo = "left";

    }

    else if ($Form_Alinha_titulo == "JUSTIFICADO" or $Form_Alinha_titulo == "JUSTIFY")

    {

        $Form_Alinha_titulo = "justify";

    }



    $mensagem = $mensagem .    "<html>\n" . 

                            "<body bgcolor=\"" . $Form_Cor_Do_Fundo . "\" text=\"" . $Form_Cor_Da_Letra . "\">\n";

    if (!empty($Form_Url_Logo))

    {

        if (empty($Pos_Logo_Url)) $Form_Url_Logo = $Form_Dominio . $Form_Url_Logo;    

        $mensagem = $mensagem . "<div align=\"" . $Form_Alinha_logo . "\"><img src=\"" . $Form_Url_Logo . "\" border=\"0\"></div>\n";

    }

    if (!empty($Form_Titulo))

    {

        $mensagem = $mensagem . "<div align=\"" . $Form_Alinha_titulo . "\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"" . ($Form_Tamanho_Da_Letra + 1) . "\"><b>" . $Form_Titulo . "</b></font></div><hr>\n";

    }

    $mensagem = $mensagem .    "<table width=\"400\" border=\"0\" align=\"left\">\n";

}

else

{

    

    $mensagem = $mensagem . "<pre>";

    $mensagem = $mensagem . $Form_Titulo . "\n\n";

}



while (list ($campo, $valor) = each ($HTTP_POST_VARS))

{

    $chk_campo = ereg("^Form_Obrig_", $campo);

    if ($chk_campo)

    {

        if (empty($valor))

        {

            $chk_campo = ereg_replace("Form_Obrig_","", $campo);

            echo ("&lt;script language=\"JavaScript\">\n");

            echo ("<!--\n");

            echo ("alert (\"Por favor preencha o campo $chk_campo corretamente.\");\n");

            echo ("history.back();\n");

            echo ("//-->\n");

            echo ("</script>\n");

            die();

        }

    }



    if (

        $campo != "Form_Envia_Html"        and

        $campo != "Form_Cor_Do_Fundo"        and 

        $campo != "Form_Cor_Da_Letra"        and

        $campo != "Form_Tamanho_Da_Letra"    and

        $campo != "Form_Url_Logo"        and

        $campo != "Form_Alinha_logo"        and

        $campo != "Form_Titulo"            and

        $campo != "Form_Alinha_titulo"        and

        $campo != "Form_Email_Destinatario"    and

        $campo != "Form_Email_Remetente"        and

        $campo != "Form_Assunto"            and

        $campo != "Form_Envia_Em_Branco"    and

        $campo != "Form_Pagina_Ok")

    {

        $campo = strtr($campo, "_", " ");

        if (!($Form_Envia_Em_Branco == "não" AND empty($valor)))

        {

            if ($Form_Envia_Html == "SIM")

            {

                $mensagem = $mensagem . "  <tr><td><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"" . $Form_Tamanho_Da_Letra . "\"><b>•$campo:</b></td><td>$valor</font></td></tr>\n";

            }

            else

            {

                $mensagem = $mensagem . "•$campo: $valor\n";

            }

        }

    }

}



if ($Form_Envia_Html == "SIM")

{

    

    $mensagem = $mensagem . "</table>\n</html>\n";

}

else 

{

    $mensagem = $mensagem . "</pre>";

}



mail(

    "$Form_Email_Destinatario",

    "$Form_Assunto",

    "$mensagem",

    "From: $Form_Email_Remetente\nReply-To: $Form_Email_Remetente\nDomain-From: $HTTP_REFERER\nContent-Type: text/html; charset=iso-8859-1"

    );



header("Location: " . (($Pos_Url_Ok)?($Form_Pagina_Ok):($Form_Dominio . $Form_Pagina_Ok)) );



?>

Agradeço pela atenção.

Henrique Flausino

[Wanderson Camargo]

Nem vou ler esse código... Verifique com o provedor o serviço SMTP...

[Henrique Flausino]

Nem vou ler esse código... Verifique com o provedor o serviço SMTP...

Olá Wanderson Camargo.

Verifiquei e o sistema de SMTP está funcionando corretamente.

Mais alguma sugestão?

Atenciosamente.

Henrique Flausino

[Paulo Web]

Tou com mesmo problema que você, mais foi porque mudei de servidor, antes tava funcionando normal, depois que mudei de servidor parou, não dar mensagem de erro nehuma, fala que foi enviador normal.... assim que descobrir posto a solução.... valeu!!!

[Henrique Flausino]

Pessoal.

Venho falando com a locaweb que é meu provedor e até agora nenhuma solução.

Será que alguém tem alguma idéia do que possa ser?

Já coloquei em outro site e funcionou normalmente, mas preciso que funcione neste site que está.

Será que tem algum erro de script?

Atenciosamente.

Henrique Flausino

[Henrique Flausino]

Olá Paulo Web.

No meu caso tive atualizar algumas funções do formulário.

Usei $_POST ao invés de $HTTP_POST_VARS

e no final do código tem uma atualização também.

"From: $Form_Email_Remetente\nReply-To: $Form_Email_Remetente\nReturn-Path: $Form_Email_Remetente\nDomain-From: $HTTP_REFERER\nContent-Type: text/html; charset=iso-8859-1"

Com essas alterações voltou a funciona.

Caso seu problema seja esse esta ai a solução.

Caso contrário poste seu código ai para que o pessoal possa analizar, e se eu puder ajudar também estou aqui ok.

Atenciosamente.

Henrique Flausino