<% '----------------------------------------------------------------- '--Page info '----------------------------------------------------------------- PAGE_NAME = "Episodes" '----------------------------------------------------------------- '--Page code '----------------------------------------------------------------- ID = Request.QueryString("ID") VIDEO_ID = Request.QueryString("VIDEO_ID") '----------------------------------------------------------------- '--delete the record from the database '----------------------------------------------------------------- Set DB = New clsDatabase DB.OpenDatabase DATABASE_NAME, "", "" numOfRecords = DB.RunQuery("SELECT id FROM tsv_videos_episodes WHERE id=" & ID) -1 If numOfRecords < 0 Then Call myError("Invalid " & PAGE_NAME & " ID") End If Call DB.RunQuery("DELETE FROM tsv_videos_episodes WHERE id=" & ID) Set DB = Nothing '----------------------------------------------------------------- '-go back where we came from '----------------------------------------------------------------- Response.Redirect "index.asp?VIDEO_ID=" & VIDEO_ID %>