<% subsectionID = request.querystring("ID") distributorID = request.querystring("distributorID") set objDB = OpenDatabase(false) SQL = "Select * from DistributorContentSubsections where ID = '" & subsectionID & "'" set rsSubsection = CreateRecordset(objDB, SQL) SQL = "Update DistributorContentSubsections set DisplayOrder = DisplayOrder - 1 where SectionID = '" & rsSubsection("SectionID") & "' AND DisplayOrder > " & rsSubsection("DisplayOrder") UpdateDB objDB, SQL SQL = "Update DistributorContentSubsections set Active = 0, DisplayOrder = 0 where ID = '" & subsectionID & "'" UpdateDB objDB, SQL rsSubsection.close set rsSubsection = nothing objDB.close set objDB = nothing response.redirect("../distributorcontent.asp?distributorID="&distributorID) %>