📄

📁 我做的第一个学生管理系统

💻

字号:

<%
dim Pri
mkmc=request("mkmc")

Pri=CheckUrl(mkmc)
%>
<!--#include virtual="/school/public/CheckUrl.asp"-->
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "database=school;uid=sa;pwd=;dsn=school"
Set rs=conn.Execute( "recordsort_set" )
%>
<html>

<head>
<style>
<!--
a{color:#0000ff;text-decoration:none}
a:hover{color:red;text-decoration:underline}
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb_2312-80">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>档案类别</title>
</head>

<body background="../_themes/sumipntg/Bkg35.jpg">

<p><img src="../images/dalb.gif" width="300" height="80"> </p>

<table border="7" align="center" width="670">
  <tr>
    <td width="81">序号</td>
    <td width="189">档案名称</td>
    <td width="144">档案文件</td>
    <td width="223">建立日期</td>
    <td width="85">主管</td>
  </tr>
<%
   While Not rs.EOF
%>
  <tr>
    <td width="81"><a
    href="学生基本档案资料录入.asp?CategoryID=<%=rs("档案文件")%>"><%=rs("序号")%></a></td>
    <td width="179"><a
    href="学生基本档案资料录入.asp?CategoryID=<%=rs("档案文件")%>"><%=rs("档案名称")%></a></td>
    <td width="115"><a
    href="学生基本档案资料录入.asp?CategoryID=<%=rs("档案文件")%>"><%=rs("档案文件")%></a></td>
    <td width="180"><a
    href="学生基本档案资料录入.asp?CategoryID=<%=rs("档案文件")%>"><%=rs("建立日期")%></a></td>
    <td width="85"><a
    href="学生基本档案资料录入.asp?CategoryID=<%=rs("档案文件")%>"><%=rs("主管")%></a></td>
  </tr>
<%
      rs.MoveNext    
   Wend 
%>
</table>
<script language="javascript">
function click() {
if (event.button==2) {
alert('对不起,禁止使用此功能^_^.')
}
}
document.onmousedown=click
</script>


<p align="center"><a href="学生管理.asp"><img src="../images/fh1.gif" border="0"
alt="返回学生管理" width="80" height="40"></a></p>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -