ASP控制虛擬機器主機函數ADSI

使用ASP設定指定網站CPU最大使用程度

'=================================================

'函數介紹：設定指定網站CPU最大使用程度

'本函數使用ADSI，需要Administrators組使用者權限

'函數名稱：SetCPULimitVar (Computer,SiteNum,LimitVar)

'用法：SetCPULimitVar 電腦名稱，網站編號，最大限制值（100=1%，1000=10%）

'例：SetCPULimitVar "LocalHost","2","2000"

'=================================================

Function SetCPULimitVar(Computer,SiteNum,LimitVar)

Set MyObj001 = GetObject("IIS://"&Computer&"/W3SVC/"&SiteNum)

'設定啟用CPU限制

MyObj001.CpuLimitsEnabled = True

'設定限制使用額度值

MyObj001.CpuLimitLogEvent=LimitVar

MyObj001.setinfo

Set MyObj001=Nothing

End Function

使用ASP在IIS建立WEB網站的函數

'=============================================================