index.asp

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

ASP
41 行
字号 
<HTML> <BODY>
	<P ALIGN='RIGHT'><A HREF="ADD_FORM.ASP">上传文件</A>
	<TABLE WIDTH="100%" BORDER="1">
		<TR BGCOLOR="#CACACA" ALIGN="CENTER">
			<TD WIDTH="10%">预览</TD>
			<TD WIDTH="15%">名称</TD>
			<TD WIDTH="13%">大小(K)</TD>
			<TD WIDTH="15%">类型</TD>
			<TD WIDTH="17%">简介</TD>
			<TD WIDTH="10%">下载</TD>
			<TD WIDTH="10%">浏览</TD>
			<TD WIDTH="10%">删除</TD>
		</TR>
<%
	set conn = server.createobject("ADODB.CONNECTION")
	conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" &_
		server.mappath("temp.mdb")
	strSql = "SELECT * FROM uploadfiles ORDER BY submit_date DESC"        
	Set rs = conn.Execute(strSql)
	Do while Not rs.Eof
		Response.Write "<tr bgcolor='#EBEBEB'>"
		Response.Write "<td><img src='showimage.asp?id=" &_
			rs("id") & "' width='120' height='80'></td>"

		Response.Write "<td>" & rs("filename") & "</td>"
		Response.Write "<td align='right'>" & Int(rs("size")/1024) & "</td>"
		Response.Write "<td>" & rs("ext") & "</td>"
		Response.Write "<td>" & rs("intro") & "</td>"
		Response.Write "<td align='center'><a href='download.asp?id=" &_
			rs("id") & "'>下载</a></td>"
		Response.Write "<td align='center'><a href='browse.asp?id=" &_
			rs("id") & "' target='_blank'>浏览</a></td>"

		Response.Write "<td align='center'><a href='delete.asp?id=" &_
			rs("id") & "'>删除</a></td>"
		Response.Write "</tr>"
		rs.MoveNext
	Loop
%>
	</TABLE></BODY> </HTML>

index.asp - 源码说明

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

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

⌨️ 快捷键说明

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