如何使用ASP设置指定站点CPU最大使用程度

1. =============================================================  
2. '       感谢您使用ASPKU工作室开发的实用函数程序  
3. '               HTTP://WWW.ASPKU.NET  
4. '=============================================================       
5. 'ASPKU工作室为您提供订制程序开发、企业互联网拓展服务  
6. 'QQ：
7. 'E-Mail：
8. '更多程序下载请到HTTP://WWW.ASPKU.NET  
9. '=============================================================       
10. '函数介绍：设置指定站点CPU最大使用程度  
11. '本函数使用ADSI，需要Administrators组用户权限  
12. '函数名称：SetCPULimitVar (Computer,SiteNum,LimitVar)  
13. '程序开发：ASPKU工作室 ChuQi  
14. '用法：SetCPULimitVar 计算机名，站点编号，最大限制值（100=1%，1000=10%）  
15. '例：SetCPULimitVar "LocalHost","2","2000"  
16. '=============================================================  
17.  
18. Function SetCPULimitVar(Computer,SiteNum,LimitVar)  
19. Set MyObj001 = GetObject("IIS://"&Computer&"/W3SVC/"&SiteNum)  
20.  
21. '设置启用CPU限制  
22. MyObj001.CpuLimitsEnabled = True  
23. '设置限制使用额度值  
24. MyObj001.CpuLimitLogEvent=LimitVar  
25. MyObj001.setinfo  
26. Set MyObj001=Nothing  
27. End Function