<% Set Conn=Server.CreateObject("ADODB.Connection") Conn.Open dsn SQL = "DELETE FROM Categories WHERE ID LIKE ('%" & request.querystring("ID") & "%')" Set RS = Conn.Execute(SQL) %>

	Calendar Manager
	Home  Add Event  View/Edit Events  Add Category  View Categories  Settings  Support  Documentation  Log Out		Delete Category The Category has been removed. << Return