Hallo,
da du das Objekt objRS1 nicht mit "Open" geöffnet hast, kannst Du es
auch nicht mit "Close" schließen. Außerdem kannst Du einfache DML-Statements
direkt auf mit dem Connection-Objekt ausführen und benötigst kein
Recordset-Objekt.
objConn.Execute("DELETE FROM Tabelle WHERE Spalte = Bedingung")
In deinem Fall wäre das dann folgendes Script:
<%
If Trim(Request.form("selection") ) = "delete" then
set objconn = server.createobject("ADODB.Connection")
objConn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=c:\asp\helpdesk\HW_Req_Data.mdb"
strQ = "DELETE FROM Person WHERE Person.ID="
strQ = strQ & Request.form("number")
objConn.Execute(strQ)
strQ = "DELETE FROM Device WHERE Device.ID="
strQ = strQ & Request.form("number")
objConn.Execute(strQ)
Response.Write ("Record is deleted")
objConn.Close
Set objConn = nothing
end if
%>
Tschau, Stefan