在Visual Basic或VBScript中,可以使用GetObject函数与昵称字符串相结合来创建对象。以下两个示例显示了使用昵称字符串和不使用昵称字符串之间的区别。第一个例子使用标记作为第二个例子的简洁替代。
“第一个例子
Set Service = GetObject(“WinMgmts:_
{impersonationLevel=impersonate}!Win32_Service=""ALERTER""")
“第二个例子
Set Locator = CreateObject(“WbemScripting.SWbemLocator”)
Set Service = Locator.ConnectServer
service.Security_.ImpersonationLevel _
= wbemImpersonationLevelImpersonate
设置objinstance = Service.Get(“Win32_Service =”“ALERTER”“”)