a:9:{i:0;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:8:"act_code";s:4:"tipo";s:1:"M";s:5:"parms";s:0:"";s:6:"codigo";s:240:"$chars  = 'abcdefghijklmnopqrstuvxywz';
$chars .= 'ABCDEFGHIJKLMNOPQRSTUVXYWZ';
$chars .= '0123456789!@$*.,;:';
$max = strlen($chars)-1;
$act_code = "";
for($i=0; $i < 32; $i++)
{
	$act_code .= $chars{mt_rand(0, $max)};
}

return $act_code;";}i:1;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:17:"onApplicationInit";s:4:"tipo";s:1:"E";s:5:"parms";s:0:"";s:6:"codigo";s:0:"";}i:2;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:6:"onInit";s:4:"tipo";s:1:"E";s:5:"parms";s:0:"";s:6:"codigo";s:542:"if(isset($_GET['act_code']) && !empty($_GET['act_code']))
{
	$act_code = trim($_GET['act_code']);
	$sql = 	"SELECT 
			login 
		FROM 
			sec_users 
		WHERE 
			activation_code = ". sc_sql_injection($act_code);
	sc_lookup(rs, $sql);

	if({rs} !== FALSE && isset({rs}[0][0]))
	{
		$usr_login = {rs[0][0]};
	
		sc_set_global($usr_login);
		sc_apl_status('app_change_pswd', 'on');
		sc_redir("app_change_pswd", act_code=$act_code; usr_login=$usr_login);
	}
	else
	{
		sc_alert( {lang_act_code_error} );
	}
//sc_exit(ok);
}";}i:3;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:10:"onValidate";s:4:"tipo";s:1:"E";s:5:"parms";s:0:"";s:6:"codigo";s:752:"if(isset($_GET['act_code']) && !empty($_GET['act_code']))
{
	$act_code = trim($_GET['act_code']);
	$sql = 	"SELECT 
			login 
		FROM 
			sec_users 
		WHERE 
			activation_code = ". sc_sql_injection($act_code);
	sc_lookup(rs, $sql);

	if({rs} !== FALSE && isset({rs}[0][0]))
	{
        $usr_login = {rs[0][0]};
	
		sc_set_global($usr_login);
		sc_apl_status('app_change_pswd', 'on');
		sc_redir("app_change_pswd", act_code=$act_code; usr_login=$usr_login);
	}
	else
	{
		sc_alert( {lang_act_code_error} );
	}
//sc_exit(ok);
}


$usr_login = {login};
$usr_email = search_email($usr_login);
sc_set_global($usr_login);
sc_set_global($usr_email);

sc_log_add('Retrieve Password', {lang_log_retrieve_pswd});
send_pswd_mail();";}i:4;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:12:"search_email";s:4:"tipo";s:1:"M";s:5:"parms";s:16:"$param_login,,, ";s:6:"codigo";s:246:"$sql = "SELECT email FROM sec_users WHERE login = '".$param_login."'";

sc_lookup(rs, $sql);

if({rs} === FALSE || count({rs}) == 0)
{
	sc_error_message({lang_error_login_not_exist});
	sc_error_exit();
}
else
{
	return {rs[0][0]};
}
";}i:5;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:8:"send_act";s:4:"tipo";s:1:"M";s:5:"parms";s:0:"";s:6:"codigo";s:435:"$act_code = act_code();


$sql = "UPDATE 
		sec_users
	    SET
	    	activation_code = '". $act_code ."'
	    WHERE
	        login = '". [usr_login] ."'";

sc_exec_sql($sql);

send_mail_message({lang_send_act_code}
                   . "<br/> <a href='http://". $_SERVER['HTTP_HOST'] . $_SERVER['SCRIPT_NAME']. "?act_code=" . $act_code ."'> http://".$_SERVER['HTTP_HOST'] . $_SERVER['SCRIPT_NAME']. "?act_code=" . $act_code ." </a>");
";}i:6;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:17:"send_mail_message";s:4:"tipo";s:1:"M";s:5:"parms";s:18:"$param_message,,, ";s:6:"codigo";s:972:"/**
 * Send a simple email
 */

// Email parameters
$mail_smtp_server = 'smtp.mail.yahoo.com.br';        // SMTP server name or IP address
$mail_smtp_user   = 'scriptcase@yahoo.com.br';                   // SMTP user name
$mail_smtp_pass   = 'Netmake32';			// SMTP password
$mail_from        = 'scriptcase@yahoo.com.br';          // From email
$mail_to          = [usr_email];         // To email
$mail_message     = $param_message;
$mail_subject     = {lang_subject_mail}; // Message body
$mail_format      = 'H';                       // Message format: (T)ext or (H)tml

// Send email
sc_mail_send($mail_smtp_server,
             $mail_smtp_user,
             $mail_smtp_pass,
             $mail_from,
             $mail_to,
             $mail_subject,
             $mail_message,
             $mail_format,
             '','', '587');

if ({sc_mail_ok})
{
	sc_alert({lang_mail_sended_ok} );
}
else
{
	sc_erro_mensagem({sc_mail_erro});
}";}i:7;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:13:"send_new_pswd";s:4:"tipo";s:1:"M";s:5:"parms";s:0:"";s:6:"codigo";s:181:"$pswd = act_code();
$sql  = "UPDATE sec_users SET pswd = '". ($pswd) ."' WHERE login = '". [usr_login] ."'";
sc_exec_sql($sql);

send_mail_message({lang_send_new_pswd} . $pswd);";}i:8;a:7:{s:7:"cod_prj";s:7:"Veratex";s:6:"versao";s:1:"1";s:7:"cod_apl";s:17:"app_retrieve_pswd";s:4:"nome";s:14:"send_pswd_mail";s:4:"tipo";s:1:"M";s:5:"parms";s:0:"";s:6:"codigo";s:166:"sc_lookup(rs, "SELECT
		    pswd
		FROM 
		    sec_users
		WHERE
	            login = '". [usr_login] ."'");

send_mail_message({lang_send_pswd} . " ". {rs[0][0]}) ;
";}}