<!--#include file="../login/0.asp"-->
<!--#include file="../../mycartconn/conn.asp"-->
<!--#include file="../../mycartconn/page.asp"-->
<!--#include file="../../mycartconn/my.asp"-->
<!--#include file="../../mycartconn/md5.asp"-->
<%
dim id
id=request("id")
if id="" then
	response.write "<script>alert(""参数错误！"");history.go(-1);</script>"
	response.end
end if
set rs = conn.execute("select top 1 id,mail,sj,huiyuan,password from huiyuan where id="&id&"")
if not (rs.bof and rs.eof) then
	sj=md5(second(rs(2))&minute(rs(2))&hour(rs(2)))
	html="<html><head><title>感谢您的注册</title><meta http-equiv=Content-Type content=text/html; charset=gb2312></head><body bgcolor=#FFFFFF text=#000000>"
	html=html&"亲爱的"&rs(3)&",您好！<br><br>　 欢迎注册为会员。<br><br>"
	html=html&"现在还差最后一步----核对您邮箱的有效性！<br>您只需要点击以下链接，就可以成功完成在"&my_name&"上的注册啦！<br>请点击以下链接或者将该链接复制到浏览器地址栏中访问，也可以成功完成您在"&my_name&"上的注册<br><br>"
	html=html&"<a href=http://www."&my_url&"/huiyuan/reg.asp?abc=yz&id="&rs(0)&"&yz="&sj&">http://www."&my_url&"/huiyuan/reg.asp?abc=yz&id="&rs(0)&"&yz="&sj&"</a>"
	html=html&"<br><br>"&email_bd&"</body></html>"
	email = rs(1)
	bt = "完成最后一步，您在"&my_name&"的注册就成功了！" 

%>
<link href="../../mycartconn/admin.css" rel="stylesheet" type="text/css">
<style>
.tableBorder {
	BORDER-RIGHT: #559CE9 1px solid; BORDER-TOP: #559CE9 1px solid; BORDER-LEFT: #559CE9 1px solid; BORDER-BOTTOM: #559CE9 1px solid; BACKGROUND-COLOR: #ffffff
}
TD.forumRow {
	PADDING-RIGHT: 3px; PADDING-LEFT: 3px; BACKGROUND: #f1f3f5; PADDING-BOTTOM: 3px; PADDING-TOP: 3px
}
TH {
	FONT-WEIGHT: bold; FONT-SIZE: 12px; BACKGROUND-IMAGE: url(admin_bg_1.gif); COLOR: white; BACKGROUND-COLOR: #4455aa; PADDING-LEFT: 5px
}
</style>
<title>邮件重发</title>
<script language="javascript">
function CheckForm()
{
  if (editor.EditMode.checked==true)
	  document.myform.Content.value=editor.HtmlEdit.document.body.innerText;
  else
	  document.myform.Content.value=editor.HtmlEdit.document.body.innerHTML; 

  if (document.myform.Subject.value=="")
  {
    alert("邮件标题不能为空！");
	document.myform.Subject.focus();
	return false;
  }
  if (document.myform.MailServer.value=="")
  {
    alert("邮件服务器不能为空！");
	document.myform.MailServer.focus();
	return false;
  }
  if (document.myform.Sender.value=="")
  {
    alert("发件人的E-MAIL地址不能为空！");
	document.myform.Sender.focus();
	return false;
  }
  if (document.myform.SenderName.value=="")
  {
    alert("登录用户名不能为空！");
	document.myform.SenderName.focus();
	return false;
  }
  if (document.myform.SenderPass.value=="")
  {
    alert("登录密码不能为空！");
	document.myform.SenderPass.focus();
	return false;
  }
  if (document.myform.Content.value=="")
  {
    alert("邮件内容不能为空！");
	editor.HtmlEdit.focus();
	return false;
  }
  if (document.myform.Content.value.length>65536)
  {
    alert("邮件内容太长，超出了ACCESS数据库的限制（64K）！建议将文章分成几部分录入。");
	editor.HtmlEdit.focus();
	return false;
  }
  myform.submit();    
}
function loadForm()
{
  editor.HtmlEdit.document.body.innerHTML=document.myform.Content.value;
  return true
}
</script>
<body onLoad="javascipt:setTimeout('loadForm()',1000);">
<center>
<form name="myform" method="POST" action="sendmail.asp">
<TABLE class=tableBorder cellSpacing=1 cellPadding=2 width="95%" align=center border=0>
<tr>
  <TH height=25 align=left colspan=2>编辑邮件内容　　＊编辑器按钮不显示请<a href="#" onclick="self.location.reload();"><FONT COLOR="#FFFF00">刷新</font></a>
</TH>
</tr>
<tr>
<td width="30%" height=25 class=forumrow align=center valign=top>
<TABLE>
<TR>
	<TD>邮件标题</TD>
</TR>
<TR>
	<TD><input type="text" name="Subject" size="30" value="<%=bt%>"><br><br></TD>
</TR>
<TR>
	<TD>邮件服务器</TD>
</TR>
<TR>
	<TD><input type="text" name="MailServer" size="30" value="mail.163.com"></TD>
</TR>
<TR>
	<TD><font color=red>*</font><FONT COLOR="#660000">例如：mail.163.com<br>　　　 smtp.163.com</FONT><br><br></TD>
</TR>
<TR>
	<TD>发件人的E-MAIL地址</TD>
</TR>
<TR>
	<TD><input type="text" name="Sender" size="30" value="yang1233481@163.com"></TD>
</TR>
<TR>
	<TD><font color=red>*</font><FONT COLOR="#660000">必须与邮件服务器对应</FONT><br><br></TD>
</TR>
<TR>
	<TD>登录邮件服务器所需的用户名</TD>
</TR>
<TR>
	<TD><input type="text" name="SenderName" size="30" value="yang1233481"><br><br></TD>
</TR>
<TR>
	<TD>登录邮件服务器所需的密码</TD>
</TR>
<TR>
	<TD><input type="password" name="SenderPass" size="30" value="57895314"></TD>
</TR>
<TR>
	<TD>收件人的E-MAIL地址</TD>
</TR>
<TR>
	<TD><input type="text" name="email" size="30" value="<%=rs("mail")%>"></TD>
</TR>
<TR>
	<TD><font color=red>*</font><FONT COLOR="#660000">必须与邮件服务器对应</FONT><br><br></TD>
</TR>
</TABLE>
</td>
<td width="70%" height=25 class=forumrow align=center>
<textarea name="Content" style="display:none"><%=replace(html,"""","'")%></textarea> 
<iframe ID="editor" src="../editor/editor.asp" frameborder=1 scrolling=no width="570" height="405"></iframe>
</td>
</tr>
<tr>
  <Td class=forumrow height=25 colspan=2 align=center><input type="submit" name="Submit" value="　发　送　" onclick="javascript:return CheckForm();">　　　　　　　<input type="button" name="Submit2" value="　返　回　" onclick="javascript:window.close();"></Td>
</tr>
</table>
</form>
</center>
</body>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>