Главная :: Форум :: Web ClipArt :: Поиск :: Статистика :: Топ 10 :: Публикация :: Рекомендовать
netadmin.ws
Панель управления Регистрция свободна! Календарь Список пользователей Часто задаваемые вопросы Поиск по форуму Архив скриптов Главная   
Форум сетевых администраторов
Форум сетевых администраторов Форум сетевых администраторов » Веб скрипты » Поиск и обмен » Send Mail
Предыдущая тема     Следующая тема
Автор
Тема    Новая тема     Ответить на эту тему
om_nebun
Участник

Зарегистрирован: Mar 2003
Место проживания:
Публикаций: 12
Статус: om_nebun в оф-лайне
Send Mail [сообщение #36783]

Плиз нэлп , нужен скрипт ПХП который отправляет данные с формы на мэил, простой но главное рабочий, можно и на перле но чтобы работал!
За ранее пасибо!

Сообщить модератору об этом сообщении | Предупреждение | IP: определен

Old Post 06-03-2003 17:47
Нажмите сюда для просмотра профайла om_nebun Отправить Персональное сообщение om_nebun Посетить домашнию страничку om_nebun! Найти сообщения от om_nebun Добавить om_nebun в свой список друзей Редактировать/Удалить сообщение Ответить Цитируя
alex007
Модератор
Средний рейтинг: 3.83 | Оценок: 23
/нажмите чтобы посмотреть кто оценивал/

Зарегистрирован: Feb 2003
Место проживания:
Публикаций: 347
Статус: alex007 в оф-лайне
[сообщение #36788]

А самому что трудно написать, это же почти на всех сайтах програмирования описано что и как...

Я не жалко вот скрипт на перле:
Создаешь файл мыло.pl (незабуть поместить в cgi-bin папку и прочмодить 755)

#!/usr/local/bin/perl

$sendmail = "/usr/lib/sendmail";
$tomail = "куды@что-то.ru";
$location = "URL после отправки письма";
##################################################
###

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});

# Split the name-value pairs
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
local($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~
s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
# strip off any possible SSI comment tags.
$value =~ s/<!--(.|\n)*-->//g;
$in{$name} = $value;
}

open (MAIL,"|$sendmail -t") || die "there was a problem with the call to sendmail";
print MAIL "To: $tomail\n";
print MAIL "From: $in{'Name'} <$in{'Email'}>\n";
print MAIL "Reply-To: $in{'Email'}\n";
print MAIL "Subject: $in{'Subject'}\n\n";

print MAIL "$in{'Message'}\n\n";
close(MAIL);

print "Location: $location\n\n";

Создаешь файл форма.html
<html>
<head>
</head>
<body>
<form method=POST action="cgi-bin/мыло.pl" name="sendmail">
Your name:<input id="input" type="text" name="Name" size="30" maxlength="30"><br>
Subject:<input id="input" type="text" name="Subject" size=30><br>
Your E-mail:<input id="input" type="text" name="Email" size="30" maxlength="30">
<br>
Your message: <textarea type=text name="Message" rows=7 cols=40 wrap="virtual"></textarea>
<input type="submit" value=" Submit Form " style="{border: outset 1px; color: #000000; background: #009900;}"> * <input type="reset" style="{border: outset 1px; color: #000000; background: #FF3333;}"></form>
</body>
</html>

Создаешь файл отправки письма.html
<html>
<head>
</head>
<body>
Твое мыло отправлено
</body>
</html>

Вот и все...

Сообщить модератору об этом сообщении | Предупреждение | IP: определен

Old Post 06-03-2003 18:15
Нажмите сюда для просмотра профайла alex007 Найти сообщения от alex007 Добавить alex007 в свой список друзей Редактировать/Удалить сообщение Ответить Цитируя
Ausw
Модератор
Средний рейтинг: 3.57 | Оценок: 7
/нажмите чтобы посмотреть кто оценивал/

Зарегистрирован: Sep 2001
Место проживания: BloodyVostok
Публикаций: 565
Статус: Ausw в оф-лайне
[сообщение #36792]

см. тут.
http://www.netadmin.ws/forum/showthread.php?s=&postid=31997

__________________
"Gott weiss, ich will kein Engel sein!"

Сообщить модератору об этом сообщении | Предупреждение | IP: определен

Old Post 06-03-2003 18:44
Нажмите сюда для просмотра профайла Ausw Отправить Персональное сообщение Ausw Посетить домашнию страничку Ausw! Найти сообщения от Ausw Добавить Ausw в свой список друзей Редактировать/Удалить сообщение Ответить Цитируя



Формат времени GMT. Текущее время 10:53.
Новая тема   Ответить на эту тему [ Версия для печати Печать | Отправить эту страницу другу/знакомому! Отправить | Получать уведомления об обновлении этой темы Подписка ] Предыдущая тема     Следующая тема
Навигация по форуму:
Оценка темы:

Правила форума:
Вы не можете создавать новые темы.
Вы не можете отвечать на существующие темы.
Вы не можете прикреплять файлы.
Вы не можете редактировать свои сообщения.
HTML теги выкл.
Спец. код вкл.
Смайлики вкл.
[IMG] тег выкл.
 

Page generated in 0.00837994 seconds (34.80% PHP - 65.20% MySQL) with 26 queries.


  Главная :: Форум :: Web ClipArt :: Поиск :: Статистика :: Топ 10 :: Публикация :: Рекомендовать
©NetAdmin.ws, 2001-2026.
Powered by: vBulletin
Copyright ©2000, 2001, Jelsoft Enterprises Limited.