delxinwen.asp

在线考试系统

<!--#include file="conn.inc"-->
<%
dim i
id=request("id")
sql="select * from exam_news where newsid='"&id&"'"
  set rs=server.createobject("adodb.recordset")
  rs.open sql,conn,1,2
  if not rs.eof then
  rs.delete
  rs.update
  rs.close
  end if
response.redirect "news.asp"
%>