Тема: YourICQ BOT
Показать сообщение отдельно

  #45  
Старый 04.06.2008, 23:09
NOmeR1
Познавший АНТИЧАТ
Регистрация: 02.06.2006
Сообщений: 1,188
Провел на форуме:
6023777

Репутация: 2642


Отправить сообщение для NOmeR1 с помощью ICQ
По умолчанию

Кому интересно - скрипт отправки на мыло.

Переменные
Код:
$from, $to, $subj, $msg, $type
Функция
Код:
$email = '~^[a-z0-9\._-]+@[a-z0-9\._-]+\.[a-z]+$~i';
if(preg_match($email, $to) && preg_match(str_replace('^', NULL, str_replace('$', NULL, $email)), $from) && $msg && $type) {
	$headers = array(
		'MIME-Version: 1.0',
		'Content-type: text/'.($type == 'text' ? 'plain' : 'html').'; charset=windows-1251',
		'From: '.$from
	);
	$mailed = mail($to, $subj, $msg, implode("\r\n", $headers));
	if($mailed) {
		return 'Сообщение успешно отправлено';
	} else {
		return 'Сообщение не отправлено';
	}
} else {
	return 'Сообщение не может быть отправлено';
}
Работает через mail() поэтому на многих хостингах не пашет.
 
Ответить с цитированием