<% ID=Request("ID") rs.open "Select * From ReCuteBook Where RID=" & ID,Conn,2,3 If rs.Eof then else rs.Delete End if rs.Close Set rs=Nothing Response.Redirect "GuestBook.asp" %>