<% SectionID = request.querystring("ID") set objDB = OpenDatabase(false) SQL = "Select * from ContentSections where ID = '" & SectionID & "'" set rsSection = CreateRecordset(objDB, SQL) SQL = "Update ContentSections set DisplayOrder = DisplayOrder - 1 where DisplayOrder > " & rsSection("DisplayOrder") UpdateDB objDB, SQL SQL = "Update ContentSections set Active = 0, DisplayOrder = 0 where ID = '" & SectionID & "'" UpdateDB objDB, SQL rsSection.close set rsSection = nothing objDB.close set objDB = nothing response.redirect("../content.asp") %>