|
【声明：转载此信息在于传递更多信息，其内容表达的观点并不代表本站立场，由这些信息所产生的一切后果本站不负任何责任。如果您对本信息有什么意见，欢迎和本站联系，谢谢！】http://CiDu.Net
<%
' 改成您自己的 SMTP server
strHost = "cidu.net"
If Request("Send") <> "" Then
Set Mail = Server.CreateObject("Persits.MailSender")
' enter valid SMTP host
Mail.Host = strHost
Mail.From = Request("From") ' From address
Mail.FromName = Request("FromName") ' optional
Mail.AddAddress Request("To")
' message subject
Mail.Subject = Request("Subject")
Mail.Charset = "gb2312"
' message body
'Mail.Body = Request("Body")
Mail.Body = "你好！" & chr(10) & " 具体内容"
strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Username = "user@cidu.net"
Mail.Password = "********"
Mail.Send ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
else
bSuccess = True
End If
End If
%>
<HTML>
<HEAD>
<TITLE>AspEmail: Simple.asp</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<H2>AspEmail: Simple.asp</h2><br>
<br>
<% If strErr <> "" Then %>
<h3><FONT COLOR="#FF0000">Error occurred: <I><% = strErr %></I></FONT></h3>
<% End If %>
<% If bSuccess Then %>
<h3><FONT COLOR="#00A000">Success! Message sent to <% = Request("To") %>.</FONT></h3>
<% End If %>
<FORM METHOD="POST" ACTION="Simple.asp">
<TABLE CELLSPACING=0 CELLPADDING=2 BGCOLOR="#E0E0E0" height="183" border="1" style="border-collapse: collapse" bordercolor="#111111">
<TR>
<TD height="16"><b>邮件主机</b> (根据实际情况进行修改):</TD>
<TD height="16"><B><% = strHost %></B></TD>
</TR>
<TR>
<TD height="19">发件人邮件地址:</TD>
<TD height="19"><INPUT TYPE="TEXT" NAME="From" size="20"></TD>
</TR>
<TR>
<TD height="19">发件人名字 (可选):</TD>
<TD height="19"><INPUT TYPE="TEXT" NAME="FromName" size="20"></TD>
</TR>
<TR>
<TD height="19">收件人地址:</TD>
<TD height="19"><INPUT TYPE="TEXT" NAME="To" size="20"></TD>
</TR>
<TR>
<TD height="19">主题:</TD>
<TD height="19"><INPUT TYPE="TEXT" NAME="Subject" size="20"></TD>
</TR>
<TR>
<TD height="42">内容:</TD>
<TD height="42"><TEXTAREA NAME="Body" rows="4" cols="20"></TEXTAREA></TD>
</TR>
<TR>
<TD COLSPAN=2 height="21"><INPUT TYPE="SUBMIT" NAME="Send" VALUE="Send Message"></TD>
</TR>
</TABLE>
</FORM>
</BODY>
</HTML>
声明：以上信息资料大都是网上搜集而来，版权归作者，如有版权问题请留言告知我将马上改正。
文中所提到的各种观点只是原文观点，各种说法未经一一确认。并不代表本站认可此观点！！
|
登录 
注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）
51La 电邮：cidunet#163.com（请将#换成@）
