ASP Source Code:
<%Option Explicit%>
<!--#include file="ADOsetup.inc"-->
<!--#include file="adovbs.inc"-->
<!--#include file="Misc.inc"-->

<HTML>
   <HEAD>
      <%
         DIM strSQL,strID
         strID = Request.QueryString("ID")
	 strSQL = "Select * FROM tblTTDtasks WHERE fldID = " & strID 

         ADOrs.Open strSQL, ADOcn, adOpenDynamic, adLockOptimistic
         ADOrs.Delete adAffectCurrent
  
     %>
  </HEAD>
  <BODY>
      <%CALL Heading("Delete Record")%>
	<H2><BR>Record <%=strID%> Deleted.</H2><BR>
        <!--#include file="ADOclose.inc"-->
  </BODY>
</HTML>