Вот что пишут немцы:
To send e-mails about Kilu you must first corresponding point on the project site, fill in your account.
There needs to be entered:
The SMTP server of your provider's e-mail
Your user name for this provider
And password of your e-mail accounts
Important when sending is that you are one stands a sender and a receiver:
<? Php
$ To = 'mein.toller.freund @ web.de';
$ Subject = 'Test Mail';
$ Message = 'This is a short test mail';
$ Headers = 'From: meine.tolle.email @ googlemail.com'. "\ N";
echo mail ($ to, $ subject, $ message, $ headers);
?>
This solution does not work with all mail providers, Easy klapt with this:
web.de -> smtp.web.de
mail.google.com -> smtp.googlemail.com
Further, there is a solution of sat there:
<? Php
/ /
/ / Smtp mail function for user Kilu, modified by the ace 22.03.2008 http://dasass.kilu.de/smtp.txt
/ /
$ Name = "Sender Name", / / ??optional
$ Email = "sender mail address";
$ Smtphost = 'mail.gmx.net';
$ Smtpuser = 'Customer Number';
$ Smtppass = 'password';
$ Mail from = 'own mail address';
if (strtoupper (substr (PHP_OS, 0,3) == 'WIN')) {
$ Eol = "\ r \ n";
}
elseif (strtoupper (substr (PHP_OS, 0,3) == 'WIN')) {
$ Eol = "\ r";
}
else {
$ Eol = "\ n";
}
mailserverparse function ($ socket, $ response) {
$ Server_response = null;
if (substr ($ server_response, 3, 1)! = '')
if (($ server_response = fgets ($ socket, 256)))
trigger_error ('Can not get mail server response codes ");
if ((substr ($ server_response, 0, 3) == $ response))
trigger_error ('ran into problems sending mail response.' $ server_response.)
return true;
}
function sendmail ($ to, $ subject, $ message, $ headers) {
global $ smtphost, $ smtpuser, $ smtppass, mail $ from, $ eol;
if ($ socket = fsockopen @ ($ smtphost, 25, $ errno, $ errstr, 20))
trigger_error ("Could not connect to SMTP host: {$ errno}: {$ errstr}");
if (trim ($ subject) == null)
trigger_error ('no email Subject specified');
$ Message = preg_replace ("#(?<! \ r) \ n # si "," \ r \ n ", $ message);
if (trim ($ message) == null)
trigger_error ('message was blank');
if (preg_match ('# ^ from: # i'!, $ headers) & & empty ($ mail from))
trigger_error ('no FROM header set ");
mailserverparse ($ socket, '220 ');
fputs ($ socket, "HELO" $ smtphost $ eol..);
mailserverparse ($ socket, '250 ');
if (empty ($ smtpuser) & & isset ($ smtppass)) {
fputs ($ socket, "AUTH LOGIN" $ eol.)
mailserverparse ($ socket, '334 ');
fputs ($ socket, base64_encode ($ smtpuser) $ eol.)
mailserverparse ($ socket, '334 ');
fputs ($ socket, base64_encode ($ smtppass) $ eol.)
mailserverparse ($ socket, '235 ');
}
if ($ headers = null) {
$ Headers = rtrim ($ headers);
$ Headers = preg_replace ('#(?<! \ r) \ n # si ', $ eol, $ headers);
$ Header_array = explode ($ eol, $ headers);
$ Headers = null;
$ Cc = null;
$ Bcc = null;
foreach ($ header_array as $ header) {
if (preg_match ('# ^ cc: # si', $ header))
$ Cc = array ('# ^ cc .*)# si', '\ 1', $ header);
elseif (preg_match ('# ^ bcc: # si', $ header)) {
$ Bcc = preg_replace ('# ^ bcc .*)# si', '\ 1', $ header);
$ Headers = null;
}
$ Headers .= ($ header = null) $ header $ eol: null;?.
}
$ Headers = rtrim ($ headers);
$ Cc = explode ('', $ cc);
$ Bcc = explode ('', $ bcc);
}
fputs ($ socket, "MAIL FROM: <" $ mail from .">".$ eol.)
mailserverparse ($ socket, '250 ');
$ To = empty ($ to) 'Undisclosed-recipients:;': trim ($ to);
if (preg_match ('# [^] + \ @ [^ ]+#', $ to)) {
fputs ($ socket, "RCPT TO: '$ to $ eol..);
mailserverparse ($ socket, '250 ');
}
if (is_array ($ bcc))
foreach ($ bcc as $ address) {
$ Address = trim ($ address);
if (preg_match ('# [^] + \ @ [^ ]+#', $ address)) {
fputs ($ socket, "RCPT TO:" $ address $ eol..);
mailserverparse ($ socket, '250 ');
}
}
if (is_array ($ cc))
foreach ($ cc as $ address) {
$ Address = trim ($ address);
if (preg_match ('# [^] + \ @ [^ ]+#', $ address)) {
fputs ($ socket, "RCPT TO:" $ address $ eol..);
mailserverparse ($ socket, '250 ');
}
}
fputs ($ socket, "DATA" $ eol.)
mailserverparse ($ socket, '354 ');
fputs ($ socket, "Subject:" $ subject $ eol..);
fputs ($ socket, "To:" $ to $ eol..);
fputs ($ socket, $ message $ eol $ eol..);
fputs ($ socket, $ message $ eol.)
fputs ($ socket, ".".$ eol);
mailserverparse ($ socket, '250 ');
fputs ($ socket, "QUIT" $ eol.)
fclose ($ socket);
return true;
}
/ / Function call for sending
$ Headers = "? From: ".(($ name) $ name:" sender ")." <"$ Email .">".$ eol;.
sendmail ($ mail from, $ subject, $ comment, $ headers);
?>