📄

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

💻

字号:

<%
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( "graduate_grade" )
%>
<html>
<style>
<!--
a{color:bule;text-decoration:none}
a:hover{color:red;text-decoration:underline}
-->
</style>
<head>
<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="../../images/di2001.jpg">

<p><img src=../../images/bysz.gif><hr color="#0000ff">
<br>
<br>
<br>
<br>
<table border="7" align="center" bgcolor="#D9D9D9" width="372">
      <tr>
        <td bgcolor="#D9D9D9" width="40">毕业年度</td>
        <td bgcolor="#D9D9D9" width="40">入学年度</td>        
      </tr>
<%
   While Not rs.EOF
%>
      <tr>
        <td bgcolor="#D9D9D9" width="40"><a
        href="毕业基本资料查询.asp?CategoryID=<%=rs("入学年度")%>"><%=rs("毕业年度")%></a></td>
        <td bgcolor="#D9D9D9" width="40"><a
        href="毕业基本资料查询.asp?CategoryID=<%=rs("入学年度")%>"><%=rs("入学年度")%></a></td>
        
      </tr>
<%
      rs.MoveNext    
   Wend 
%>
    </table>
 <br><br>   
 <p align="center"><a href="../毕业管理.htm"><img src="../../images/fh1.gif" border="0" alt="返回毕业管理"></a>   
 </body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -