Hier nochmal mit dem richtigen Betreff. *LOL*

Hi Arkor

So mu� es doch eigendlich klappen.
Ist gar net so einfach das Problem.
Mu� halt doch einmal einer von den Listenprofis ran.
Aber versuch es einfach nochmal so.


    strSql1 = "SELECT * FROM Forum WHERE F_Cat=" & kategorie
    set rs1 = my_conn.Execute (strSql1)
    While not rs1.EOF
     Forum_ID = rs1("Forum_ID")

     strSql2 = "SELECT * FROM Topics WHERE Forum_id=" & Forum_ID
     set rs2 = my_conn.Execute (strSql2)
     While not rs2.EOF
     Topic_ID = rs2("Topic_ID")

      ' alle Reply l�schen
      strSql3 = "DELETE FROM Reply WHERE Topic_ID=" & Topic_ID
      set rs3 = my_conn.Execute (strSql3)

      rs2.delete '                   l�scht alle in Topic
      rs2.MoveNext
      Wend
      rs2.Close

     rs1.delete '                   l�scht alle in Forum
     rs1.MoveNext
    Wend
    rs1.Close


' dieser Delete ist f�r die Category am schlu� gedacht, das m��te ja nur ein
einziger sein, oder?

    strSql7 = "DELETE FROM Category WHERE ID=" & ID
    set rs7 = my_conn.Execute (strSql7)


    set rs7 = Nothing
    set rs6 = Nothing
    set rs5 = Nothing
    set rs4 = Nothing
    set rs3 = Nothing
    set rs2 = Nothing
    set rs1 = Nothing
    my_conn.close
    set my_conn = nothing

Gru� Wolfgang


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an