Esempio n. 1
0
function enviaEmail($to, $subject, $msg)
{
    /* Configuração da classe.e smtp.class.php */
    $smtp = new Smtp();
    $enviou = $smtp->Send($to, $subject, $msg, "text/html") ? 'enviou' : 'falhou';
    return $enviou;
}
 //criptografia
 include "libs/CBC.php";
 srand((double) microtime() * 32767);
 $rand = rand(1, 32767);
 $rand = pack('i*', $rand);
 $key = "alapuchatche";
 $md = new Crypt_HCEMD5($key, $rand);
 $enc = $md->encodeMimeSelfRand("conf_email=" . $email . "&conf_cgccpf=" . $cgccpf);
 //
 $corpo_email = "\r\n <html>\r\n<head>\r\n<title>Solicita&ccedil;&atilde;o de senha</title>\r\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">\r\n<style type=\"text/css\">\r\n<!--\r\n.arial {\r\n   font-family: Arial, Helvetica, sans-serif;\r\n}\r\n-->\r\n</style>\r\n</head>\r\n\r\n<body leftmargin=\"0\" topmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">\r\n<table width=\"633\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\r\n  <tr>\r\n    <td align=\"left\" valign=\"top\" nowrap><table width=\"79%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\r\n        <tr>\r\n          <td>\r\n          <div align=\"center\">\r\n          <img src=\"imagens/topo_alegrete.gif\">\r\n          </div>\r\n          </td>\r\n        </tr>\r\n      </table></td>\r\n  </tr>\r\n  <tr>\r\n    <td align=\"left\" valign=\"top\" nowrap>&nbsp; </td>\r\n  </tr>\r\n  <tr>\r\n    <td> <img src=\"" . $URL_ABS . "imagens/logo_boleto_extrato.gif\" width=\"365\" height=\"93\">\r\n    </td>\r\n  </tr>\r\n  <tr>\r\n    <td height=\"30\" class=\"arial\" style=\"color:#006633;font-weight: bold;font-size:14px\">&raquo;&raquo; confirma&ccedil;&atilde;o de email</td>\r\n  </tr>\r\n  <tr>\r\n    <td height=\"200\" align=\"left\" valign=\"top\" class=\"arial\" style=\"font-size:12px\"><span style=\"color:#006633\">Caro\r\n      Usu&aacute;rio:</span> <p style=\"font-size:11px\"> Voce esta um passo de\r\n        concluir seu cadastro<br>\r\n        junto ao prefeitura on-line.<br>\r\n        Clique no link abaixo para receber sua senha.<br>\r\n        <br>\r\n      <a href=\"" . $URL_ABS . "criasenha.php?" . $enc . "\">Criar Senha</a>\r\n      </p></td>\r\n  </tr>\r\n</table>\r\n</body>\r\n</html>\r\n";
 if (@pg_num_rows($result) == 0) {
     $login = 1;
 }
 if ($login == 1) {
     $oMail = new Smtp();
     $oMail->Send($email, $w13_emailadmin, 'Confirmação de e-mail para recebimento de senha', $corpo_email);
     msgbox("Um e-mail de confirmação foi enviado para: {$email}. Clique no link para confirmar o e-mail e receber sua senha.");
     redireciona("digitafornecedor.php");
     exit;
 } else {
     if ($login != 1 && $z01_email == $email) {
         echo "\r\n   <html>\r\n   <script>\r\n   function js_submeter() {\r\n       if(document.form1.senha.value == '') {\r\n       alert('Campo senha não pode ser vazio!');\r\n      document.form1.senha.focus()\r\n      return false;\r\n     }\r\n     if(document.form1.senha_c1.value != document.form1.senha_c2.value) {\r\n       alert('As senhas estão diferentes!');\r\n      document.form1.senha_c1.select();\r\n      return false;\r\n     }\r\n     if(document,form1.senha_c1.value == '') {\r\n       alert('A sua nova senha não pode ser em branco');\r\n      document.form1.senha_c1.select();\r\n      return false;\r\n     }\r\n     return true;\r\n   }\r\n   </script>\r\n   <body bgcolor=\"#FFFFFF\" background=\"imagens/azul_ceu_O.jpg\" text=\"#000000\" >\r\n   Email já cadastrado. Informe sua senha e nova senha pra alteração.\r\n   <center>\r\n   <form name=\"form1\" method=\"post\" onsubmit=\"return js_submeter()\">\r\n    <table border=0>\r\n     <tr><Td>Senha:</td><td><input type=\"password\" name=\"senha\"></td></tr>\r\n     <tr><td>Nova Senha:</td><td><input type=\"password\" name=\"senha_c1\"></td></tr>\r\n     <tr><Td>Confirma Nova Senha:</td><td><input type=\"password\" name=\"senha_c2\"></td></tr>\r\n     <input type=\"hidden\" name=\"cgccpf\" value=\"{$cgccpf}\">\r\n     <tr><td colspan=2><input type=\"submit\" name=\"alt_senha\" value=\"clique aqui para alterar sua senha\"></td></tr>\r\n    </table>\r\n   </form>\r\n   </center>\r\n   </body>\r\n   </html>\r\n   ";
         exit;
     } else {
         if ($z01_email != $email) {
             msgbox("Email não cadastrado, favor entrar em contado com a prefeitura para alteração ou cadastro");
             redireciona("index.php");
             exit;
         }
     }
 }
             $sSqlUpdate = " update db_usuarios set senha = '{$sPassword}'\n\t\t\t                                              {$sEmailUpdate}\n\t\t\t                        where login = '******' and usuext = '1' ";
             $queryUpdate = db_query($sSqlUpdate);
             $sCpf = $oGet->numcpf;
             $sSenha = $oPost->senhasrv;
             //verifica se email
             if (isset($sEmailServ) && $sEmailServ != '') {
                 $sMsg = "Entre em contato com a Prefeitura para atualizar seu cadastrado.";
                 msgbox($sMsg);
             } else {
                 $mensagemDestinatario = "\n\t\t\t\t                         {$nomeinst}\n\t\t\t\t                         Esqueci Minha Senha - Prefeitura On-Line\n\t\t\t\t                         --------------------------------------------------------\n\t\t\t\t                         Nome:     {$z01_nome}\n\t\t\t\t                         CPF:      {$sCpf}\n\t\t\t\t                         E-mail:   {$sEmailServ}\n\n\t\t\t\t                         Atenção!\n\t\t\t\t                         Alguém tentou realizar um novo pedido de senha com seus dados.\n\t\t\t\t                         " . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR") . "\n\t\t\t\t                         Uma nova senha foi gerada para acesso ao Portal.\n\n\t\t\t\t                         Login Internet: {$z01_numcgm}\n\t\t\t\t                         Senha Internet: {$sSenha}\n\n\t\t\t\t                         Utilize Login e Senha para acessar suas informações no Portal da Prefeitura na Internet.\n\n\t\t\t\t                         {$url}/dbpref/\n\n\t\t\t\t                         Não responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n\n\t\t\t\t                         --------------------------------------------------------\n\t\t\t\t";
                 $sTring = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
                 $rsConsultaConfigDBPref = $sTring;
                 db_fieldsmemory($rsConsultaConfigDBPref, 0);
                 if (isset($sEmailServ) && $sEmailServ != '') {
                     $oMail = new Smtp();
                     $oMail->Send($mailpref, $w13_emailadmin, 'Prefeitura On-Line - Esqueci Minha Senha', $mensagemDestinatario);
                     msgbox("Uma mensagem foi encaminhada para o e-mail: {$sEmailServ}");
                 }
                 db_logs("", "", 0, "Esqueci minha senha: cgc ou cpf - {$sCgcCpf}");
             }
         } else {
             $sMsg = "Dados informados NÃO encontrados no cadastro da Prefeitura!\\n\n                   Procure o balcão da Prefeitura para realizar seu cadastro.";
             msgbox($sMsg);
             db_redireciona("centro_pref.php");
         }
     } else {
         $sMsg = "Dados informados NÃO encontrados no cadastro da Prefeitura!\\n\n                 Procure o balcão da Prefeitura para realizar seu cadastro.";
         msgbox($sMsg);
         db_redireciona("centro_pref.php");
     }
 }
    $result = db_query("select senha as senhaantiga from db_usuarios where id_usuario = {$id_usuario}");
    db_fieldsmemory($result, 0);
    if ($senhaantiga == Encriptacao::encriptaSenha($senhaatual)) {
        db_query("BEGIN");
        db_query("update db_usuarios set\r\n                                     senha = '" . Encriptacao::encriptaSenha($senha) . "'\r\n                               where id_usuario = {$id_usuario}") or die("Erro(38) alterando db_usuarios: " . pg_errormessage());
        db_query("COMMIT");
    } else {
        db_msgbox("campo senha atual não confere!");
        db_redireciona($HTTP_SERVER_VARS['PHP_SELF'] . "?" . base64_encode("id_usuario=" . $id_usuario));
    }
    if (isset($enviaemail) && $enviaemail == "sim") {
        $mensagemDestinatario = "\r\n<html>\r\n<head>\r\n<title>DBSeller Inform&aacute;tica Ltda.</title>\r\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">\r\n</head>\r\n\r\n<body bgcolor=\"#FFFFFF\" leftmargin=\"0\" topmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">\r\n<table width=\"100%\" height=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\">\r\n  <tr>\r\n    <td nowrap align=\"center\" valign=\"top\"><table width=\"100%\" height=\"100%\" border=\"0\" align=\"center\" cellpadding=\"0\" cellspacing=\"0\">\r\n        <tr>\r\n          <td width=\"146\" nowrap bgcolor=\"#6699CC\"><font color=\"#FFFFFF\" ></font></td>\r\n          <td height=\"60\"  nowrap align=\"left\" bgcolor=\"#6699CC\"><font color=\"#FFFFFF\"><strong>&nbsp;&nbsp;&nbsp;.: Senha Alterada :.\r\n        </tr>\r\n        <tr>\r\n          <td colspan=\"2\"><table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\r\n              <tr>\r\n                <td>&nbsp;</td>\r\n              </tr>\r\n              <tr>\r\n                <td><ul>\r\n                    <li><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">Você alterou sua senha no site Prefeitura-OnLine,<br> este e-mail foi enviado conforme solicitado no site para verificação</li>\r\n                  </ul></td>\r\n              </tr>\r\n              <tr>\r\n                <td><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">&nbsp;</font></td>\r\n              </tr>\r\n              <tr>\r\n                <td><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">&nbsp;</font></td>\r\n              </tr>\r\n              <tr>\r\n                <td><ul>\r\n                    <li>Usuário : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>{$nome}</strong></font></li>\r\n                  </ul></td>\r\n              </tr>\r\n              <tr>\r\n                <td><ul>\r\n                    <li>Login : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>{$login}</strong></font></li>\r\n                  </ul></td>\r\n              </tr>\r\n              <tr>\r\n                <td><ul>\r\n                    <li>Nova Senha : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>{$senha}</strong></font></li>\r\n                  </ul></td>\r\n              </tr>\r\n              <tr>\r\n                <td><ul>\r\n                    <li>Data da alteração : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>" . db_formatar(date("Y-m-d"), 'd') . "</strong></font></li>\r\n                  </ul></td>\r\n              </tr>\r\n              <tr>\r\n                <td><ul>\r\n                    <li>Hora : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>" . ($hora = db_getsession("hora") . "</strong></font></li>\r\n                  </ul></td>\r\n              </tr>\r\n              <tr>\r\n                <td><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">&nbsp;</font></td>\r\n              </tr>\r\n              <tr>\r\n                <td>&nbsp;</td>\r\n              </tr>\r\n              <tr>\r\n                <td align=\"center\"><p><font size=\"1\">Este e-mail foi enviado automaticamente\r\n                    por favor não responda-o</font></p></td>\r\n              </tr>\r\n              <tr>\r\n                <td align=\"center\"><p><a href=\"http://200.102.214.168\"><font size=\"1\">DBSeller Inform&aacute;tica\r\n                    Ltda.</font></a></p></td>\r\n              </tr>\r\n            </table></td>\r\n        </tr>\r\n      </table></td>\r\n  </tr>\r\n</table>\r\n\r\n</body>\r\n</html>");
        $rsConsultaConfigDBPref = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
        db_fieldsmemory($rsConsultaConfigDBPref, 0);
        $oMail = new Smtp();
        $oMail->Send($email, $w13_emailadmin, 'Alteração de senha do site Prefeitura On-Line', $mensagemDestinatario);
    }
    db_msgbox("Senha alterada com sucesso!");
    db_redireciona("centro_pref.php");
}
?>
<html>
<head>
<title><?php 
echo $w01_titulo;
?>
</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" src="scripts/db_script.js"></script>
<style type="text/css">
<?php 
Esempio n. 5
0
 public function sendToFriend()
 {
     $returnResult = new HttpResult();
     $retornoDaPaginaHTML = new HttpRoot();
     $returnResult->setHttpContentResult($retornoDaPaginaHTML);
     if (!isset($_POST["action"])) {
         $protuct_id = DataHandler::forceInt(DataHandler::getValueByArrayIndex($this->arrayVariable, "id"));
         $retornoDaPaginaHTML->form_action = Config::getRootPath("produto/send_to_friend");
         $retornoDaPaginaHTML->view = "form";
         $retornoDaPaginaHTML->product_id = $protuct_id;
     } else {
         $postData = (object) $_POST;
         $ContentSiteVO = new ContentSiteVO();
         $ReturnResult_vo = $ContentSiteVO->setId($postData->id, TRUE);
         if ($ReturnResult_vo->success) {
             $stdProduct = $ContentSiteVO->toStdClass();
             $stdProduct->array_gallery = $ContentSiteVO->getImages(NULL, "gallery", true);
             // Debug::print_r($stdProduct);  die;
             $template = file_get_contents(Config::getFolderView("/templates/email_produto.php"));
             $tpl_img_path = Config::getRootPath(Config::getFolderView());
             $recover_logo = $stdProduct->hat == 1 ? '<img style="" src="' . $tpl_img_path . '/assets/images/recover-min.png" />' : "";
             $first_image = sprintf("<img width='400px' src='%s' />", Config::getRootPath($stdProduct->array_gallery[0]->url));
             $replace_from = array("###PRODUCT_URI###", "###IMG_PATH###", "###TITLE###", "###HAT###", "###CONTENT###", "###IMG###", "###SENDER_NAME###", "###SENDER_EMAIL###", "###RECEIVER_NAME###", "###RECEIVER_MAIL###", "###RECEIVER_MESSAGE###");
             $replace_to = array(Config::getRootPath('produto/id.' . $stdProduct->id . '/' . $stdProduct->slug), $tpl_img_path, utf8_decode($stdProduct->title), $recover_logo, $stdProduct->content, $first_image, $postData->sender_name, $postData->sender_email, $postData->receiver_name, $postData->receiver_email, $postData->receiver_message);
             $template = str_replace($replace_from, $replace_to, $template);
             // var_dump( $stdProduct , $postData ) ;
             // echo $template ; die;
             $host = Config::SYSTEM_MAIL_SMTP;
             $mail = Config::SYSTEM_MAIL_LOGIN;
             $senha = Config::SYSTEM_MAIL_PASSWORD;
             // var_dump( $host , $mail , $senha ) ; die ;
             ob_start();
             $smtp = new Smtp($host, 587);
             $smtp->user = $mail;
             $smtp->pass = $senha;
             $smtp->debug = true;
             // $from = "'" . $postData->sender_name . "' <" . Config::SYSTEM_MAIL_FROM . ">" ;
             // $to = "'" . $postData->sender_name . "' <" . $postData->receiver_mail . ">" ;
             $from = Config::SYSTEM_MAIL_FROM;
             $to = $postData->receiver_email;
             $subject = "Indicação de produto";
             $msg = $template;
             $retornoDaPaginaHTML->sucess = $smtp->Send($to, $from, $subject, $msg, "text/html") ? true : false;
             ob_end_clean();
             //var_dump( $send ) ;
         }
         $retornoDaPaginaHTML->view = "result";
     }
     return $returnResult;
 }
 function Send()
 {
     try {
         switch ($this->sClass) {
             case 1:
                 include "mail/db_smtp1_class.php";
                 $oClassMail = new Smtp();
                 $oClassMail->Send($this->sEmailTo, $this->sEmailFrom, $this->sSubject, $this->sMsg);
                 break;
             case 2:
                 include "mail/db_smtp2_class.php";
                 $oClassMail = new Smtp();
                 $oClassMail->Delivery('relay');
                 $oClassMail->Relay($this->sHostMail, $this->sUserMail, $this->sPassMail, $this->sPortMail, 'login', false);
                 $oClassMail->From($this->sEmailFrom);
                 $oClassMail->AddTo($this->sEmailTo);
                 $oClassMail->Html($this->sMsg);
                 $oClassMail->Send($this->sSubject);
                 break;
             default:
                 $sHeader = "From: {$this->sEmailFrom} <{$this->sEmailFrom}>";
                 if (!mail($this->sEmailTo, $this->sSubject, $this->sMsg, $sHeader)) {
                     throw Exception("Função mail");
                 }
                 break;
         }
         return "Uma mensagem foi encaminhada para o e-mail informado";
     } catch (Exception $eException) {
         return "01 - Erro ao enviar E-mail. " . $eException->getMessage();
     }
 }
