ReDim arrAdminItems(9), arrErrors(9), arrContent(9) arrAdminItems(0) = "identity|intID" arrAdminItems(1) = "dialogheader| Testimonial Author" arrAdminItems(2) = "data|R|strAuthor|text|Author : |50|40" arrAdminItems(3) = "data|R|strLocation|text|Location : |50|40" arrAdminItems(4) = "dialogfooter|" arrAdminItems(5) = "dialogheader| Article Content" arrAdminItems(6) = "data|R|strContent|textarea|Short Text : |50|3" arrAdminItems(7) = "data|0|strContentLong|textarea|Long Text : |50|8" arrAdminItems(8) = "dialogfooter|" arrAdminItems(9) = "data|R|dteModified|constant|" & FormatDateTime(Now,vbLongDate) & " " & FormatDateTime(Now,vbShortTime) strTitle = "Testimonial" strTable = "tblTestimonials" strFilePath = "../images/testimonials/" strHeaderMessage = "Note that marked fields are required." 'blnDisableDelete = True