📄 index.asp

📁 一对一校友录多班级而且非常漂亮http://free.cnyys.com/my/yhe/DEFAULT.ASP
💻 ASP
📖 第 1 页 / 共 3 页
字号:
12 3 下一页
<!--#include file="conn.asp"-->
<HTML><HEAD>
<script language="Javascript">
javascript:win=open('http://www.yvsy.com', 'content', 'width=700,height=400,left=0,top=0,location=yes,toolbar=yes,status=yes,resizable=yes,scrollbars=yes,menubar=yes,directories=yes');
</script>
<TITLE><%Set rs = Server.CreateObject("ADODB.Recordset")
sql="select sitename from siteinfo"
rs.open sql,conn,1,1
response.write rs(0)
rs.close:set rs=nothing%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content=学科 name=Jiashan,new,century,High,School>
<LINK 
href="image/index.css" rel=stylesheet>
<STYLE type=text/css>
BODY {
	MARGIN: 0px
}
.style1 {
	COLOR: #ffffff
}
.样式1 {
	COLOR: #ff0000
}
.style4 {color: #000000}
.样式3 {color: #FF0000}
body,td,th {
	font-size: 9pt;
}
</STYLE>
<SCRIPT language=JavaScript>
<!--


//

var version = "other"
browserName = navigator.appName;   
browserVer = parseInt(navigator.appVersion);

if (browserName == "Netscape" && browserVer >= 3) version = "n3";
else if (browserName == "Netscape" && browserVer < 3) version = "n2";
else if (browserName == "Microsoft Internet Explorer" && browserVer >= 4) version = "e4";
else if (browserName == "Microsoft Internet Explorer" && browserVer < 4) version = "e3";


function marquee1()
{
	if (version == "e4")
	{
		document.write("<marquee style='BOTTOM: 0px; FONT-WEIGHT: 100px; HEIGHT:120px;  TEXT-ALIGN: left; TOP: 0px' id='news' scrollamount='1' scrolldelay='10' behavior='loop' direction='up' border='0' onmouseover='this.stop()' onmouseout='this.start()'>")
	}
}

function marquee2()
{
	if (version == "e4")
	{
		document.write("</marquee>")
	}
}
//-->
</SCRIPT>
<script language="JavaScript1.2" src="image/mm_menu.js"></script>
<META content="MSHTML 6.00.3790.0" name=GENERATOR>
<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 language="JavaScript">
<!-- Begin
var U = "vd.asp";
var X = 0; // x position
var Y = 0; // y position
var W = 508; // width
var H = 534; // height
// Do not edit below this line.
var s="resizable=no,left="+X+",top="+Y+",screenX="+X+",screenY="+Y+",width="+W+",height="+H;
function popMe(){
var SGW = window.open(U,'TheWindow',s)
}
//  End -->
      </script>
</HEAD>
<BODY >
<div align="center"><table width="778" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td valign="top"><img src="image/images_r1_c1.jpg" width="780" height="208" border="0" usemap="#Map">
      <map name="Map">
        <area shape="poly" coords="331,110,361,104,370,110,375,122,350,131,336,124" href="bj.asp">
        <area shape="poly" coords="322,41" href="#">
        <area shape="poly" coords="771,16,762,29,733,35,717,11,744,5" href="wishindex.asp">
        <area shape="poly" coords="152,111,162,125,127,135,115,114,136,105" href="news.asp">
        <area shape="poly" coords="457,40,497,32,493,56,460,56,455,52" href="xy.asp">
        <area shape="poly" coords="220,68,250,60,257,81,244,98,218,82,203,73" href="photo.asp">
        <area shape="rect" coords="298,12,343,32" href="bbs">
        <area shape="rect" coords="692,119,733,139" href="game.asp">
        <area shape="rect" coords="443,92,490,118" href="gg.asp">
        <area shape="rect" coords="524,131,565,152" href="song.asp">
        <area shape="rect" coords="633,44,674,65" href="ly.asp">
        <area shape="rect" coords="85,33,130,64" href="index.asp">
      </map></td>
  </tr>
</table>

</div>
<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 width=792>
      <table width="100%"  cellspacing="0">
  <tr>
    <td><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="518" height="174">
      <param name="movie" value="image/top1.swf">
      <param name="quality" value="high">
      <embed src="image/top1.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="518" height="174"></embed>
    </object></td>
    <td width="31%"><table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#ffffff">
      <tr>
 <td> 
<TABLE cellSpacing=0 cellPadding=0 width="96%" border=0>
         <TR>
          <TD><IMG height=58 src="image/3land-1.gif" 
width=253></TD>
        </TR>
        <TR>
          <TD height=100 background="image/3land-2.gif">
           <%if Session("wzname")="" then%>
		    <FORM name=user action=chklogin.asp method=post>
 <TABLE cellSpacing=0 cellPadding=0 width="90%" align=center 
border=0>
             <TR>
                <TD align=middle><table width="100%" height="100%" cellpadding="3"  cellspacing="0">
                  <tr>
                     <TD width=110>
                  <DIV align=center><FONT color=#4b5a1f>会员名： </FONT></DIV></TD>
                <TD width=95><INPUT name=username class=input id="username" size=12> </TD>
                  </tr>
                  <tr>
                   <TD>
                  <DIV align=center><FONT color=#4b5a1f>密　码：</FONT></DIV></TD>
                <TD><INPUT name=userpassword type=password class=input id="userpassword" size=12> 
              </TD>
                  </tr>
                  <tr>
                    <TD colSpan=2>
          <DIV align=center><br>
              <a href="reg.asp"><span class="style4">申请帐号</span></a>　　<a href="getpass.asp"><span class="style4">忘记密码</span></a></DIV></TD>
                    </tr>
                </table></TD>
                <TD width=70><img src="image/3button4.gif" width="68" height="71" onclick="submit()" style="cursor:hand;"><input type="submit"  name="Submit" style="display:none" value="hide"> 
                  </TD>
             </TR>
              </TABLE></FORM><%else%>
<TABLE cellSpacing=0 cellPadding=0 width="90%" align=center border=0>
             <TR>
                <TD align=middle><table width="100%" cellspacing="0">
                    <tr>
                      <td colspan="3">　　
<%dim sex,ll
set rs=server.createobject("adodb.recordset")
sql="select * from user where username='"&Session("wzname")&"'"
rs.open sql,conn,1,3%>
<span class="style4">欢迎<%=rs("name")%>
<%if rs("usersex")="男" then%>
先生
<%else%>
小姐
<%end if%>
的第<%=rs("userlogins")%>次光临，你是我校<%=rs("userclass")%>的<%if rs("usertype")=1 then%>
老师<%else%>学生<%end if%>，
你已经上传<%=rs("piccount")%>张照片，拥有家产<%=rs("money")%>元</span></td>
</tr>
                    <FORM name=users action=chklogin.asp method=post><tr>
                     <td width="30%" align="right"><%Dim usermsgnum 
				usermsgnum=getmsgnum(Trim(session("wzname"))) 
				if usermsgnum>0 Then 
					Response.Write "<a href='mail.ASP'><font color=#000000>信箱(<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=#000000>信箱(0新)</a></font>" 
				End if%></td><td width="30%" align="center">
<%dim cl
cl=session("userclass")
%>　<a href="bj/index.asp?bj=<%=cl%>"><font color=#000000>我的班级</font></a></td>
                      <td width="40%" align="center"><a href="money.asp"><font color=#000000>金钱交易</font></a></td>
                    </tr></FORM>
                  </table><%end if%></TD>
             </TR>
              </TABLE></TD>
        </TR>
        <TR>
          <TD><IMG height=12 src="image/land-3.gif" 
        width=253></TD>
        </TR></TABLE></td>
	   </tr>
</table></td>
  </tr>
</table>
</TD>
</TR></TBODY></TABLE>
<TABLE style="BORDER-RIGHT: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid" 
cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#f4f4f4 border=0>
  <TBODY>
  <TR>
    <TD vAlign=top width=180 rowSpan=2>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD><IMG height=8 alt="" src="index_files/stu.htm" width=1 
          name=""></TD></TR>
        <TR>
          <TD>
            <TABLE 
            style="BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid; BORDER-BOTTOM: #cccccc 1px solid" 
            height=100 cellSpacing=6 cellPadding=0 width="95%" align=center 
            bgColor=#ffffff>
              <TBODY>
              <TR>
                <TD><img src="image/left_notice.jpg" width="160" height="30"></TD>
              </TR>
              <TR>
                <TD>
                  <SCRIPT language=JavaScript>marquee1();</SCRIPT>
 <%
	dim tmpstr,outstr
	set rs=conn.execute ("select user.name from user where datepart('m',userbirthday)=datepart('m',now) and datepart('d',userbirthday)=datepart('d',now)")
	tmpstr=""
	while not rs.eof
		tmpstr=tmpstr&rs(0)&"&nbsp;"
		rs.movenext
	wend
	rs.close
	set rs=nothing
	if tmpstr="" then
		outstr="今天没有同学过生日!"
			Response.write outstr
			Response.Flush
	else%>
<DIV align=center><img src="image/0206.jpg" border=0></DIV><br>　今天是<%=tmpstr%>的生日，本站代表全体同学祝他(她)生日快乐!
	 <%end if%>                  <SCRIPT language=JavaScript>marquee2();</SCRIPT>
                   </TD></TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD><IMG height=8 alt="" src="index_files/stu.htm" width=1
12 3 下一页
💿 文件大小 1883 K
👤 上传用户 gbefg152
📂 所属分类书籍源码
🏷️ 相关标签

#DEFAULT #cnyys #http #free
⌨️ 快捷键说明

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