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

📄 left.asp

📁 都市星空BBS系统 v1.1(SQL)
💻 ASP
字号:
<%
'==============================================================================
'软件名称:星空社区 VER 1.0.15
'当前版本:starcity club V1.0.15
'最新更新:2004.9
'==============================================================================
'Copyright (C) 2002-2004 Googln.com  All rights reserved.
'商业注册联系:010-64410364
'技术支持QQ:6370639(限商业用户) 
'程序开发:Googln Studio(BeiJing)
'Email:Avram@163.com
'论坛支持:星空社区(http://www.starcity.cn/bbs)
'官方网站:www.Googln.com  演示站点:www.starcity.cn/bbs  都市星空:www.starcity.cn 阳光商城:www.sunmall.com.cn
'==============================================================================
'免费版本请在首页保留版权信息,并做上本站LOGO友情连接
'都市星空在线保留此程序的法律追究权利
'==============================================================================
%>
<!--#include file="include/conn.asp"-->
<!-- #include file="inc.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="include/style_.css">
<style type="text/css">
<!--
body {
	background-color: #738AD6;
}
-->
</style>
<script language=Javascript>
<!--
function exit(){
	window.top.location='logout.asp';
}
//-->
</script>
<script language=Javascript>
<!--
function home(){
	window.top.location='default.asp';
}
//-->
</script>
<SCRIPT lanuage="Javascript">
var tt='start';
var ii='start';
function turnit(ss,bb) {

  if (ss.style.display=="none") {
    if(tt!='start') tt.style.display="none";
    if(ii!='start') ii.src="";
    ss.style.display="";
    tt=ss;
    ii=bb;
    bb.src="";
  }
  else {
    ss.style.display="none"; 
    bb.src="";
  }
}

function openWindow(url) {
  popupWin = window.open(url, 'new_page', 'width=400,height=410,scrollbars')
}
</SCRIPT>
</head>
<body leftmargin="0" topmargin="0">
<table  border="0" align="left" cellpadding="2" cellspacing="2">
  <TBODY>
    <TR>
      <TD>&nbsp;</TD>
    </TR>
    <TR>
      <TD><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="29"><img src="images/01.gif" width="32" height="16"></td>
          <td><a href="Javascript:home()"><span class="7">网站首页</span></a></td>
        </tr>
      </table>
</TD>
    </TR>
    <TR>
      <TD><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="29"><img src="images/01.gif" width="32" height="16"></td>
          <td><span class="7">个人服务</span></td>
        </tr>
      </table></TD>
    </TR>
    <TR>
      <TD><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="40"><div align="right"><img src="images/04.gif" width="11" height="16"></div></td>
          <td><a href="reg.asp" target="mainFrame"><span class="7">会员注册</span></a></td>
        </tr>
      </table>
        <table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="40"><div align="right"><img src="images/04.gif" width="11" height="16"></div></td>
            <td><a href="login.asp" target="mainFrame"><span class="7">会员登录</span></a></td>
          </tr>
        </table>
        <table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="40"><div align="right"><img src="images/04.gif" width="11" height="16"></div></td>
            <td><a href="user_modify.asp" target="mainFrame"><span class="7">修改资料</span></a></td>
          </tr>
        </table>
        <table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="40"><div align="right"><img src="images/line.gif" width="11" height="16"></div></td>
            <td><a href="user_passwordmodify.asp" target="mainFrame"><span class="7">修改密码</span></a></td>
          </tr>
        </table></TD>
    </TR>
    <TR>
      <TD><img src="images/hr.gif" width="140" height="2"></TD>
    </TR>
	<%set rs1=server.createobject("adodb.recordset")
	set rs2=server.createobject("adodb.recordset")
	strsql = "select * from db_class"
	intcrease=0
	set rs1 = conn.Execute(strsql)
	do while not rs1.Eof
		strContent = "Content" & intcrease
		strTag = "tag" & intcrease
		id = rs1("id")
		%>
		   <TR>

      <TD height="22" align="center" vAlign=middle  id=<%=strTag%> 
    style='CURSOR: hand' onclick=turnit(<%=strContent%>,<%=strTag%>);  language=JScript><table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="32"><img src="images/02.gif" width="32" height="16"></td>
            <td><span class="7"><%=rs1("name")%></span></td>
          </tr>
      </table></TD>
    </TR>
	<TR>
      <TD align="right" id=<%=strContent%> style='DISPLAY: none' vAlign=center>

		<%
		set rs2 = conn.Execute("select * from db_board where id=" & id)
		do while not rs2.Eof 
			%>
			<table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="40"><div align="right"><img src="images/04.gif" width="11" height="16"></div></td>
            <td><a href=read_art_sub.asp?boardid=<%=rs2("boardid")%>  target="mainFrame" onFocus="this.blur()"><span class="7"><%=rs2("boardname")%></span></a></td>
          </tr>
        </table>
			<%
			rs2.movenext
		loop
		intcrease = intcrease +1
		rs1.movenext
	loop
	%>
</TD>
    </TR><tr><td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="29"><img src="images/01.gif" width="32" height="16"></td>
        <td><a href="Javascript:exit()"><span class="7">退出</span></a></td>
      </tr>
    </table></td>
    </tr>
    <tr>
      <td>&nbsp;</td>
    </tr>
    <tr>
      <td><div align="center"><span class="7">www.Googln.com</span></div></td>
    </tr>
  </TBODY>
</TABLE>
</body>   
</html>
<%
rs1.close
rs2.close
set rs1=nothing
set rs2=nothing
%>

⌨️ 快捷键说明

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