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
| 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
