www.gusucode.com > ASP+ACCESS学生管理系统(源代码+论文) > ASP+ACCESS学生管理系统(源代码+论文)\zjw\addkc.asp
<!--#include file="data.asp"--> <!--#include file="user.asp"--> <% set rs=server.createobject("adodb.recordset") sql="select * from kc" rs.open sql,conn,1,1 %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>添加统考科目</title> <link rel="stylesheet" href="style.css"> </head> <body topmargin="0"> <!--#include file="top.asp"--> <div align="center"> <center> <table> <table border="1" width="400" bordercolorlight="#000000" cellspacing="0" cellpadding="4" bordercolordark="#FFFFFF"> <tr> <td width="99" align="center">序号</td> <td width="99" align="center">科目</td> <td width="100" align="center">修改</td> <td width="100" align="center">删除</td> </tr> <%if not rs.eof then%> <%do while not rs.eof%> <tr> <td width="99" align="center"><%=rs("id")%></td> <td width="99" align="center"><%=rs("subject")%></td> <td width="100" align="center"><a href="updata.asp?id=<%=rs("id")%>">修改</a></td> <td width="100" align="center"><a href="delkc.asp?id=<%=rs("id")%>">删除</a></td> </tr> <%rs.movenext%> <%loop%> <%else%> <tr> <td width="388" colspan="4"><marquee>暂无统考科目添加</marquee></td> </tr> <%end if%> </table> </center> <div align="center"> <table border="0" width="400" bordercolorlight="#000000" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF"> <tr> <td width="100%"> <form method="POST" action="addkc1.asp"> <table border="1" width="100%" bordercolorlight="#000000" cellspacing="0" cellpadding="5" bordercolordark="#FFFFFF"> <tr> <td width="33%"> <p align="right">添加科目:</td> <center> <td width="33%"><input type="text" name="subject" size="20"></td> <td width="34%"><input type="submit" value="提交" name="B1"></td> </tr> </table> </form> </td> </tr> </table> </center> </div> </body>