Rekursiv sletning af poster

Det vil kræve en transaktions-styring, for at du kan være sikker på at slette alle ting. Du kunne dog også blot sørge for at slette i rækkefølgen Post1 -> Post2 -> Post3, og derefter tjekke posteringer uden relationer til niveau'et over dem..... Kun et forslag dog.... :-)

hvorfor laver du ikke bare en ekstra tabel i databasen der indeholder idet for det oprindelige spg. på den måde kunne du slette alle ved bare at side...

"DELETE FROM tabel WHERE oprspg = " request("spg")

På den måde kan du sikre at der ikke er nogen kommentare tilbage til et bestemt spg..!

Eks på en rekrusiv function som løber igennem strukturen og sletter dem.

HUSK at tage BACK-UP INDEN TEST af scrips som sletter ;)


<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db5.mdb")

function slet(id)
  Set rs = Server.CreateObject("ADODB.Recordset")
  SQL = "Select id from xxtabel where parentID=" & id
  set rs = conn.execute(SQL)

  do while not rs.EOF   
    slet rs("ID")
    rs.movenext
  loop
  SQL = "delete from xxtabel where id = " & id
'  Response.Write SQL & "<br>"
  conn.Execute(SQL)
 
  rs.Close
  Set rs = Nothing
end function


slet 1

%>

Genialt, det virker 100%!