kedelete.asp

关于学生成绩的管理系统

<!--#include file="conn.asp"-->   
        <%
        teachername=request("teachername")    
         set rs=server.CreateObject("adodb.recordset")  
         sqlstr="select * from 课程  where teachername='"+teachername+"'"
         rs.open sqlstr,conn,3,2             
         if not rs.eof then
		   rs.delete
           rs.update             
          end if        
         rs.close
         conn.close                   
         set rs=nothing
         set conn=nothing
		 response.Redirect"keupdatecha.asp"
        %>