下列示例在默认网站应用程序 (W3SVC/1/ROOT) 上启用分区。请注意，只要设置了 AspEnableTracker 属性，AspAppServiceFlags 属性就发生改变。
On Error Resume Next
set providerObj = GetObject("winmgmts://MyMachine/root/MicrosoftIISv2")
" 获得对名为“默认网站”的 ASP 应用程序的引用
set IIsWebVirtualDirSettingObj = providerObj.get("IIsWebVirtualDirSetting="W3SVC/1/ROOT"")
WScript.Echo "Before: AspUsePartition = " & IIsWebVirtualDirSettingObj.AspUsePartition 数据挖掘研究院
WScript.Echo " AspPartitionID = " & IIsWebVirtualDirSettingObj.AspPartitionID
WScript.Echo " AspAppServiceFlags = " & IIsWebVirtualDirSettingObj.AspAppServiceFlags
" 设置 ASP 应用程序以启用 COM+ 分区
IIsWebVirtualDirSettingObj.AspUsePartition = 1
" 将 AspPartitionID 属性设置为在组件服务管理器中配置的 GUID
" 当您创建 COM+ 分区时
IIsWebVirtualDirSettingObj.AspPartitionID = "{00000000-0000-0000-0000-000000000000}"
" 将值保存到 IIS 配置数据库中
IIsWebVirtualDirSettingObj.Put_()
" 再次获得引用以刷新 AspAppServiceFlags 属性。
set IIsWebVirtualDirSettingObj = Nothing
set IIsWebVirtualDirSettingObj = providerObj.get("IIsWebVirtualDirSetting="W3SVC/1/ROOT"")
WScript.Echo "After: AspUsePartition = " & IIsWebVirtualDirSettingObj.AspUsePartition
WScript.Echo " AspPartitionID = " & IIsWebVirtualDirSettingObj.AspPartitionID
WScript.Echo " AspAppServiceFlags = " & IIsWebVirtualDirSettingObj.AspAppServiceFlags 数据挖掘研究院
跟踪程序：
COM+ 跟踪程序允许管理员或开发人员调试 ASP 应用程序。例如，如果 Web 应用程序在服务器上产生问题，则可以启用 COM+ 跟踪程序，以便确定 ASP 页在何时加载、COM 组件在何时加载以及线程何时离开网页。在调试应用程序之后，可禁用 COM+ 跟踪程序，使应用程序返回到正常的执行速度。
要在 IIS 端上启用 COM+ 跟踪程序，请在应用程序级别中设置 AspAppServiceFlags 配置数据库属性的 AspEnableTracker 标志。（出处：网络）
