WEB邮件程序

开发平台：

Delphi

iNotesMailFrm.asp：源码内容

							<HTML>
<HEAD>
<TITLE>ASP文件管理组件示例 </TITLE>
</HEAD>
<BODY>
<DIV align="center">
ASP邮件发送组件示例
<hr>
<form action="iNotesMail.asp" method="post">
<table border=0>
  <tr>
    <td align=right>发送服务器</td>
    <td><input type=text name=SMTPHost value=''>
  </tr>
  <tr>
    <td align=right>服务器端口</td>
    <td><input type=text name=SMTPPort value='25'>
  </tr>
  <tr>
    <td align=right>服务器超时</td>
    <td><input type=text name=SMTPTime value='0'>
  </tr>
  <tr>
    <td align=right>发件人地址</td>
    <td><input type=text name=FromAddress value=''>
  </tr>
  <tr>
    <td align=right>发件人姓名</td>
    <td><input type=text name=FromName value=''>
  </tr>
  <tr>
    <td align=right>收件人地址</td>
    <td><input type=text name=ToAddress value=''>
  </tr>
  <tr>
    <td align=right>抄送人地址</td>
    <td><input type=text name=ToCC value=''>
  </tr>
  <tr>
    <td align=right>密送人地址</td>
    <td><input type=text name=ToBCC value=''>
  </tr>
  <tr>
    <td align=right>主题</td>
    <td><input type=text name=Subject value=''>
  </tr>
  <tr>
    <td align=right valign=top>内容</td>
    <td><textarea  name=Body rows=6 cols=40 ></textarea>
  </tr>
  <tr>
    <td colspan='2' bordercolorlight='#C0C0C0' bordercolordark='#C0C0C0' valign='middle' align='center'>
      <input type="submit" name="BtnVal" value="发 送">&nbsp;
      <input type="reset"  value="重 填">
    </td>
  </tr>
</table>
</form>
<hr>
<font color=#008080 >
    Copyright &copy; 2000 <a href="http://china-notes.com">China-Notes.com </a>, All Rights Reserved<br>
   『网际备忘 版权所有』<br>
</font>
</DIV>
</BODY>
</HTML>

						