Кто шарит в web-дизайне, нид хэлп по ASP, PHP срочно.

**ye_not** · 15.01.2010, 10:46

На работе уменьшение коллектива, нас покинул Web-дизайнер.
Сайт шаблонный на flash, слегка измененный.
Главный вопрос - не работает форма обратной связи.
файл contacts.php содержит следующий код:

Your message was successfully sent!<script>
resizeTo(300, 300);
</script>

сontacts.asp:

<%
for i=1 to 7
message=Request("message")
next
message=message + Request("message")
smtpServer = "enter your SMTP SERVER HERE"
smtpPort = 25

name = Request("Your_Name:")
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "from " & name
myMail.From = Request("Your_Email:")
myMail.To = Request("recipient")
myMail.HTMLBody = "<html><head><title>Contact letter</title></head><body><br>" & message & "</body></html>"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpPort
myMail.Configuration.Fields.Update
myMail.Send

%>

Что и где править, чтобы онО заработало. Заранее спасибо.
сам сайт располагается по адресу www.archi-met.ru

**hakke.net** · 15.01.2010, 11:41

уволили называется))))

**ValaD** · 15.01.2010, 12:03

>smtpServer = "enter your SMTP SERVER HERE"
В эту строку пробовали добавить ИП своего смтп сервака?
По идее должно всё запахать с этим. Форма тупо не знает куда почту отправить.

**ValaD** · 15.01.2010, 12:06

Блин Петь, там надо сайтом хорошенько заняться. Нихрена ж нет ещё.
А проект кто делал? Всмысле почему незавершённый?

**ye_not** · 15.01.2010, 12:12

Сообщение от ValaD

Блин Петь, там надо сайтом хорошенько заняться. Нихрена ж нет ещё.
А проект кто делал? Всмысле почему незавершённый?

Делал вэб-мастер. Сайт я подправил, все текста привел в порядок, поправил галерею. Есть с ней косячок, но не существенно пока что, сначала надо запустить форму обратной связи, хотя может ее снесу)
Поправленный сайт у меня на компе, а не на серваке. Теперь в экстренном порядке пытаюсь освоить пхп, экшен скрипт и флеш...(

**ValaD** · 15.01.2010, 12:19

Дааа... Попадос. Пробуй как выше написал. Не получится - будем думать. Не стоит сносить то что может пригодиться.

**ye_not** · 15.01.2010, 12:21

посоветовались, поправили contact.asp
<%
for i=1 to 7
message=Request("message")
next
message=message + Request("message")
smtpServer = "mail.fedora-hosting.com"
smtpPort = 25

name = Request("Your_Name:")
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "from " & name
myMail.From = Request("Your_Email:")
myMail.To = "***@archi-met.ru"
myMail.HTMLBody = "<html><head><title>Contact letter</title></head><body><br>" & message & "</body></html>"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpPort
myMail.Configuration.Fields.Update
myMail.Send

%>

запускаю index.html с компа (может хоть с виртуалки пробовать?)
и при попытке отослать письмо, выскакивает новое окно с текстом:

if (isset($_POST['name'])) {$name = $_POST['name'];}<br />
if (isset($_POST['email'])) {$email = $_POST['email'];}<br />
if (isset($_POST['message'])) {$message = $_POST['message'];}

**ValaD** · 15.01.2010, 12:22

Да кстати ниже вроде как оже надо всё заполнить.
Типа как в почтовом клиенте когда настраиваешь на отправку почты его.
Или как прогу которая алерты на почту шлёт. Пишешь куда, от какого имени т.п. слать письмо