Para instanciar el objeto ActiveX en VBScript tienes que usar la función CreateObject (en JavaScript sería ActiveXObject() ).
Un ejemplo para hacerlo sería el siguiente:
Set Locator = CreateObject("WbemScripting.SWbemLocator")
Espero que te sirva de ayuda
Chau