DIM Conportal As New SqlConnection (CommunityGlobals.Connectionstring)
DIM CMDDELETE AS New SqlCommand ("delete community_contentpages where contentpage_id = @contentpageId", Conportal)
'Cmddelete.commandtype = commandtype.storedprocedure
Cmddelete.Parameters.Add ("@ ContentPageID", 40)
Conportal.open ()
cmddelete.executenonQuery ()
Conportal.Close ()
