Уважаемые знатоки, помогите пожалуйста решить проблемку с формой отправки сообщений. Речь идет о флеш форме, я всегда использовал php скрипт отправки, но вот проблема, нужно сделать скрипт на asp. Если у кого есть готовый или если кому не сложно помочь, сделайте милость. Вот код php который надо модифицировать в asp
<?php
$name = $_POST['name'];
$mail = $_POST['mail'];
$phone = $_POST['phone'];
$message = $_POST['message'];
mail("pochta@site.ru","Сообщение с сайта","От кого : $name\nE-mail : $mail\nТелефон : $phone\nСообщение : $message");
echo "success=$name";
?>
Буду очень благодарен помощи!!!
вот http://www.cj-design.com/products/free_downloads/asp_scripts/cjaspfeedbackform на скрипт, думаю переделать под себя не составит особого труда.
Спасбо, но к сожалению тут километровый код формирования ячеек и ввода туда текста, я это все формирую во флеше, а нужен лишь скриптк в несколько строчек, который бы перебросил заполненые поля на почту, то есть точно такой же по простоте написания как перведенный ниже код для php.
Если есть возможность "переделать под себя не составит особого труда", то есть написать теже 5-6 строчек как в php только на asp, то для меня бы это был бы просто подарок
<%
emailText = emailText & request("email") & "\n"
emailText = emailText & request("phone") & "\n"
emailText = emailText & request("message") & "\n"
function clearUnSafeTags(s)
dim re
Set re = New RegExp
're.Pattern = "(<( )*\/{0,1}( )*(?!b|i|u|p|a|ul|li|ol)[^>]*>)"
re.Pattern = "<(?!b>|\/b>|br>|li>|\/li>|i>|\/i>|u>|\/u>)[^>]*>"
re.Global = true
re.IgnoreCase = true
clearUnSafeTags = re.replace(s, "")
end function
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "видимо хост с которого шлют письмо"
Mail.From = "от кого письмо/ емейл"
Mail.FromName = "от кого письмо/ имя"
Mail.AddAddress "емейл куда отправлять"
Mail.Subject = "тема письма"
Mail.Body = emailText
Mail.IsHTML = false
Mail.Send
%>
что там за мейл хост, так и непонял - поэкспериментируйте,
наверное даже работать будет ![]()
ну если что - сюда пишите
премного благодарен, щас будем пробывать, если не будет получаться, то завтра с утра напишу что пишет, на что ругается, и тд, большое спасибо
Русская версия Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)