Ilogic to suppres folder

- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
I have copied the below rule to un-/suppress a folder
But how do I add more than 1 folder to Un-/suppress?
And is it possible to suppress a folder with a pattern?
Link to rule : http://forums.autodesk.com/t5/inventor-customization/ilogic-control-browser-folders/m-p/5591242#M552...
Re: iLogic control browser folders
The code below is what I ended up with. Based on a choice of color it will suppress one folder and unsuppressed another.
'Get the normal assembly browser pane object
oPane = ThisDoc.Document.BrowserPanes.Item("Model")
If Color = "Red" Then
oFolder = oPane.TopNode.BrowserFolders.Item("NewFolder") 'Get the browser folder object
oFolderNodes = oFolder.BrowserNode.BrowserNodes 'Get the set of nodes in the folder
For Each oNode As BrowserNode In oFolderNodes 'Cycle through each browser node in the folder
oComp = oNode.NativeObject
oComp.Suppress
Next
oFolder = oPane.TopNode.BrowserFolders.Item("OldFolder") 'Get the browser folder object
oFolderNodes = oFolder.BrowserNode.BrowserNodes 'Get the set of nodes in the folder
For Each oNode As BrowserNode In oFolderNodes 'Cycle through each browser node in the folder
oComp = oNode.NativeObject
oComp.Unsuppress
Next
ElseIf Color = "Blue" Then
oFolder = oPane.TopNode.BrowserFolders.Item("NewFolder") 'Get the browser folder object
oFolderNodes = oFolder.BrowserNode.BrowserNodes 'Get the set of nodes in the folder
For Each oNode As BrowserNode In oFolderNodes 'Cycle through each browser node in the folder
oComp = oNode.NativeObject
oComp.Unsuppress
Next
oFolder = oPane.TopNode.BrowserFolders.Item("OldFolder") 'Get the browser folder object
oFolderNodes = oFolder.BrowserNode.BrowserNodes 'Get the set of nodes in the folder
For Each oNode As BrowserNode In oFolderNodes 'Cycle through each browser node in the folder
oComp = oNode.NativeObject
oComp.Suppress
Next
End If