IIS6.0下ASP的新增功能(四)

2024-08-29 03:09:35

字體：大中小

來源：轉載

供稿：網友

下列示例在默認網站應用程序 (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 標志。　

下一篇：IIS出現錯誤后如何完全重裝