<!-- #include file = "../common/act_dbopen.asp" -->
<%
	' Property of and written by Adam Ford -->
	' Create the SQL statement
	strSQL = "INSERT into Categories (name) Values ('" & request.form("name") &  "');"

'	Open a recordset
	objDBConn.execute strSQL

	on error resume next

	if err.number <> 0 then
		dim strPage
		strPage = "act_insertcategory.asp"
%>
	<!-- #include file = "../common/dsp_error.asp" -->
<%
	else
%>
<!-- #include file = "../common/act_dbclose.asp" -->
<%
		response.redirect("dsp_main.asp")
	end if
%>