windows-nt/Source/XPSP1/NT/admin/activec/test/script/mmcstartupscript.vbs

15 lines
284 B
Plaintext
Raw Normal View History

2020-09-26 03:20:57 -05:00
' Script shows how to use the script engines hosted by MMC.
Dim doc
Dim snapins
Dim frame
Set frame = MMCApplication.Frame
Set doc = MMCApplication.Document
Set snapins = doc.snapins
snapins.Add "{58221c66-ea27-11cf-adcf-00aa00a80033}" ' the services snap-in
' Script ends