<% title = fixsql(request.form("title")) URL = request.form("URL") content = fixsql(request.form("content")) sectionID = request.form("sectionID") distributorID = request.form("distributorID") set objDB = OpenDatabase(false) SQL = "Select MAX(DisplayOrder) as DisplayOrder from DistributorContentSubsections where SectionID = '" & sectionID & "' AND Active = 1" set rsOrder = CreateRecordset(objDB, SQL) if not isnull(rsOrder("DisplayOrder")) then DisplayOrder = rsOrder("DisplayOrder") + 1 else DisplayOrder = 1 end if rsOrder.close set rsOrder = nothing SQL = "Insert into DistributorContentSubsections (DistributorID, SectionID, Name, URL, Content, DisplayOrder) VALUES ('" & distributorID & "','" & sectionID & "','" & title & "','" & URL & "','" & content & "'," & DisplayOrder & ")" UpdateDB objDB, SQL objDB.close set objDB = nothing response.redirect("../distributorcontent.asp?distributorID="&distributorID) %>