news_del.asp

管理登录system 管理员：admin 密码：admin888 数据库链接文件： conn.asp 内容数据库前台链接文件 systemconn.asp 内容数据库后台链接文件 sy

<!--#include file="Check_Login.asp"-->
<!--#include file="Conn.asp"-->
<%
  VCome=Right(Request.ServerVariables("HTTP_REFERER"),12)
  page=request.QueryString("page")
  if page="" then page=1
  selectid=request("selectid")
  if selectid<>"" then
    conn.execute "delete from News where id in ("&selectid&")"
	if VCome="NewsSeek.asp" then
	   start_date=trim(request.Form("start_date"))
       end_date=trim(request.Form("end_date"))
       namework=trim(request.Form("namework"))
       response.redirect "NewsSeek.asp?page="&page&"&start_date="&start_date&"&end_date="&end_date&"&namework="&namework&"&pp=OKK"
       response.End
	end if
	response.redirect request.servervariables("http_referer")
    response.End
  else
	if VCome="NewsSeek.asp" then
	   start_date=trim(request.Form("start_date"))
       end_date=trim(request.Form("end_date"))
       namework=trim(request.Form("namework"))
       response.redirect "NewsSeek.asp?page="&page&"&start_date="&start_date&"&end_date="&end_date&"&namework="&namework&"&pp=OKK"
       response.End
	end if
    response.redirect request.servervariables("http_referer")
  end if
%>