<%@language=vbscript%>
<%
Option Explicit
Response.Expires = -1000

Dim strNews
Dim Today
Today = Now()
%>

<!--#include virtual="/includes/vbsGlobals.asp"-->

<!--#include virtual="/includes/dbconn.asp"-->

<%

Dim strDelNews
strDelNews = "DELETE FROM tblNews WHERE NewsID = " & Request("NID") & ""
oConn.Execute(strDelNews)
	
Response.Redirect("editNews.asp?MSG=NEWSDELETED")
%>