使用ASP删除指定IIS站点

=============================================================
"       感谢您使用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"

"=============================================================

Function DelWebSite（Computer,SiteNum）
Set W3SVC = GetObject（"IIS://"&Computer&"/w3svc"）
W3SVC.delete "IIsWebServer",SiteNum
response.write "删除成功！"
End Function