下列示例在默認網(wǎng)站應用程序 (W3SVC/1/ROOT) 上啟用分區(qū)。請注意，只要設(shè)置了 AspEnableTracker 屬性，AspAppServiceFlags 屬性就發(fā)生改變。　　

　　On Error Resume Next

　　set providerObj = GetObject("winmgmts://MyMachine/root/MicrosoftIISv2")

　　' 獲得對名為“默認網(wǎng)站”的 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

　　' 設(shè)置 ASP 應用程序以啟用 COM+ 分區(qū)

　　IIsWebVirtualDirSettingObj.AspUsePartition = 1

　　' 將 AspPartitionID 屬性設(shè)置為在組件服務(wù)管理器中配置的 GUID

　　' 當您創(chuàng)建 COM+ 分區(qū)時

　　IIsWebVirtualDirSettingObj.AspPartitionID = "{00000000-0000-0000-0000-000000000000}"

　　' 將值保存到 IIS 配置數(shù)據(jù)庫中

　　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+ 跟蹤程序允許管理員或開發(fā)人員調(diào)試 ASP 應用程序。例如，如果 Web 應用程序在服務(wù)器上產(chǎn)生問題，則可以啟用 COM+ 跟蹤程序，以便確定 ASP 頁在何時加載、COM 組件在何時加載以及線程何時離開網(wǎng)頁。在調(diào)試應用程序之后，可禁用 COM+ 跟蹤程序，使應用程序返回到正常的執(zhí)行速度。

　　要在 IIS 端上啟用 COM+ 跟蹤程序，請在應用程序級別中設(shè)置 AspAppServiceFlags 配置數(shù)據(jù)庫屬性的 AspEnableTracker 標志。