="5.2.0")
$isemail = ia_emailValidRegExp($email); // filter_var($email, FILTER_VALIDATE_EMAIL) ? true : false;
else
$isemail=false;
if($isemail) {
$usr_lib=ia_singleton("SELECT usr_lib_id,pwd,email,pseudonimo FROM usr_lib WHERE email=".strit($email));
if(empty($usr_lib))
$usr_lib=ia_singleton("SELECT usr_lib_id,email,pseudonimo FROM usr_lib WHERE pseudonimo=".strit($email));
} else {
$usr_lib=ia_singleton("SELECT usr_lib_id,pwd,email,pseudonimo FROM usr_lib WHERE pseudonimo=".strit($email));
if(empty($usr_lib))
$usr_lib=ia_singleton("SELECT usr_lib_id,pwd,email,pseudonimo FROM usr_lib WHERE email=".strit($email));
}
if(empty($usr_lib)) {
if($isemail) {
$usr_tab=ia_singleton("SELECT ID as tab_usr, nombre,apellido,email,email_list as enviar_emails,pseudonimo,decode(pwd,'$PWDENCODE') as pwd FROM tab_usr WHERE email=".strit($email_tab));
if(empty($usr_tab))
$usr_tab=ia_singleton("SELECT ID as tab_usr, nombre,apellido,email,email_list as enviar_emails,pseudonimo,decode(pwd,'$PWDENCODE') as pwd FROM tab_usr WHERE pseudonimo=".strit($email_tab));
} else {
$usr_tab=ia_singleton("SELECT ID as tab_usr, nombre,apellido,email,email_list as enviar_emails,pseudonimo,decode(pwd,'$PWDENCODE') as pwd FROM tab_usr WHERE pseudonimo=".strit($email_tab));
if(empty($usr_tab))
$usr_tab=ia_singleton("SELECT ID as tab_usr, nombre,apellido,email,email_list as enviar_emails,pseudonimo,decode(pwd,'$PWDENCODE') as pwd FROM tab_usr WHERE email=".strit($email_tab));
}
if(!empty($usr_tab)) {
foreach($usr_tab as $k=>$v)
$usr_tab[$k]=utf8_encode($v);
$pwdes=$usr_tab['pwd'];
$emailes=$usr_tab['email'];
}
} else {
$pwdes=$usr_lib['pwd'];
$emailes=$usr_lib['email'];
}
if(isset($pwdes)) {
$pwdes = htmlentities($pwdes);
$body="