0, // Utilizar esquema CSV? 0=nãe 1=sim
'csv_delimiter' => ' ' // Qual o delimitador entre os campos (TAB é melhor opão)
);
/* Textos que aparecem no programa */
$txt_msg = array(
0 => 'O formulário não foi enviado pelas seguintes razões?',
1 => 'Use o botão voltar do seu navegador.
',
2 => 'Você está utilizando um endereço de email banido do sistema',
3 => 'Você está enviando o formulário de uma origem não autorizado',
4 => 'Precisa de um email de destinatário válido para continuar',
5 => 'Faltando',
6 => 'Seu endereço de email Invalido',
7 => 'Dados do Formulário',
8 => '
A sua mensagem foi enviada com sucesso!
Obrigado por entrar em contato.
',
9 => 'Formuláo: Erro',
10 => 'Formuláo: Enviado'
);
// controle interno
$versao = '1.0';
/* ############################################################################################# */
function pagina_cabecalho($title){
global $txt_msg;
$bgcolor = "#FFFFFF";
$text_color = "#000000";
$link_color = "#0000FF";
$vlink_color = "#FF0000";
$alink_color = "#000088";
$background = '';
echo "$title\n";
$background = !empty($background) ? "background='$background'" : '';
echo "\n\n";
}
function imprimir_erro($razao,$tipo = 0) {
global $txt_msg;
echo pagina_cabecalho($txt_msg['9']);
if ($tipo=='falta'){
echo $txt_msg['0'];
echo '';
echo $txt_msg['1'];
}else{ // every other error
echo $txt_msg['0'];
}
echo "
\n";
exit;
}
function verificar_referencia($referencia_formulario) {
global $txt_msg;
if(count($referencia_formulario))
{
$encontrado = false;
$temp = explode('/',getenv('HTTP_REFERER'));
$referencia = $temp[2];
for($x=0; $x
\n";
}
$val_campo = '';
}
if ($campos_faltando_lista)
{
imprimir_erro($campos_faltando_lista,'falta');
}
}
if(empty($assunto))
{
$assunto = $txt_msg['7'];
}
if(!empty($email) || !empty($EMAIL))
{
$email = trim($email);
if ($EMAIL)
$email = trim($EMAIL);
if (!eregi("^[_\.0-9a-z-]+@([0-9a-z][0-9a-z-]+\.)+[a-z]{2,4}$", $email))
{
imprimir_erro($txt_msg['6']);
}
$EMAIL = $email;
}
$conteudo = capturar_campos($HTTP_POST_VARS);
$conteudo = $CFG['csv_style']==1 ? "\n\n".$csv_header."\n".$conteudo."\n" : $conteudo;
mail_it($destinatario, stripslashes($assunto), stripslashes($conteudo), $email );
if(!empty($redirecionar))
{
header ("Location: $redirecionar");
exit;
}else{
pagina_cabecalho($txt_msg['10']);
print $txt_msg['8'];
echo "
\n