⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 bjhead.asp

📁 一对一校友录多班级而且非常漂亮http://free.cnyys.com/my/yhe/DEFAULT.ASP
💻 ASP
字号:
<!--#include file="../conn2.asp"-->
<!--#include file="../UbbCode.asp"-->
<HTML><HEAD>
<TITLE><%Set rs = Server.CreateObject("ADODB.Recordset")
sql="select sitename from siteinfo"
rs.open sql,conn,1,1
response.write rs(0)%></TITLE>
<META http-equiv=Content-Language content=zh-cn>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK 
href="../image/index.css" rel=stylesheet>
<SCRIPT language=JavaScript1.2>
<!--

function makevisible(cur,which){
if (which==0)
cur.filters.alpha.opacity=100
else
cur.filters.alpha.opacity=20
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
//-->
</SCRIPT>
<STYLE type=text/css>
BODY {
	MARGIN-LEFT: 0px; MARGIN-RIGHT: 0px
}
.样式1 {color: #FFFFFF}
.style4 {color: #CC3300}
</STYLE>
<STYLE type=TEXT/CSS>
A {
	TEXT-DECORATION: none
}
A:hover {
	COLOR: #0000CC; TEXT-DECORATION: underline
}
TD {
	FONT-SIZE: 9pt; LINE-HEIGHT: 13pt
}
TH {
	FONT-SIZE: 9pt; LINE-HEIGHT: 13pt
}
BODY {
	FONT-SIZE: 9pt; LINE-HEIGHT: 13pt
}
#mnu {
	FILTER: revealTrans(Duration=1.5,Transition=12) visibility:hide
}
.style3 {color: #FFFFFF}
.style5 {color: #CC3300}
</STYLE>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<SCRIPT>
function set_mnu()
{
if (mnu.style.visibility=="hidden")
	{
//产生效果和把图层显示
	mnu.filters.revealTrans.apply();
	mnu.style.visibility="visible";
	mnu.filters.revealTrans.play();
	}
else{
//隐藏图层和停止效果播放
	mnu.filters.revealTrans.stop();
	mnu.style.visibility="hidden" ;
	}
}   
</SCRIPT>
<script language="JavaScript1.2" src="../image/mm_menu.js"></script>
</HEAD>
<BODY background="" topMargin=0 marginheight="0">
	     <div id=mnu style="LEFT: 692px; POSITION: absolute; TOP: 23px; VISIBILITY: hidden; Z-INDEX: 1"> 
	  <TABLE width="70" border=1 cellPadding=0 cellSpacing=1 bordercolor="#000000">
        <TBODY>
         <TR >
           <TD align="center" solid #000000"><a href="../note.asp"><font color="#000000">记事本</font></a></TD>
         </TR>
             <TR >
               <TD align="center" solid #000000"><a href="../editreg.asp"><font color="#000000">编辑资料</font></a></TD></TR>
               <TR >
           <TD align="center" solid #000000"><a href="../mail.asp"><font color="#000000">我的信箱</font></a></TD></TR>
<TR >
               <TD align="center" solid #000000"><a href="../bj/ly.asp?type2=cz&type3=username&key=<%=session("wzname")%>&bj=<%=session("userclass")%>"><font color="#000000">我的留言</font></a></TD></TR>
			  <TR >
               <TD align="center" solid #000000"><a href="../grphoto.asp?mmm=0&photocx=<%=session("wzname")%>"><font color="#000000">我的相册</font></a></TD></TR>
      </TBODY>
</TABLE></div>
<DIV align=center>
  <table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EFCF84">
    <tr>
      <td height="27"><div align="center"><a href="../index.asp">首页</a></div></td>
      <td><div align="center"><a href="../gg.asp">公告</a></div></td>
      <td><div align="center"><a href="../news.asp">新闻</a></div></td>
      <td><div align="center"><a href="../ly.asp">留言</a></div></td>
      <td><div align="center"><a href="../photo.asp">相册</a></div></td>
      <td><div align="center"><a href="../bbs/index.asp">论坛</a></div></td>
      <td><div align="center"><a href="../bj.asp">班级</a></div></td>
      <td><div align="center"><a href="../xy.asp">校友</a></div></td>
      <td><div align="center"><a href="../wishindex.asp">许愿</a></div></td>
      <td><div align="center"><a href="../game.asp">商场</a></div></td>
      <td><div align="center"><a href="javascript:set_mnu(mnu);">个人面板</a></div></td>
      <td><div align="center"><a href="../reg.asp">注册</a></div></td>
      <td><div align="center"><a href="../logout.ASP">退出</a></div></td>
    </tr>
  </table>
</DIV>
 <% dim bj,clas
bj=Request.QueryString("bj")
if bj<>"" then
session("clas")=bj
end if
if session("clas")="" then
response.redirect "err.asp"
end if
%>
<TABLE style="BORDER-RIGHT: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid" 
cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#FEEB82 border=0>
  <TBODY>
  <TR>
    <TD width="170" bgColor=#FEE247><span class="style4"><%=session("clas")%>班欢迎你!</span></SPAN></TD>
    <TD width=617 bgColor=#FEEB82>
      <TABLE width="100%" border=0 
      cellPadding=0 cellSpacing=0 bgcolor="#FEEB82" id=AutoNumber2 style="BORDER-COLLAPSE: collapse">
        <TBODY>
        <TR>
          <FORM name=user action=chklogin.asp method=post>
          <TD height=26 align=left valign="top" bgcolor="#FEE247">
<%if Session("wzname")="" then%>
<SPAN class=style1 style4><span class="style4">请登录</span>  <span class="style4">用户名</span></SPAN> <span class="style4">
<INPUT 
            style="FONT-SIZE: 12px; HEIGHT: 16px" size=10 name=username 
            face="宋体" font> 密 码</span> <INPUT 
            name=userpassword type=password id="userpassword" 
            style="FONT-SIZE: 12px; HEIGHT: 16px" size=14 face="宋体" font>
            <input type="submit" name="Submit" value="提交"> <input type="reset" name="Submit2" value="重置"> 
            <span class="style4">
            <%else%>
            <%dim sex,ql
set rs=server.createobject("adodb.recordset")
ql="select * from user where username='"&Session("wzname")&"'"
rs.open ql,conn,1,3%>
            <marquee scrollAmount=3 scrollDelay=100 width="320">
            欢迎<%=rs("name")%>
            <%if rs("usersex")="男" then%>
先生
<%else%>
小姐
            </marquee>
            </span><SPAN class=style1><marquee scrollAmount=3 scrollDelay=100 width="320">
<span class="style4">
<%end if%>
的第<%=rs("userlogins")%>次光临,你是我校<%=rs("userclass")%>的
<%if rs("usertype")="1" then%>
老师
<%else%>
学生</span>
<%end if%></marquee></SPAN> <a href="logout.ASP"><span class="style4">退出</span></a> 
<%Dim usermsgnum 
				usermsgnum=getmsgnum(Trim(session("wzname"))) 
				if usermsgnum>0 Then 
					Response.Write "<a href='../mail.ASP'><font color=white>信箱(<font color=red>"&usermsgnum&"</font>新)</a></font>" 
					Response.Write "<bgsound balance=0 src='../image/mail.wav' loop=1> " 
				Else 
					Response.Write "<a href='../mail.ASP'><font color=white>信箱(0新)</a></font>" 
				End if%>
<%end if
dim cl
cl=session("userclass")%>
 <a href="index.asp?bj=<%=cl%>"><span class="style4">我的班级</span></a>
 
<select name="select" id="select" onchange="location=this.options[this.selectedIndex].value">
<option selected>学校班级</option>
<%dim rt
Set rt = Server.CreateObject("ADODB.Recordset")
sql="select bjname from bj order by bjname"
rt.open sql,conn,1,1
							  do while not rt.eof%>
				    <option value="index.asp?bj=<%=rt("bjname")%>"><%=rt("bjname")%></option>
 <%rt.movenext
      loop
	  rt.close
	   set rt= nothing%>
		        </select></TD>
          </FORM>
        </TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE 
style="BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid; BORDER-BOTTOM: #cccccc 1px solid" 
cellSpacing=0 cellPadding=0 width=778 align=center border=0>
  <TBODY>
  <TR>
    <TD vAlign=top height=79>      <DIV align=center><div id="Layer1" style="position:absolute; width:200px; height:104px; z-index:1; left: 125px; top: 54px;">       
      <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="755" height="100">              
        <param name="movie" value="../in1.swf">              
        <param name="quality" value="high">              
        <param name="wmode" value="transparent">              
        <embed src="../in1.swf" width="755" height="100" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>              
      </object></div><IMG src="img/top2.jpg" width=778 height=115 border="0" usemap="#Map">   </DIV></TD></TR></TBODY></TABLE>
<map name="Map">
  <area shape="rect" coords="94,100,169,114" href="index.asp?bj=<%=Session("clas")%>">
  <area shape="rect" coords="177,101,256,118" href="gg.asp?bj=<%=Session("clas")%>">
  <area shape="rect" coords="261,100,335,116" href="ly.asp?bj=<%=Session("clas")%>">
  <area shape="rect" coords="348,100,421,115" href="photo.asp?bj=<%=Session("clas")%>">
  <area shape="rect" coords="436,100,510,117" href="xy.asp?bj=<%=Session("clas")%>">
  <area shape="rect" coords="518,99,593,116" href="song.asp?bj=<%=Session("clas")%>">
  <area shape="rect" coords="604,100,680,115" href="adminbj.asp?bj=<%=Session("clas")%>">
</map>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -