⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sendemail.asp

📁 中文bux点击站源码。配合其他站点用
💻 ASP
字号:
<%@ LANGUAGE = VBScript %>
<!--#include file="conn.asp"-->

<!--#include file="checklogin.asp"-->

<%
  Set rs = nothing
  Conn.Close
  Set Conn = nothing
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link REL="StyleSheet" HREF="../tjscripts.css" TYPE="text/css" MEDIA="screen">
<title><%= SiteTitle %>后台管理系统</title>
</head>

<body topmargin="0" leftmargin="0">

<div align="center">
  <table border="1" cellspacing="1" width="760" bordercolor="#0033CC">
    <tr>
      <td width="100%" height="31" bgcolor="#FFCC00"><b>发送通知邮件</b></td>
    </tr>
    <tr>
      <td width="100%">
        <form method="POST" action="sendemail_do.asp">
          <div align="center">
            <table border="0" cellpadding="0" cellspacing="0" width="95%">
              <tr>
                <td width="50%" height="30" align="center">请选择邮件格式:</td>
                <td width="50%" height="30">
                  <select size="1" name="MailFormat">
                    <option selected value="Html">超文本 - Html</option>
                    <option value="Text">文本 - Text</option>
                  </select>
                </td>
              </tr>
              <tr>
                <td width="50%" height="30" align="center">请选择邮件优先级:</td>
                <td width="50%" height="30">
                  <select size="1" name="MailPriority">
                    <option value="High">高</option>
                    <option selected value="Normal">普通</option>
                    <option value="Low">低</option>
                  </select>
                </td>
              </tr>
              <tr>
                <td width="100%" height="30" align="center" colspan="2">请输入邮件主题:</td>
              </tr>
              <tr>
                <td width="100%" height="30" align="center" colspan="2"><input size="20" name="MailSubject"></td>
              <tr>
                <td width="100%" height="30" align="center" colspan="2">请输入邮件正文:</td>
              </tr>
              <tr>
                <td width="100%" height="30" align="center" colspan="2"><textarea rows="20" name="MailBody" cols="50"></textarea></td>
              </tr>
              <tr>
                <td width="25%" height="30" align="center">站内邮件有效性:</td>
                <td width="75%" height="30">
                  <select name="MailValid">
                    <option value="True" selected>有效</option>
                    <option value="False">无效</option>
                  </select>
                </td>
              </tr>
              <tr>
                <td width="25%" height="30" align="center">是否发送站外邮件:</td>
                <td width="75%" height="30">
                  <select name="MailOut">
                    <option value="True">发送</option>
                    <option value="False" selected>不发送</option>
                  </select>
                </td>
              </tr>
              <tr>
                <td width="100%" height="30" align="center" colspan="2"></td>
              </tr>
              <tr>
                <td width="100%" height="30" align="center" colspan="2">
                <input type="submit" value="发送邮件" name="Button"></td>
              </tr>
            </table>
          </div>
        </form>
      </td>  
    </tr>
    <tr>
      <td width="100%" align="center">
      <form method="POST" action="delmail.asp">
        <input type="submit" value="删除15天前站内信箱中的邮件" name="Button">
      </form>
      </td>
    </tr>
    <tr>
      <td width="100%" align="center"><a href="javascript:history.back();"><b>返回</b></a></td>
    </tr>
  </table>  
</div>

</body>

</html>

⌨️ 快捷键说明

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