<% Set rs = Server.CreateObject ("ADODB.Recordset") Sql = "Select * From Word1 where ID="&Request("ID") rs.open SQL ,abc,1, 3 If rs.eof then rs.close:set rs=nothing abc.close:set abc=nothing Response.redirect "/index.asp" Else rs.delete rs.close:set rs=nothing abc.close:set abc=nothing End If %>