<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("data.mdb")
exec="delete * from article where id="&request.querystring("id")
conn.execute exec
conn.close
set conn=nothing
%>