<% title = fixsql(request.form("title")) url = request.form("URL") content = fixsql(request.form("content")) distributorID = request.form("distributorID") set objDB = OpenDatabase(false) SQL = "Select MAX(DisplayOrder) as DisplayOrder from DistributorContentSections where DistributorID = '" & distributorID & "' 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 DistributorContentSections (DistributorID, Name, URL, Content, DisplayOrder) VALUES ('" & distributorID & "','" & title & "','" & URL & "','" & content & "'," & DisplayOrder & ")" UpdateDB objDB, SQL objDB.close set objDB = nothing response.redirect("../distributorcontent.asp?distributorID="&distributorID) %>