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

📄 maildefault.asp

📁 在线订单系统
💻 ASP
字号:
<!--#include file="adminconn.inc" -->
<% 
set rs=server.createobject("adodb.recordset") 
sql="select * from maildefault order by id desc" 
rs.open sql,conn,1,1   
%> 
<html>
<head>
<title>腾科在线购买系统-邮件部分</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../inc/guhongying.css" type="text/css">
</head>
<body bgcolor="6699CC" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#000000" vspace="0" hspace="0">
  <tr>
    <td bgcolor="#316395" height="27"><font color="#FFFFFF">.:: 您可以在这里设置邮件默认的标题、内容及发信人</font></td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="50">&nbsp;</td>
  </tr>
</table>
<table width="85%" border="0" cellpadding="0" cellspacing="0" align="center">
  <tr> 
    <td width="45%"> 
      <form name="addcat" method="post" action="maildefault.asp">
        <table border="0" cellspacing="1" cellpadding="4" bgcolor="#000000" width="80%">
          <tr> 
            <td bgcolor="#336699"><b><font color="#FFFFFF">设置邮件的默认发信人</font></b></td>
          </tr>
          <tr> 
            <td bgcolor="#7C96B8" align="center" height="65"> 
              <table border="0" cellspacing="0" cellpadding="4">
                <tr valign="top"> 
                  <td align="right"><font color="#FFFFFF">发信人:</font></td>
                  <td> 
                    <input type="text" name="frommail" size="15" value="<%=rs("frommail")%>">
                  </td>
                </tr>
              </table>
            </td>
          </tr>
          <tr> 
            <td bgcolor="#336699" align="center"> 
              <input type="submit" name="Submit" value="设置" class="Tips_bo">
              <input type="hidden" name="action" value="frommail">
            </td>
          </tr>
        </table>
      </form>
    </td>
    <td rowspan="2" width="55%">
      <form name="form1" method="post" action="maildefault.asp">
        <table border="0" cellspacing="1" cellpadding="4" bgcolor="#000000" width="90%">
          <tr> 
            <td bgcolor="#336699"> 
              <p><b><font color="#FFFFFF">设置邮件默认发送内容</font></b></p>
            </td>
          </tr>
          <tr> 
            <td bgcolor="#7C96B8" align="center" height="201"> 
              <textarea name="mailbody" cols="55" rows="11"><%=rs("mailbody")%></textarea>
            </td>
          </tr>
          <tr> 
            <td bgcolor="#336699" align="center" height="35"> 
              <input type="submit" name="Submit2" value="设置" class="Tips_bo">
              <input type="hidden" name="action" value="mailbody">
            </td>
          </tr>
        </table>
      </form>
    </td>
  </tr>
  <tr> 
    <td width="45%"> 
      <form name="form1" method="post" action="maildefault.asp">
        <table border="0" cellspacing="1" cellpadding="4" bgcolor="#000000" width="80%">
          <tr> 
            <td bgcolor="#336699"> 
              <p><b><font color="#FFFFFF">设置邮件默认标题</font></b></p>
            </td>
          </tr>
          <tr> 
            <td bgcolor="#7C96B8" align="center" height="65"> 
              <table border="0" cellspacing="0" cellpadding="4">
                <tr valign="top"> 
                  <td align="right"><font color="#FFFFFF">邮件标题:</font></td>
                  <td> 
                    <input type="text" name="mailsubject" size="15" value="<%=rs("mailsubject")%>">
                  </td>
                </tr>
              </table>
            </td>
          </tr>
          <tr> 
            <td bgcolor="#336699" align="center"> 
              <input type="submit" name="Submit22" value="设置" class="Tips_bo">
              <input type="hidden" name="action" value="mailsubject">
            </td>
          </tr>
        </table>
      </form>
    </td>
  </tr>
</table>
<p>&nbsp;</p>
<center>
  <font color="ffffff">请使用 1024 X 768 及以上分辨率 </font> 
</center>
</body>
</html>
<%
'添加功能和修改功能

if request("action")<>"frommail" and request("action")<>"mailsubject" and request("action")<>"mailbody" then 
response.end
else

if request("action")="frommail" then
frommail=request("frommail")
conn.execute "update maildefault set frommail='"&frommail&"'"
response.write"<SCRIPT language=JavaScript>alert('发信人地址更改成功!');"
response.write "</SCRIPT>"
end if

if request("action")="mailsubject" then
mailsubject=request("mailsubject")
conn.execute "update maildefault set mailsubject='"&mailsubject&"'"
response.write"<SCRIPT language=JavaScript>alert('邮件默认标题更改成功!');"
response.write "</SCRIPT>"
end if

if request("action")="mailbody" then
mailbody=request("mailbody")
conn.execute "update maildefault set mailbody='"&mailbody&"'"
response.write"<SCRIPT language=JavaScript>alert('邮件默认内容更改成功!');"
response.write "</SCRIPT>"
end if

end if
%> 

⌨️ 快捷键说明

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