<html>
<head>
<%
Dim rst
Set rst = Server.CreateObject("ADODB.Recordset")
Dim strSQL
Dim DeleteID
DeleteID = Request.QueryString("ProductID")
strSQL = "Delete * FROM Products Where ProductID = " & DeleteID
rst.Open strSQL, "DSN=NorthWindDSN"
%>
</head>
<body>
<h4>The record has been deleted.</h4>
</body>
<html>

Click Next for delete-select.asp