userlogin.asp

顶级影视站ＡＳＰ源代码系统。很全面很强大。数据库用access

<%
'用户信息
   function userinfo(userID)
      dim infoRS
	  set infoRS=conn.execute("SELECT * FROM UserMsg where UserId="&userID&" and readle=false ") 
      if not infoRS.eof then
      response.Write("<a href=""##"" onClick=""javascript:window.open('userinfo.asp?userID="&userID&"','用户信息','width=500,height=288,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes')"">")
	  response.Write("<initArray()>")%>	 
<SCRIPT language=JavaScript1.2>
function initArray() {
this.length = initArray.arguments.length;
for (var i = 0; i < this.length; i++) {
this[i] = initArray.arguments[i];
   }
}
var ctext = "信息栏：您有新信息";
var speed = 200;
var x = 0;
var color = new initArray(
"#EFEFEF", 
"#00aaff",
"#EFEFEF"
);
if(navigator.appName == "Netscape") {
document.write('<layer id="c">'+ctext+'</layer>');
}
if (navigator.appVersion.indexOf("MSIE") != -1){
document.write('<div id="c">'+ctext+'</div>');
}
function chcolor(){ 
if(navigator.appName == "Netscape") {
document.c.document.write('<font color="'+color[x]);
document.c.document.write('">'+ctext+'</font>');
document.c.document.close();
}
else if (navigator.appVersion.indexOf("MSIE") != -1){
document.all.c.style.color = color[x];
}
(x < color.length-1) ? x++ : x = 0;
}
setInterval("chcolor()",200);
</SCRIPT>
<%  
	  response.Write("</a>")
	  end if	 
      infoRS.close
	  set infoRS=nothing
   end function
   
   dim ulRS,SFilmGrade
   if session("username")<>"" and session("password")<>"" then
   set ulRS=conn.execute("SELECT * FROM user where UserName='"&session("username")&"'")
   SFilmGrade=ulRS("Grade")
   if not(ulRS.eof and ulRS.bof) then
   %> 
<div align="center">
  <table width="100%" border="0" cellspacing="0" height="102">
    <tr> 
      <td width="48%"> 
        <div align="right"><font color="#000000"><img src="images/ser.gif" width="16" height="9">用 
          户 名:</font></div>
      </td>
      <td width="52%"><font color=red><%=session("Username")%> </font></td>
    </tr>
    <tr> 
      <td width="48%"> 
        <div align="right"><img src="images/ser.gif" width="16" height="9">用户属性:</div>
      </td>
      <td width="52%"> <font color="#FF0000"> 
        <% select case SFilmGrade 
        case 0 
		  response.write "游客"
        case 1
		  response.write "普通会员"
        case 2
		  response.write "vip会员"
        END select%>
        </font> </td>
    </tr>
    <tr> 
      <td> 
        <div align="right"><img src="images/ser.gif" width="16" height="9">登陆本站:</div>
      </td>
      <td><font color="#FF0000"><%=ulRS("logins")%>次</font></td>
    </tr>
    <tr valign="middle"> 
      <td height="31" colspan="2"> 
        <div align="center"><a href="usermodify.asp">修改资料</a> | <a href="member/UserLogout.asp">正常退出</a><br>
          <a href="detailinfo.asp?userID=<%=ulRS("id")%>">个人资料</a> 
          | <a href="continue.asp">会员续费</a><br>
        <a href="sendmoney.asp">汇款信息 </a> | <a href="member/help.htm" target="_blank">帮助信息</a><br>
        <a href="##" onClick="javascript:window.open('userinfo.asp?userID=<%=ulRS("id")%>','用户信息','width=500,height=288,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes')">信息窗口 </a> | <a href="##"  onClick="javascript:window.open('sendadmin.asp','意见建议','width=550,height=380')"> 意见建议</a>
		<br>
          <a href="hipbbs.asp" target="_blank">bbs留言板</a>|&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
          <%userinfo(ulRS("id"))%> 
        </div>
      </td>
    </tr>
  </table>
  <%    
     ulRS.close
	 set ulRS=nothing
     end if
 else
 %>
</div>

  
<table border="0" align="center" width="100%">

  <form name="userlogin" action="member/UserChkLogin.asp">
    <tr> 
      <td> 
        <div align="center">用 户： 
          <input type=text name="username" value="在此输入用户名" size=13 style="BORDER-RIGHT: #000000 0px solid; BORDER-TOP: #000000 0px solid;BORDER-LEFT: #000000 0px solid; BORDER-BOTTOM: #9ACFFD 2px solid;background=#F2F2F2;FONT-SIZE: 9pt" onFocus="this.value=''">
        </div>
      </td>
    </tr>
    <tr> 
      <td> 
        <div align="center">密 码： 
          <input  type=password name="password" size=13 style="BORDER-RIGHT: #000000 0px solid; BORDER-TOP: #000000 0px solid;BORDER-LEFT: #000000 0px solid; BORDER-BOTTOM: #9ACFFD 2px solid;background=#F2F2F2;FONT-SIZE: 9pt">
        </div>
      </td>
    </tr>
    <tr> 
      <td> 
        <div align="center">
		  <input type="hidden" name="wangye" value="userlogin">
          <input type="hidden" name="submit" value="mysubmit"> <input type="image" border="0" name="submit" value="mysubmit" src="images/login1.gif" width="45" height="20" align=absMiddle onClick="return check3()">
         &nbsp; <a href="UserReg.asp"><img src="images/reg1.gif" width="45" height="20" border="0" align=absMiddle></a></div>
      </td>
    </tr>
    <tr>
      <td>
        <div align="center"> <a href="sendmoney.asp">收费信息</a> | <a href="findpass.asp">找回密码</a><br>
         </div>
      </td>
    </tr>
  </form>
  <tr> </tr>
</table>    

<%end if%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function check3()
{
   if(checkspace(document.userlogin.username.value)||document.userlogin.username.value=="在此输入用户名") {
	document.userlogin.username.focus();
    alert("用户名不能为空，请重新输入！");
	return false;
  }
  if(checkspace(document.userlogin.password.value)) {
	document.userlogin.password.focus();
    alert("密码不能为空，请重新输入！");
	return false;
  }

}


function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}
//-->
</script>