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

📄 fa.asp

📁 网上商城的设计与实现
💻 ASP
字号:

<%
if request.cookies("adminok")="" then
  response.redirect "../admin/shop_login.htm"
end if
%>
<!--#include file="conn.asp"-->
<%set rs=createobject("adodb.recordset")
set rs=conn.execute("update email set fs=0")
sql="select fwq,passname,password,fa,faemail from admin"
rs.open sql,conn,3,1%>
<html>
<head>
<title>邮件群发</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="STYLE.CSS">
</head>

<body bgcolor="#FFFFFF" background="INDTEXTB.JPG">

  
<div align="center">
  <center>

  
<table width="450" border="1" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">
  <form method="post" action="send.asp" >
    <tr bgcolor="#EBEBEB">
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件服务器</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
        <input type="text" name="fwq" size="35" maxlength="20" value="<%=rs("fwq")%>">
      </td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">登陆名</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25"> 
       <input type="text" name="passname" size="20" value="<%=rs("passname")%>">如果不需stmp认证
       则留空</td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">登陆密码</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25"> 
        <input type="text" name="password" size="20" value="<%=rs("password")%>">如果不需stmp认证则留空</td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">收件人</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25"> 
        <input type="text" name="name" size="20">如果为空则为群发</td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件标题</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25"> 
        <input type="text" name="title" size="35">
      </td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件格式</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25">  
        <input type="radio" name="radiobutton" value="text" checked>文本邮件&nbsp; 
        <input type="radio" name="radiobutton" value="html">HTML邮件&nbsp;
      </td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件内容</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25"> 
        <textarea name="txt" cols="40" rows="10"></textarea>
      </td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件性质</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25">  
        <input type="radio" name="hjf" value="1">加急&nbsp; 
        <input type="radio" name="hjf" value="3" checked>普通&nbsp; 
        <input type="radio" name="hjf" value="5">低级&nbsp;&nbsp;
      </td>
    </tr>
    <tr bgcolor="#EBEBEB"> 
      <td width="84" bgcolor="#AFD7FF" height="25" align="center">发件人</td>
      <td width="360" bgcolor="#AFD7FF" colspan="2" height="25"> 
        <input type="text" name="fa" size="35" value="<%=rs("fa")%>">
      </td>
    </tr>
    <tr bgcolor="#AFD7FF"> 
      <td width="84" height="25" align="center">发信人邮箱</td>
      <td width="180" height="25"> 
        <input type="text" name="faemail" size="19" value="<%=rs("faemail")%>"></td>
      <td width="180" height="25">有些服务器的stmp有检查发信人邮箱地&nbsp;&nbsp; 址,因此最好填写你在该邮件服务器的邮箱地址</td>
    </tr>
    <tr bgcolor="#CCCCCC"> 
      <td colspan="3" bgcolor="#00A9E0"> 
        <div align="center"> 
          <input type="submit" name="Submit" value="发送">
          <input type="reset" name="Submit2" value="取消">
        </div>
      </td>
    </tr>
  </form>
</table>

  </center>
</div>

<p align="center"> </p>

<p align="center"> <!--#include file="foot.htm"--></p>
</body>
</html>
<%rs.close
set rs=nothing
conn.close
set conn=nothing%>

⌨️ 快捷键说明

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