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

📄 xs_student.asp

📁 学生档案管理系统。。 调试测试可以用。
💻 ASP
字号:
<!--#include file=conn.asp-->
<!--#include file=xwfun.asp-->
<!--#include file=function.asp-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
 <HEAD>
  <title>学生信息网页</title>
   <style type="text/css">
<!--
.STYLE1 {font-size: 24px}
-->
   </style>
 </HEAD>

 <BODY>
  <% 
 Sno=request.Form("Sno")
 Name=request.form("Name")
 GName=request.Form("GName")
   sqlstr="select * from student where 1=1 "
 if Sno<>"" then
  sqlstr=sqlstr &" and 学生ID ='"&Sno&"'"
  end if
 if Name<>"" then
  sqlstr=sqlstr &" and 姓名 like '%"&Name&"%'"
  end if
 if GName<>"" then
  sqlstr=sqlstr &" and 班级 like '%"&GName&"%'"
  end if
   sqlstr=sqlstr & "Order by 学生ID"
   set rs=conn.execute(sqlstr)
%>
  <center>
<p align="center"></center><b>学生信息</b>
<table border="1">
<tbody>
<tr>
    <td align=middle" width="12%" bgcolor="#D6D3CE">学生ID</td>
   <td align=middle" width="8%" bgcolor="#D6D3CE">姓名</td>
    <td align=middle" width="4%" bgcolor="#D6D3CE">性别</td>
   <td align=middle" width="8%" bgcolor="#D6D3CE">出生日期</td>
 <td align=middle" width="10%" bgcolor="#D6D3CE">电话</td>
 <td align=middle" width="10%" bgcolor="#D6D3CE">地址</td>

 <td align=middle" width="10%" bgcolor="#D6D3CE">班级</td>
 <td align=middle" width="10%" bgcolor="#D6D3CE">系别</td>
 <td align=middle" width="8%" bgcolor="#D6D3CE">修改</td>
 <td align=middle" width="8%" bgcolor="#D6D3CE">删除</td>
</tr>
<% do while not rs.eof '开始循环,显示每条记录%>
 <tr>
   <td align="middle" bgcolor="#ffffff"width="12%">
   <a href="query.asp?学生ID=<%=rs("学生ID")%>"title="查询学生个人信息"><%=rs("学生ID")%></a></td>
<td align="middle" bgColor="#ffffff"width="8%"><%=rs("姓名")%></td>
<td align="middle" bgColor="#ffffff"width="4%"><%=rs("性别")%></td>
<td align="middle" bgColor="#ffffff"width="8%"><%=rs("出生日期")%></td>
<td align="middle" bgColor="#ffffff"width="10%"><%=rs("电话")%></td>
<td align="middle" bgColor="#ffffff"width="10%"><%=rs("地址")%></td>

<td align="middle" bgColor="#ffffff"width="10%"><%=rs("班级")%></td>
<td align="middle" bgColor="#ffffff"width="10%"><%=rs("系别")%></td>
<td align="middle" bgColor="#ffffff"width="8%">
    <a href="update.asp?学生ID=<%=rs("学生ID")%>">修改</a>
	</td>
	<td align="middle" bgColor="#ffffff"width="8%">
     <a href="delete.asp?学生ID=<%=rs("学生ID")%>" onclick="return(confirm('确实要删除吗?'))">删除</a>
</td>
	</tr>
	<%
	rs.movenext
	loop
	'循环结束
	%>
	<%
	rs.close
	Set rs=Nothing
	%>
  </tbody>
</table>
	<div>
	<center><br><input name="bt1" onClick="document.location.href='write.asp';"style="cursor: hand;"type="button"value="添加学生">&nbsp;
	<input name="bt2" onClick="document.location.href='xs_student.asp';"style="cursor: hand;"type="button"value="显示所有学生"></center>
	</div>
	<!--以下是查询表单-->
	<form method = "POST" action="xs_student.asp">
	<p>按[ 学生ID ]查询: 
	  <input type="text" name="Sno"size="20">
	<p>按[姓名]模糊查询:
	  <input type="text" name="Name"size="20">
	<p>按[班级]模糊查询:
	  <input type="text" name="GName"size="20"> 
	<p>
	   <input type="submit" value="查询"name="B1">
	  <input type="reset" value="清除"name="B2">
    <p align="center" class="STYLE1">
    	</form>
	
 </BODY>
</HTML>

⌨️ 快捷键说明

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