Октябрь 2021 - Страница 2 из 2

PHP: отправка почты через сервер Microsoft Exchange

15.10.2021 Павел Грибов PHP

Минут 20 пришлось подбирать параметры, чтобы письма пошли. Получился примерно такой класс (с использованием PHPMailer).

use PHPMailer\PHPMailer\PHPMailer;
use PHPMailer\PHPMailer\SMTP;
use PHPMailer\PHPMailer\Exception;

class TMail {
   public static function SendMail($to,$title,$body){
    global $db;
    $answer=AnswerStruc(true,"Не удалось отправить почту");
    $mail = new PHPMailer(true);
    $mail->SMTPDebug = SMTP::DEBUG_SERVER;                      
    $mail->isSMTP();                                                
    $mail->Host       = TConfig::GetConfigKeyValue("mail_server");
    $mail->SMTPAuth   = true;                                  
    $mail->Username   = TConfig::GetConfigKeyValue("mail_server_login");
    $mail->Password   = TConfig::GetConfigKeyValue("mail_server_password");
    //$mail->SMTPSecure = PHPMailer::ENCRYPTION_SMTPS;           
    $mail->CharSet = 'UTF-8';
    $mail->Encoding = 'base64';
    $mail->Port       = TConfig::GetConfigKeyValue("smtp_port");                                   
    $mail->SMTPAuth = true;
    
    $mail->SMTPOptions = array(
        'ssl' => array(
            'verify_peer' => false,
            'verify_peer_name' => false,
            'allow_self_signed' => true
        )
    );    
    
    $mail->setFrom(TConfig::GetConfigKeyValue("mail_server_sender"));
    $mail->addAddress($to);

    $mail->isHTML(true);                                
    $mail->Subject = $title;
    $mail->Body    = $body;    
    
    if (!$mail->send()) {
        $answer=AnswerStruc(true,$mail->ErrorInfo);
    } else {
        $answer=AnswerStruc(false,"Ok");
    }
    return $answer;
   }   
}

use PHPMailer\PHPMailer\PHPMailer;

use PHPMailer\PHPMailer\SMTP;

use PHPMailer\PHPMailer\Exception;

class TMail {

public static function SendMail($to,$title,$body){

global $db;

$answer=AnswerStruc(true,"Не удалось отправить почту");

$mail = new PHPMailer(true);

$mail->SMTPDebug = SMTP::DEBUG_SERVER;

$mail->isSMTP();

$mail->Host = TConfig::GetConfigKeyValue("mail_server");

$mail->SMTPAuth = true;

$mail->Username = TConfig::GetConfigKeyValue("mail_server_login");

$mail->Password = TConfig::GetConfigKeyValue("mail_server_password");

//$mail->SMTPSecure = PHPMailer::ENCRYPTION_SMTPS;

$mail->CharSet = 'UTF-8';

$mail->Encoding = 'base64';

$mail->Port = TConfig::GetConfigKeyValue("smtp_port");

$mail->SMTPAuth = true;

$mail->SMTPOptions = array(

'ssl' => array(

'verify_peer' => false,

'verify_peer_name' => false,

'allow_self_signed' => true

)

);

$mail->setFrom(TConfig::GetConfigKeyValue("mail_server_sender"));

$mail->addAddress($to);

$mail->isHTML(true);

$mail->Subject = $title;

$mail->Body = $body;

if (!$mail->send()) {

$answer=AnswerStruc(true,$mail->ErrorInfo);

} else {

$answer=AnswerStruc(false,"Ok");

}

return $answer;

}

Оставить комментарий exchange, php, phpmailer, отправка почты

PostgreSQL: расстояние между двумя координатами в метрах

04.10.2021 Павел Грибов WEB

Можно добавить функцию вида:

CREATE OR REPLACE FUNCTION public.distance(
	lat1 double precision,
	lon1 double precision,
	lat2 double precision,
	lon2 double precision)
    RETURNS double precision
    LANGUAGE 'plpgsql'
    COST 100
    VOLATILE PARALLEL UNSAFE
AS $BODY$
DECLARE
    R integer = 6371e3; -- Метры
    rad double precision = 0.01745329252;

    f1 double precision = lat1 * rad;
    f2 double precision = lat2 * rad;
    df double precision = (lat2-lat1) * rad;
    dl double precision = (lon2-lon1) * rad;

    a double precision = sin(df/2) * sin(df/2) + cos(f1) * cos(f2) * sin(dl/2) * sin(dl/2);
    c double precision = 2 * atan2(sqrt(a), sqrt(1-a));    
BEGIN                                                     
    RETURN R * c;        
END
$BODY$;

CREATE OR REPLACE FUNCTION public.distance(

lat1 double precision,

lon1 double precision,

lat2 double precision,

lon2 double precision)

RETURNS double precision

LANGUAGE 'plpgsql'

COST 100

VOLATILE PARALLEL UNSAFE

AS $BODY$

DECLARE

R integer = 6371e3; -- Метры

rad double precision = 0.01745329252;

f1 double precision = lat1 * rad;

f2 double precision = lat2 * rad;

df double precision = (lat2-lat1) * rad;

dl double precision = (lon2-lon1) * rad;

a double precision = sin(df/2) * sin(df/2) + cos(f1) * cos(f2) * sin(dl/2) * sin(dl/2);

c double precision = 2 * atan2(sqrt(a), sqrt(1-a));

BEGIN

RETURN R * c;

END

$BODY$;

Оставить комментарий postgree, расстояние между точками

Пн	Вт	Ср	Чт	Пт	Сб	Вс
				1	2	3
4	5	6	7	8	9	10
11	12	13	14	15	16	17
18	19	20	21	22	23	24
25	26	27	28	29	30	31