
Adding an MMC Snapin
Opens the MMC console and then loads the specified snapin.
1 2 3 4 5 6 7 8 |
'Here, snapinname is the name of the snapin to add '(i.e. “Event Viewer”, “Local Users and Groups”). Set objMMC = CreateObject("MMC20.Application") Set objDOC = objMMC.Document objDOC.SnapIns.Add "snapinname" objMMC.show objMMC.UserControl = 1 |