kedelete.asp

来自「教务系统主要是老师和学生的一个平台」· ASP 代码 · 共 16 行

<!--#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"
        %>