Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- IdSSLIOHandlerSocketOpenSSL1->MaxLineAction = maException;
- IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Method = sslvTLSv1;
- IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Mode = sslmUnassigned;
- IdSSLIOHandlerSocketOpenSSL1->SSLOptions->VerifyDepth = 0;
- SMTP->IOHandler = IdSSLIOHandlerSocketOpenSSL1;
- SMTP->Host = "smtp.mail.ru";
- SMTP->Port = 465;
- SMTP->Username = "mail@list.ru";
- SMTP->Password = "***";
- SMTP->UseTLS = utUseExplicitTLS;
- SMTP->ReadTimeout = 15000;
- SMTP->Connect();
- if(SMTP->Connected() == true)
- {
- ShowMessage("We have connect");
- TIdMessage *IdMessage1 = new TIdMessage();
- IdMessage1->Clear();
- IdMessage1->From->Address = "mail@yandex.ru";
- IdMessage1->Recipients->EMailAddresses = SMTP->Username;
- IdMessage1->Subject = L"Мое первое письмо в C++ на email";
- IdMessage1->Body->Text = L"Привет это мое сообщение!";
- SMTP->Send(IdMessage1);
- delete IdMessage1;
- delete IdSSLIOHandlerSocketOpenSSL1;
- SMTP->Disconnect();
- }
- else
- ShowMessage("Dont have connect");
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement