sendmail.asp

来自「BOB人才招聘系统」· ASP 代码 · 共 62 行

ASP
62
字号
<%@language=vbscript codepage=936 %>
<!--#include file="Admin.asp"-->
<!--#include file="Conn.asp"-->
<% 
set rs=server.createobject("adodb.recordset") 
sql="select * from maildefault order by id desc" 
rs.open sql,conn,1,1   
%>
<!-- #include file="Head.asp" -->
<table width="100%" height="93%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="180" align="center" valign="top"><!-- #include file="left.asp" --></td>
    <td  align="center" valign="top">
      <br>
      <table border="0" cellpadding="0" cellspacing="0"  class=tableBorder>
        <tr>
          <td  background=images/top_bg.gif height="25"><div align="center" style="color: #ffffFF; font-weight: bold;"><strong>发送邮件</strong></div></td>
	 </tr>
	 <tr><td>
	 <form name="sendmail" action="sendmailto.asp" method="post" >
      <table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" bgcolor="#f1f3f5">
          <tr> 
            <td width="19%" height="35">
<div align="center"><font color="#000000">发信人地址:</font></div></td>
            <td width="81%" height="35"> <input type="text" name="frommail" value="<%=rs("frommail")%>"> 
            </td>
          </tr>
          <tr> <%email=request("email")%>
            <td height="35">
<div align="center"><font color="#000000">收信人地址:</font></div></td>
            <td > 
              <input name="tomail" type="text" value="<%=email%>">
              <font color="#000000">(如果为空,从数据库取地址群发!) </font></td>
          </tr>
          <tr> 
            <td height="35">
<div align="center"><font color="#000000">信件标题:</font></div></td>
            <td> 
<input type="text" name="mailsubject" size="50">              
<font color="#000000">(如果为空,则显示<font color="#FF0000">“<%=rs("mailsubject")%>”</font>!)              </font></td>
          </tr>
          <tr> 
            <td height="139">
<div align="center"><font color="#000000">信件内容:</font></div></td>
            <td> 
              <textarea name="mailbody" cols="50" rows="8"></textarea>
              </td>
          </tr>
          <tr> 
            <td height="35"> 
              <div align="center"></div></td>
            <td height="35"> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
              <input type="submit" name="Submit" value=" 发 送 "> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
              <input type="reset" name="Submit" value=" 取 消 "> <input type="hidden" name="action" value="我发"> 
            </td>
          </tr>
        </table>
</form></td></tr></table>
    </td>
  </tr>
</table>
<!-- #include file="Foot.asp" -->

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?