%title="Poistettu"%> <% id=Request("id") %> <% 'Poistetaan tietue on error resume next Set Conn = Server.CreateObject("ADODB.Connection") conn.open "sadut","satu","story" SQL = "DELETE FROM datat WHERE ID=" & ID Set RS = Conn.Execute(SQL) Conn.Close %> <%response.write "Poistettu! "%> Muokkauslistaus