=============================================================

'感谢您使用ASP001工作室开发的实用函数程序

'HTTP://WWW.ASP001.NET

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

'ASP001工作室为您提供订制程序开发、企业互联网拓展服务

'QQ：1974229

'E-Mail：Shenyangchuqi@tom.com

'更多程序下载请到HTTP://WWW.ASP001.NET

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

'函数介绍：删除指定IIS站点

'本函数使用ADSI，需要Administrators组用户权限

'函数名称：DelWebSite(Computer,SiteNum)

'程序开发：ASP001工作室ChuQi

'用法：DelWebSite计算机名，站点编号

'例：DelWebSite"127.0.0.1","2"

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

FunctionDelWebSite(Computer,SiteNum)

SetW3SVC=GetObject("IIS://"&Computer&"/w3svc")

W3SVC.delete"IIsWebServer",SiteNum

response.write"删除成功！"

EndFunction