Delete active article

  <ShellCommand(CanExecute:="Ena_IsEditingArticleText")> _

  Public Overridable Sub ArtSpike()

    If Fred.HasActiveArticle Then

      ActiveArticle.Spike()

    End If

End Sub

Note: this method displays the dialog box.

Delete article by id silently

Dim login As EditorialLogin = Editorial.EditorialLogin.Get()

login.ArticleObjSpike(selectedobject.Id, Nothing, False)

ApplicationBase.Current.RaiseInternalAlert(GNClient.TriggerCause.Create, "article", selectedobject.Id)

Note: SpikeSelectedObjects won't work with articles because of geometry reference.