Используйте компонент EasyMailObject для обработки исходного кода почты обмена в ASP-Send Mail (p_sendmail.asp)
< %@ Language = vbscript %>
<%
'**************************************************
'Этот файл используется для отправки электронных писем
Автор: Awayeah
«Электронная почта: [email protected]
'**************************************************
Если session ("straccount") = "" или session ("strpassword") = "" Тогда
Response.end
конец, если
%>
<html>
<Голова>
<Meta name = "Generator" Content = "Microsoft Visual Studio 6.0">
</Head>
<style>
<!-
{Text-Decoration: нет}
->
</Style>
<Тело>
<%Set smtp = createObject ("easyMail.smtp.5")
Smtp.licensekey = "awa/s19i500r1ax30c0r3100"
Smtp.mailserver = "192.9.200.89"
Smtp.subject = request.form ("субъект")
Smtp.bodytext = request.form ("bodytext")
Smtp.from = request.form ("from")
Smtp.fromaddr = request.form ("fromAddr")
Smtp.addrecipient request.form ("from"), request.form ("chective1"), 1
'Добавьте вложение
Если запрос.form ("att") = "" then
Response.write ""
еще
x = smtp.addattachment (request.form ("att"), 0)
Если не x = 0, то
Response.write «Вставьте ошибку вложения:« + cstr (x) + «Пожалуйста, свяжитесь с администратором».
Конец, если
конец, если
x = smtp.send
Если x = 0, тогда
'Response.write ("<p align = center> <br> <br>")
'Response.write ("<font size =")
Response.write "<p align = 'center'> <br> <br> <b> <font face = 'zongyi' size = '5' color = ' #00ffff'> <span style = 'foanle-color: # 000080 '> Электронное письмо было успешно отправлено! </Font> </span> </b> "
'Session ("отправлено") = "y"
Еще
Если x = 7 или x = 5, тогда
Response.write "<br> <br> <p align = 'center'> <b> <font face = 'zongyi' size = '5' color = ' #00ffff'> <span style = 'fanoght-color: # 000080 '> Произошла ошибка при отправке электронной почты (" + cstr (x) +").
<br> <br> <input type = "button" value = "Back">
<%Response.end
еще
Response.write "<br> <br> <p align = 'center'> <b> <font face = 'zongyi' size = '5' color = ' #00ffff'> <span style = 'fanoght-color: # 000080 '> При отправке электронной почты произошла ошибка: "+ cstr (x)+" </span> </font> </b> "%>
<br> <br> <input type = "button" value = "return" id = button1 name = button1>
<%Response.end
конец, если
Конец, если
Установить SMTP = ничего
%>
<P align = "center"> <a href = "javascript: window.close ();">
<font face = "宋体" size = "5"> <b> <span style = "founal-color: #ffff00"> return </span> </b> </font> </a> </p>
</Body>
</Html>