Esempio n. 7
0
<?php

include "smtp.class.php";
$host = "smtp.hcjweb.com.br";
/*host do servidor SMTP */
$mail = "*****@*****.**";
//o endereço de e-mail deve ser válido.
$senha = "H3l10jvn10R";
/* Configuração da classe.e smtp.class.php */
$smtp = new Smtp($host, 587);
$smtp->user = $mail;
/*usuario do servidor SMTP */
$smtp->pass = $senha;
/* senha do usuario do servidor SMTP*/
$smtp->debug = true;
/*ativa a autenticacao SMTP */
/* Prepara a mensagem para ser enviada. */
$from = $mail;
$to = $_POST['destino'];
$subject = "contato efetuado pelo site";
$msg = $_POST['msg'];
/* $msg = "Mensagem enviada por: ". $_POST[email]; */
/* faz o envio da mensagem */
$enviou = $smtp->Send($to, $from, $subject, $msg, "text/html") ? 'enviou' : 'falhou';
header('Location:index.php?status=' . $enviou, "-r" . $from);
        //update
        $cldb_cgmatualiza->alterar($w11_sequencial);
    }
    db_fim_transacao();
    if ($cldb_cgmatualiza->erro_status == "0") {
        @$cldb_cgmatualiza->erro();
    } else {
        db_msgbox("Seus dados foram encaminhados para análise.");
        //encaminhar email
        $mensagemDestinatario = "\n{$nomeinst}\nAtualização/Pedido de CGM - Prefeitura On-Line\n----------------------------\nNome:     {$w11_nome}\nCPF/CNPJ: {$w11_cgccpf}\nE-mail:   {$w11_email}\n\n" . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR") . "\nSeus dados do CGM foram encaminhados para análise.\nAguarde retorno sobre seu pedido.\n\n{$url}\n\nNão responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n----------------------------\n";
        //$headers   = "Content-Type:text\n Bcc: $email";
        //$enviando  = mail($w11_email,"Prefeitura On-Line - Atualização/Pedido de CGM",$mensagemDestinatario,$headers);
        $rsConsultaConfigDBPref = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
        db_fieldsmemory($rsConsultaConfigDBPref, 0);
        $oMail = new Smtp();
        $oMail->Send($w11_email, $w13_emailadmin, 'Prefeitura On-Line - Atualização/Pedido de CGM', $mensagemDestinatario);
        db_redireciona("centro_pref.php");
    }
}
?>
<html>
<head>
<title><?php 
echo $w01_titulo;
?>
</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" src="scripts/db_script.js"></script>
<script language="JavaScript" src="scripts/scripts.js"></script>
<style type="text/css">
<?php 
Esempio n. 9
0
 public function lembrarSenha()
 {
     $ReturnResultVO = new ReturnResultVO();
     $email = DataHandler::getValueByArrayIndex($_GET, "email");
     $DAO = UserDAO::getInstance();
     $ResultData = $DAO->select(UserDAO::RETURN_STD_OBJECT, $id = NULL, $active = NULL, $user_type_id = NULL, $login = NULL, $password = NULL, $email = $email);
     $ReturnResultVO->success = $ResultData->success;
     if ($ResultData->success) {
         if (count($ResultData->result) > 0) {
             $userStd = $ResultData->result[0];
             //Debug::print_r($userStd);
             //======
             $smtp = new Smtp(Config::SYSTEM_MAIL_SMTP, 587);
             $smtp->user = Config::SYSTEM_MAIL_LOGIN;
             $smtp->pass = Config::SYSTEM_MAIL_PASSWORD;
             ob_start();
             $smtp->debug = true;
             $from = Config::SYSTEM_MAIL_FROM;
             $to = $VO->getEmail();
             $subject = "Teto lembrar senha";
             $mensagem = file_get_contents(Config::getFolderView("/templates/email_para_lembrar_senha.html"));
             $mensagem = str_replace("###login", $userStd->login, $mensagem);
             $mensagem = str_replace("###senha", $userStd->password, $mensagem);
             $smtp->Send($to, $from, $subject, $mensagem, "text/html");
             ob_end_clean();
         }
     }
     echo $ReturnResultVO->toJson();
     exit;
 }
            $mensagemDestinatario = "\n    \t\t                         {$nomeinst}\n\n    \t\t                         Pedido de Senha Internet - Prefeitura On-Line\n\n    \t\t                         --------------------------------------------------------\n\n    \t\t                         Nome:     {$z01_nome}\n\n    \t\t                         CPF/CNPJ: {$sCpf}\n\n    \t\t                         E-mail:   {$z01_email}\n\n    \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n    \t\t                         Login Internet: {$z01_numcgm}\n\n    \t\t                         Senha Internet: {$passwd}\n\n    \t\t\t\t\t\t\t\t\t\t\t\t\t   \n\n    \t\t                         Utilize Login e Senha para acessar suas informações no Portal da Prefeitura na Internet.\n\n    \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n    \t\t                         {$url}/dbpref/\n\n    \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n    \t\t                         Não responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n\n    \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n    \t\t                         --------------------------------------------------------\n\n    \t\t                         " . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR");
        } else {
            /**
             * Se ja tiver senha cadastrada
             */
            msgbox("Você Já possui cadastro na Prefeitura!");
            $dados = pg_fetch_array($result1);
            $result3 = @db_query("update db_usuarios set senha = '{$passwd2}' where login = '******'0']}'");
            $sCpf = formataCpf($z01_cgccpf);
            $mensagemDestinatario = "\n\n      \t\t                         {$nomeinst}\n\n      \t\t                         Pedido de Senha Internet - Prefeitura On-Line\n\n      \t\t                         --------------------------------------------------------\n\n      \t\t                         Nome:     {$z01_nome}\n\n      \t\t                         CPF/CNPJ: {$sCpf}\n\n      \t\t                         E-mail:   {$z01_email}\n\n      \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n      \t\t                         Atenção!\n\n      \t\t                         Alguém tentou realizar um novo pedido de senha com seus dados.\n\n      \t\t                         " . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR") . "\n\n      \t\t                         Uma nova senha foi gerada para acesso ao Portal.\n\n      \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n      \t\t                         Login Internet: {$z01_numcgm}\n\n      \t\t                         Senha Internet: {$passwd}\n\n      \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n      \t\t                         Utilize Login e Senha para acessar suas informações no Portal da Prefeitura na Internet.\n\n      \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n      \t\t                         {$url}/dbpref/\n\n      \t\t\t\t\t\t\t\t\t\t\t\t\t\t\n\n      \t\t                         Não responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n\n      \t\t\t\t\t\t\t\t\t\t\t\t\t\t\n\n      \t\t                         --------------------------------------------------------\n\n      \t\t";
        }
        $sConsulta = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
        $rsConsultaConfigDBPref = $sConsulta;
        db_fieldsmemory($rsConsultaConfigDBPref, 0);
        $oMail = new Smtp();
        $oMail->Send($mailpref, $w13_emailadmin, 'Prefeitura On-Line - Pedido de Senha', $mensagemDestinatario);
        msgbox("Uma mensagem foi encaminhada para o e-mail: {$sEmailServ}");
    }
}
function formataCpf($sCpf)
{
    if (strlen(trim($sCpf)) == 11) {
        $cpf = str_replace("-", "", $sCpf);
        $cpf1 = substr($cpf, -11, 3);
        $cpf2 = substr($cpf, -8, 3);
        $cpf3 = substr($cpf, -5, 3);
        $cpf4 = substr($cpf, -2, 2);
        $sRetorno = $cpf1 . "." . $cpf2 . "." . $cpf3 . "-" . $cpf4;
    } else {
        if (strlen(trim($sCpf)) == 14) {
            $sCnpj = str_replace("-", "", $sCpf);