<%
dim dns
dns="../"
%><!--#include file="Inc_DatConn.asp"-->
<!--#include file="Inc_Function.asp"-->
<link href="1.css" type="text/css" rel="stylesheet">
<base target="_top">
<body topmargin="0" leftmargin="0">
<%
if (not IsTimeOutuser(Session("boobuser"),Session("boobpass"))) and intMemberKey <> "" and Session("boobuser")<>"" and Session("boobpass")<>"" then
	Dim rdsMemberss
	Dim sqlMemberss
	Dim strMemberLevel
	Dim strMemberType
	Dim strRealName
				              
	set rdsMemberss = Server.CreateObject("ADODB.Recordset")
	sqlMemberss = "Select * From Dat_Member Where MemberKey = "& intMemberKey
	rdsMemberss.Open sqlMemberss,Conn
	if not rdsMemberss.EOF then
		intMemberKey=rdsMemberss("MemberKey")
if rdsMemberss("LoginCount") mod addpoint = 0 then
		set rdsMember22 = Server.CreateObject("ADODB.Recordset")
		sqlMember22 = "Select * From Dat_Member Where MemberKey = "& intMemberKey
		rdsMember22.Open sqlMember22,Conn,1,3
		rdsMember22("Point") = rdsMember22("Point") + addpointnum
		rdsMember22.Update
		rdsMember22.Close
		set rdsMember2 = nothing
end if
		
		

        if rdsMemberss("MemberType") = "1" then
		  strMemberType = "个人"
		  strRealName = rdsMemberss("RealName")
		else
		  strMemberType = "企业"
		  strRealName = rdsMemberss("CompanyName")
		end if			
%>
<table cellSpacing="0" cellPadding="0" width="100%" border="0">
  <tbody>
  <tr>
    <td width="100%" height="24" background="../imger/09.gif"><img src="../imger/0101.gif" width="88" height="19"></td>
  </tr>
  <tr>
    <td width="100%" height="22"><font color="#FF0000"><% = strRealName%></font> <font color="#000000"><% = strMemberType%></font></td>
  </tr>
  <tr>
    <td width="100%" height="22"><font color="#000000">级别：<%if session("gqjb")=0 then Response.Write("<font color=#FF00FF>注册会员</font>  <!--a href=../sjgj.asp target=_top><font color=#FF000F>申请高级</font></a-->")%>
    <%if session("gqjb")=1 then Response.Write("<font color=#FF0000>高级会员</font>")%>
    <%if session("gqjb")=-1 then Response.Write("<font color=#0000FF>高级申请中</font>")%></font></td>
  </tr>
  <tr>
    <td width="100%" height="22"><font color="#000000">登陆：<% = rdsMemberss("LoginCount")%>&nbsp;次</td>
  </tr>
  <tr>
    <td width="100%" height="22" align="center"><a href="../user.asp?id=<% =intMemberKey%>" target=_top>进入管理</a>　|　<a href="../LogOut.asp" target=_top>退 出</a>&nbsp;</td>
  </tr>
</tbody>
</table>
<%
    end if
    rdsMemberss.Close
    set rdsMemberss = nothing
else
%>
<script language="javascript">
//检验表单的合法性
function CheckLoginForm() {
	if (document.Logon.Member.value == "") {
		alert("\请输入您的帐户！");
		document.Logon.Member.focus();
	}
	else if (document.Logon.Password.value == "") {
		alert("\请输入您的密码！");
		document.Logon.Password.focus();
	}
	else {
        return true;
    }
    return false;
}
</script>
<table width="100%" border="0" cellspacing="0" cellpadding="0"><form method="post" name="Logon" action="../CheckPass.asp" OnSubmit="return CheckLoginForm()">
<input type="hidden" name="ParentUrl" value="<% = Request.ServerVariables("SCRIPT_NAME")%>">
          <tr>
            <td height="24" colspan="3" background="../imger/09.gif"><img src="../imger/010.gif" width="88" height="19"></td>
    </tr>
          <tr>
            <td width="30%" height="30" class="STYLE4">用户名：</td>
            <td width="40%" height="30"><input type="text" size="9" name="Member" class="boxttt"></td>
            <td width="30%" rowspan="2" align="right"><input type="image" height="48" width="48" src="../imger/011.gif" border="0" name="Submit"></td>
          </tr>
          <tr>
            <td height="30" class="STYLE4">密　码：</td>
            <td height="30"><input type="password" size="9" name="Password" class="boxttt"></td>
    </tr>
          <tr>
            <td height="25" colspan="3" align="center" valign="bottom"><%If is_gqot_user=1 then%><a href="<%=ot_lostpasswordurl%>"><%else%><a href="../reg.asp"><%end if%><img src="../imger/login4.gif" width="51" height="20" border="0"></a>　<%If is_gqot_user=1 then%><a href="<%=ot_regurl%>"><%else%><a href="../FindPwd.asp"><%end if%><img src="../imger/login5.gif" width="76" height="20" border="0"></a></td>
    </tr></form>
</table>
<%end if%>