<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/safe.asp"-->
<!--#include file="head1.asp"-->
<br>
<br>
<SCRIPT language=javascript>
//--检测登陆-->

	   function DoLogin() {

	      var UsernameGet = trim(document.loginForm.UsernameGet.value);
		  var PasswordGet = trim(document.loginForm.PasswordGet.value);
		  var Verifycode = trim(document.loginForm.Verifycode.value);

          if(UsernameGet == "") {
		    alert("请输入会员登录名！");
			document.loginForm.UsernameGet.focus();
		    return false;
		  } 
		  if(PasswordGet == "") {
		    alert("请输入密码！");
			document.loginForm.PasswordGet.focus();
		    return false;
		  } 
		  if(Verifycode == "") {
		    alert("请输入验证码！");
			document.loginForm.Verifycode.focus();
		    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>
<FORM name="loginForm" action="" method=post onsubmit="javascript:if(DoLogin()==false) return false;">
  <table width="750" border="0" cellpadding="0" cellspacing="0" align="center">
    <tr>
        
      <td class=m><img src="images/icon_attion_16.gif" width="16" height="16" align="absmiddle"> 
        <span style="color: #cc3300;">你目前进行的操作，需要“登录”后才能继续……</span> 
      </td> 
    </tr>
</table>
<hr width="750" color=#cc3300 size=3> 
<br><br>
  <table border=0 cellpadding=0 cellspacing=0 width=95% align="center">
    <tr>
			<td align="center"></td>
	</tr>
		<tr>		
          <td> 
            <table width=750 border=0 cellpadding=0 cellspacing=0 align=center><tr>
                <td>
<%
if Cint(request("Verifycode"))<>Session("Verifycode") then
if request.form("Verifycode")="" then
response.write""
else
response.write"<FONT color='ff0000' class=l><b>错误！</b></font><br>"
response.write"<ul>"
response.write"<li><FONT color='ff0000'> 验证码错误，请重新输入</font><br>"
response.write"</li>"
response.write"</ul>"
end if
else
dim UsernameGet,PasswordGet
UsernameGet=Replace_Text(Request("UsernameGet"))
PasswordGet=Replace_Text(Request("PasswordGet"))
if UsernameGet<>"" and PasswordGet<>"" then
sql="select * from corporation where [User]='"&UsernameGet&"' and Pass='"&PasswordGet&"' "
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof then
response.write"<FONT color='ff0000' class=l><b>错误！</b></font><br>"
response.write"<ul>"
response.write"<li><FONT color='ff0000'> 会员登录名或密码错误</font><br>"
response.write"您刚才输入的会员名是 <font color=ff0000><b>"&Request("UsernameGet")&"</b></font> <br>"
response.write"您刚才输入的密码是<font color=ff0000><b>"&Request("PasswordGet")&"</b></font>，请核对一下刚才输入的登录名和密码是否正确，包括大小写，再重新试一下 "
response.write"</li>"
response.write"</ul>"
else 

'将用户资料记录到各自的Session变量中去
'session("id")=rs("id")
'session("user")=rs("user")
'session("pass")=rs("pass")
'session("question")=rs("question")
'session("answer")=rs("answer")
'session("Qymc")=rs("Qymc")
'session("Qylb")=rs("Qylb")
'session("Qyxz")=rs("Qyxz")
'session("Zczj")=rs("Zczj")
'session("Frdb")=rs("Frdb")
'session("Ygrs")=rs("Ygrs")
'session("Zh")=rs("zh")
'session("Bank")=rs("Bank")
'session("Nyye")=rs("Nyye")
'session("Zycp")=rs("Zycp")
'session("jygs")=rs("jygs")
'session("Qyjj")=rs("Qyjj")
'session("Sf")=rs("Sf")
'session("City")=rs("City")
'session("mobile")=rs("mobile")
'session("Post")=rs("Post")
'session("Address")=rs("Address")
'session("Phone")=rs("Phone")
'session("Fax")=rs("Fax")
session("Email")=rs("Email")
'session("Web")=rs("Web")
'session("name")=rs("name")
'session("ch")=rs("ch")
'session("bm")=rs("bm")
'session("zw")=rs("zw")
'session("cimg")=rs("cimg")
'session("idate")=rs("idate")
'session("sortid")=rs("sortid")
'session("typeid")=rs("typeid")
'session("url")=rs("url")
session("id")=rs("id")
session("user")=rs("user")
'session("hybz")=rs("hybz")
session("cflag")=rs("cflag")
session("uflag")=rs("uflag")
session("Flag")=rs("Flag")

if Request.Cookies("Myworldname")="" then
Response.Cookies("Myworldname")=rs("user")
Response.Cookies("Myworldname").Expires=date()+365
end if

if session("geturl")>"" then
Response.Redirect session("geturl")
else
Response.Redirect("../member/index.asp")
end if

end if
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
end if
%>                 
                </td>
		</tr>
	</table></td></tr></table>
  <TABLE cellSpacing=0 cellPadding=0 width=750 border=0 align="center">
    <TBODY> 
    <TR>
          
        <TD width=392><IMG height=18 src="../seller/images/hason.gif" 
          width=392></TD>
          
        <TD width=18><IMG height=18 src="../seller/images/pic1.gif" 
width=18></TD>
          
        <TD width=340><IMG height=18 src="images/hasnot.gif" 
            width=321></TD>
      </TR>
        <TR>
          <TD width=392>
            <br>
            <TABLE cellSpacing=0 cellPadding=0 width=352 align=center 
              border=0><TBODY>
              <TR>
                <TD background=images/signin_back.gif> 
<div class="smalltoppad"></div>
                  <TABLE id=table2 cellSpacing=0 cellPadding=3 width="90%" 
                  align=center border=0>
                    <TBODY>
                    <TR>
                      <TD colSpan=3>
                        <DIV class=S align=center>
                        <DIV align=left>请输入登录名、密码和验证码，按“登录”即可。</DIV></DIV></TD></TR>
                    <TR>
                      <TD class=M width="32%">会员登录名： </TD>
                      <TD width="40%"><INPUT tabIndex=1 maxLength=20 size=17 name="UsernameGet" value="<%=replace_text(Request.cookies("Myworldname"))%>"> 
                      </TD>
                        <TD width="28%" class=S><A 
                        href="getmemberid.asp">忘了登陆名？</A></TD>
                      </TR>
                    <TR>
                      <TD class=M>密　　　码： </TD>
                                <TD>
<INPUT 
                        name="PasswordGet" type=password tabIndex=2 size=17 maxlength="20"></TD>
                                
                        <TD class=S tabIndex=5><A 
                        href="getanswer.asp">忘了密码？</A></TD>
                      </TR></TBODY></TABLE>
                  <TABLE cellSpacing=0 cellPadding=3 width="90%" align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=M vAlign=top width="32%">验　证　码：</TD>
                      <TD rowspan="2">
                        <TABLE cellSpacing=0 cellPadding=0 width="100%" 
border=0>
                          <TBODY>
                          <TR>
                            <TD width=95><IMG 
                              src="../inc/verifycode.asp?<%=timer()%>" height="15"></TD>
                            <TD><FONT color=#CC3300>←请照此输入</FONT></TD></TR>
                          <TR>
                            <TD><INPUT tabIndex=3 size=12 name="Verifycode"></TD>
                            <TD><INPUT tabIndex=4 type=submit value="登   录" name=Submit></TD></TR></TBODY></TABLE></TD></TR>
                    <TR>
                      <TD height="23" vAlign=top><span class="s"><a 
                        href="javascript:win=window.open('../help/whatcheck.asp','contact','width=400,height=380,scrollbars=no,status=no,toolbar=no%20,menubar=no,location=no');win.focus();"><font 
                        color=#003399>什么是验证码？</font></a></span></TD>
                    </TR></TBODY></TABLE><div class="smalltoppad"></div></TD></TR></TBODY></TABLE></TD>
          
        <TD width=18 background=../seller/images/bg1.gif>&nbsp;</TD>
          <TD width=340>
            <TABLE cellSpacing=3 cellPadding=3 width="80%" align=center 
border=0>
              <TBODY>
              <TR>                
                <TD width="43%"><A 
                  href="register.asp"><IMG height=30 src="images/reg.gif" 
                  width=112 border=0></A></TD>
                <TD width="57%"><IMG height=17 src="../seller/images/kaishi.gif" 
                  width=127></TD>
              </TR>
              <TR>
                <TD colSpan=2>
                  <DIV align=left></DIV>
                  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                    <TBODY>
                    <TR>
                        <TD width="50%" height="35"><IMG height=18 
                        src="../seller/images/zczixun.gif" width=114></TD>
                                <TD width="50%"><FONT 
                        color=#cc3300 class=M style="font-size: 18"><B><%=hottel%></B></FONT> </TD>
                      </TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></form><br>	
<!--#include file="../inc/end.asp"-->