<!--#include file="../inc/safe.asp"-->
<!--#include file="../conn/conn.asp"-->
<%
if Not ChkPost then response.redirect ("chklogin.asp?login=4")
Response.Expires = 0
Response.AddHeader "Pragma", "no-cache"
Response.AddHeader "cache-control", "no-store"
%>
<!--#include file="head1.asp"-->

<Br><Br>
<TABLE width=750 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
  <TR>
    <TD vAlign=top width="1%"><IMG height=166 
      src="images/join_pic1.gif" width=154 align=absMiddle></TD>
    <TD 
    style="BORDER-RIGHT: #bbd6f1 1px solid; BORDER-TOP: #bbd6f1 1px solid; BORDER-LEFT: #bbd6f1 1px solid; BORDER-BOTTOM: #bbd6f1 1px solid" 
    vAlign=top align=middle width="100%" bgColor=#ffffdd>
<%	
dim email
email=Replace_Text(Request.Form("email"))
sql="select * from corporation where email='"&email&"'"
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof or rs.bof then
%>
<SCRIPT language=javascript>
//--检测登陆-->

	   function check() {

	      if (trim(document.Form1.email.value) =="")
{
alert("请输入您的电子邮箱地址！");
document.Form1.email.focus();
document.Form1.email.select();
return false;
}
var str1 = document.Form1.email.value
if(str1.indexOf("@") == -1 || str1.indexOf(".") == -1){ 
alert("E-mail格式不正确,请重新填写！"); 
document.Form1.email.focus();
document.Form1.email.select();
return false; 
} 
		    
		 }

           function trim(inputString) {
	   
              if (typeof inputString != "string") { return inputString; }
              var retValue = inputString;
              var ch = retValue.substring(0, 1);
              while (ch == " ") { 
	          //检查字符串开始部分的空格
                  retValue = retValue.substring(1, retValue.length);
                  ch = retValue.substring(0, 1);
              }
              ch = retValue.substring(retValue.length-1, retValue.length);
              while (ch == " ") {
                 //检查字符串结束部分的空格
                 retValue = retValue.substring(0, retValue.length-1);
                 ch = retValue.substring(retValue.length-1, retValue.length);
              }
              while (retValue.indexOf("  ") != -1) { 
	         //将文字中间多个相连的空格变为一个空格
                 retValue = retValue.substring(0, retValue.indexOf("  ")) + retValue.substring(retValue.indexOf("  ")+1, retValue.length); 
              }
              return retValue;
           } 

//-->
</SCRIPT>
      <TABLE cellSpacing=0 cellPadding=6 width="100%" border=0>
        <TBODY>
        <TR>
          <TD class=L align=middle bgColor=#ebf4ff><FONT 
            color=#CC3300>电子邮箱地址输入错误!</FONT></TD></TR>
        <TR>
          <TD class=LL align=middle>
            <P><BR>
            <FORM action="getmemberid1.asp" name="Form1" onsubmit="javascript:if(check()==false) return false;"
            method=post>您输入的电子邮箱地址有误，或者不存在，请检查后重新输入： <BR>电子邮箱： 
                  <INPUT 
            name=email maxlength="50">
                   <INPUT type=submit value=" 确认 " name=Submit> 
            </FORM>
            <BR>
                <STRONG>您可以<A 
            href="register.asp">点击这里</A>重新进行注册<BR>
                <BR></STRONG></TD></TR></TBODY></TABLE>
<%else
'执行发邮件程序
%>
<table width="100%" border="0" cellspacing="0" cellpadding="6">
            <tr> 
              <td align="center" bgcolor="EBF4FF" class="L"><font color="#CC3300">登录名已发送!</font></td>
            </tr>
            <tr>
              <td align="center" class="LL"><br>
                  <br>
                您的登录名是：<font color="#CC3300" style="font-size: 24"><%=rs("user")%></font> 请牢记。 
              </td>
            </tr>
        </table>
<%end if
conn.close
set conn=nothing
%>				
	  </TD></TR></TBODY></TABLE>
<Br><Br>
<!--#include file="../inc/end.asp"-->