Rambler's Top100
Приветствуем, Гость: Регистрация | Вход
 

Внимание! Форум доступен по адресу: http://dreamweaver.net.ru/new-forum/

Главная | FAQ | Поиск | Пользователи | Группы
 

Sendmail.asp

 
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов ????? Macromedia Dreamweaver -> ???????????? ????????
 
Автор Сообщение
bufet
???????

???????




Зарегистрирован: 24.01.2005
Сообщения: 5

СообщениеДобавлено: Пн Янв 24, 2005 12:19 am    Заголовок сообщения: Sendmail.asp Ответить с цитатой

???????????? ????. ?????????? ?? ??????????? ????? ? ????????? ?????? ?? ?????.??? ????????,?????? ?? ??????? Submit ?????????? ?? ?????? ???????? ? ????????,???? ???????. ? ? ???? ? ??????? ???????? ?????? ?? ??????,????? ???? ? ????? Sendmail.asp
? ? ????????? ???? ? ???? ???????.?????????? ?????????? ???,????? ?????????? ,??? ?????????.???????.

<%
For Each x In Request.Form
message=message & x & ": " & Request.Form(x) & CHR(10)
Next

set smtp = Server.CreateObject("Bamboo.SMTP")
' You only need to change the smtp.Rcpt ans smpt.from part to your email address
smtp.Server = "mail.yourhost.com"
smtp.Rcpt = "name@yourhost.com"
smtp.From = "name@yourhost.com"
smtp.FromName = Request.ServerVariables("HTTP_REFERER")
smtp.Subject = "Your web form - " & Request.ServerVariables("HTTP_REFERER")
smtp.Message = message
on error resume next
smtp.Send
if err then
response.Write err.Description
else
response.Write ("Thank you for your submission.... Your message has been delivered successfully.")
end if
set smtp = Nothing
%>
Вернуться к началу
?????
?????????

?????????


Возраст: 42

Зарегистрирован: 21.08.2004
Сообщения: 1490
Откуда: ?????-?????????

СообщениеДобавлено: Пн Янв 24, 2005 6:35 am    Заголовок сообщения: Ответить с цитатой

bufet, ? ???? ???? ??????? ? ASP, ?????? ? PHP, ?? ???? ???????? ????? ????:

??? ? ??? ??????? smtp.Send - ??? ?????????? e-mail. ?????? - if err then - ???? ???????? ?????-?? ??????, ?? ????????? ?? ???????? - response.Write err.Description, ? ???? ??? ????????? - else, ?? ???????? ???? ??? ????? - ("Thank you for your submission ? ?.?. ???????? (?, ?????? ?????, ??? ??? ? ????), ??? ?????????? ?????????? response, ??? "????????????" ?? ????? ????????, ??? ?? ? ?????? ????? ?????????.
Вернуться к началу
PaulRoot
???????

???????




Зарегистрирован: 24.07.2005
Сообщения: 4

СообщениеДобавлено: Вс Июл 24, 2005 4:43 pm    Заголовок сообщения: ?? ?????? ????????? ?????? ??????? Ответить с цитатой

If Err.number=0 then
response.write "send ok!"
else
response.write "Error # " & CStr(Err.Number) & " " & Err.Description & Err.Source & "<br>"
Err.Clear ' Clear the error.
end if
Вернуться к началу
PaulRoot
???????

???????




Зарегистрирован: 24.07.2005
Сообщения: 4

СообщениеДобавлено: Вс Июл 24, 2005 4:51 pm    Заголовок сообщения: Ответить с цитатой

? ??????????? ???? ??????????? ?????????? ?? ????? ????????? message. ???????????? ? ???? ??????, ?? ?????????? "Thank you for your submission.... Your message has been delivered successfully."
????? ????????? ???????? ?? ??????.
? ??? ???????????? ?
???? ?????? ???? ???? ???????? ? ???? ? ??????? ?????????? ? ? ?????? ????? "???????"., ?? ?????? ???
If Err.number=0 then
conntemp.execute sqlAdd
sReport="??????? ??????????"
else
sReport="Error # " & CStr(Err.Number) & " " & Err.Description & Err.Source & "<br>"
Err.Clear ' Clear the error.
end if
? ??????? ????? ?????? ???????? ? ???????? ????????
response.write sReport
Вернуться к началу
Показать сообщения:   
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов ????? Macromedia Dreamweaver -> ???????????? ???????? Часовой пояс: GMT + 2
Страница 1 из 1

 


Powered by phpBB © 2001, 2005 phpBB Group
Русская поддержка phpBB


Заблокировано регистраций / сообщений: 130101 / 0

Rambler's Top100 Рейтинг@Mail.ru