Hello guys!

Can you please help me to figure out how to suppress smart features folder..

The code below for some reason doesn`t work..... Am I using wrong enumerator?

SupUnsup("SUPPRESS", "A-01282-2@SWINGDOORASSEMBLY", "FTRFOLDER") ' swSelFTRFOLDER - FTRFOLDER

' supress/unsepress function

    Private Function SupUnsup(ByVal action As String, ByVal feat_name As String, ByVal sw_feat As String) As Boolean

        Try

            boolstatus = swModel.Extension.SelectByID2(feat_name, sw_feat, 0, 0, 0, False, 0, Nothing, 0)

            If action = "SUPPRESS" Then

                swModel.EditSuppress2()

            Else

                swModel.EditUnsuppress2()

            End If

            swModel.ClearSelection2(True)

            Return True

        Catch ex As Exception

            MessageBox.Show("Can`t find : " & feat_name, FormalTittle, MessageBoxButtons.OK, MessageBoxIcon.Error)

            Return False

        End Try

    End Function