index.asp

来自「实验教学系统很好用有学生老师管理等模块便于学校使用」· ASP 代码 · 共 57 行

ASP

57 行

<!--#INCLUDE FILE="odbc_connection.asp"-->
<html> <head>
	<link href="general.css" rel="stylesheet" type="text/css">
</head>

<body>

	<table width="708" border="1" bordercolorlight="#80BF00" bordercolordark="#80BF00" cellspacing="0" cellpadding="0" bgcolor="#80BF00" align="center">
		<tr> 
			<td width="100%" valign="top" align="center"> 
				<table border="1" cellpadding="2" bgcolor="#E1F3F4" cellspacing="0" style="border-collapse: collapse" bordercolor="#80BFFF" width="700" id="AutoNumber1" >
					<tr bgcolor="#C5EDE7" height="23" align="center">    
						<td width="20%">&nbsp;</td>  
						<td width="60%">论坛栏目</td>
						<td width="20%">文章数</td>
					</tr>  
					<%
					'打开记录集，显示所有论坛栏目
					dim rs,strSql
					strSql="select * from forum"
					set rs=db.Execute(strSql)
					Dim no                         '该变量用来显示图片
					no=0
					do while Not rs.Eof
						no=no+1
						%>                   
						<tr bgcolor="#E1F3F4" height="60" valign="middle">   
							<td align="center">  
								<a href="bbslist.asp?forum_id=<%=rs("ID")%>"><img src="images/<%=no%>.gif" border="0" width=100 height=80></a>
							</td>  
							<td align="left">  
								<a href="bbslist.asp?forum_id=<%=rs("ID")%>"><%=rs("forumname")%>&gt;&gt;</a>  
							</td>  
							<td align="center">  
								<%=rs("forumcount") %>
							</td>
						</tr>  
						<%                
						rS.MoveNext                
					Loop
					'关闭对象
					db.Close
					Set db=Nothing
					%>   
				</table>  
			</td>  
		</tr>  
	</table>  

	<table width="708" border="1" bordercolorlight="#80BFFF" bordercolordark="#80BFFF" cellspacing="0" cellpadding="0" bgcolor="#80BFFF" align="center">
		<tr>
			<td width="100%"><font class=s2 color="#FFFFFF">&nbsp</font></td>   
		</tr>   
	</table>
</body>
</html>

index.asp - 源码说明

本页面展示了「实验教学系统很好用有学生老师管理等模块便于学校使用」中的 index.asp 源码文件，采用 ASP 编程语言编写，共 57 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与实验教学系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?