<%@ Language=VBScript %>
<%
If session("agentusername")="" Then
	ef=True
	ec="授权非法，有可能是超时造成的。"
end if
if not ef then%>
<!--#include virtual="/inc-freehost-function/htmlwrite.asp"--><%=htmlwrite("html5")%>发送邮件
<%=htmlwrite("html6")%>
<table width="65%"  border="0" cellspacing="1" cellpadding="2">
  <tr>
    <td><br>
        <DIV class="tableborder">
          <table width="100%"  border="0" align="center" cellpadding="2" cellspacing="1">
            <tr align="center" bordercolor="#000000" bgcolor="#999999">
              <td height="24" colspan="4" background="img/tablebg.gif"><font color="#990000"><font color="#FFFFFF">请输入资料</font></font></td>
            </tr>
            <tr bordercolor="#000000" bgcolor="#E4EAF2">
              <td width="14%"><font color="#000000">&nbsp; </font></td>
              <td width="86%" colspan="3" align="left"><form name="form1" method="post" action="emailone-sub.asp">
                  <br>
                邮　　箱：
                <input name="email" type="text" id="title" value="<%=Request.QueryString ("email")%>" size="40">
                <br>
                标　　题：
                <input name="title" type="text" id="title" value="<%=Request.QueryString ("title")%>" size="40">
                <br>
                <br>
                邮件内容：
                <textarea name="body" cols="40" rows="12" id="body">
    <%if Request.QueryString ("username")<>"" then%>您的用户名：<%=Request.QueryString ("username")%><%end if%>

  　<%if Request.QueryString ("password")<>"" then%>您的密　码：<%=Request.QueryString ("password")%><%end if%>

  　<%if Request.QueryString ("type")="订单" then%>您的订单已处理，我们已给您的帐号上加入了开通此订单的金额，您可以登陆网站后直接开通。<%end if%>

    
  
	
  
	
	
	</textarea>
                <input type="submit" name="Submit" value="马上发送"><br><br>使用本功能前请先在<a href=admuser.asp>[名下用户]</a>中设置好邮箱的参数.
              </form></td>
            </tr>
            <tr bordercolor="#000000" bgcolor="#E4EAF2">
              <td height="37" colspan="4" align="right" bgcolor="#E4EAF2"><font color="#000000"> 　　　</font><a href="#top"><font color="#6B9EDE" face="Arial, Helvetica, sans-serif">Top↑</font></a> </td>
            </tr>
          </table>
      </div></td>
  </tr>
</table>
<%=htmlwrite("html7")%>
<%end if
if ef then%>
<%=ec%>
<%end if%>

