::code by hjfeng #2011-10-17
@echo off
set path=%path%;C:\WINDOWS\system32\inetsrv
set logfile=app%date:~0,4%%date:~5,2%%date:~8,2%.log
setlocal EnableDelayedExpansion


:main
color 17
title IIS站点批量管理
echo ***************************************************************************
echo.
echo    本程序将为IIS7.0添加,更改,删除站点.
echo.
echo    1.添加IIS站点
echo    2.更改IIS站点
echo    3.删除IIS站点
echo    退出请输入exit
echo.
echo.
echo.
echo 例:域名abc.cn
echo    添加站点:以abc.cn为网站名称新建站点,只绑定abc.baidu.com
echo    更改站点:更改绑定域名,包含abc.cn  www.abc.cn  abc.baidu.com
echo    删除站点:删除以abc.cn为网站名称的站点,不删除文件目录
echo.
echo ***************************************************************************
echo.
set choice=
set /p choice=请选择操作:(1/2/3),然后按回车:
if /I "%choice%"=="1" goto 1
if /I "%choice%"=="2" goto 2
if /I "%choice%"=="3" goto 3
if /I "%choice%"=="exit" goto exit else (
	set /p error=输入有误请重新选择..
	cls
	goto main
)


:2
::更改IIS站点
cls
color 37
title 绑定iis站点
echo ===========================================================================
echo.
echo    以同目录下a.txt中的域名为站点名称，绑定这些站点。
echo.
echo    请将域名每行放置一个，并确保所要绑定的站点无误。
echo.
echo ===========================================================================
set choice=
set /p choice=你确定要执行操作?(Y/N):
if "%choice%"=="Y" goto 5
if "%choice%"=="N" goto 7 else (
	set /p error=输入有误,区分大小写,请重新选择..
	cls
	goto main
)
pause>nul
exit


:5
::绑定IIS站点
echo 为同目录下a.txt中的域名站点绑定站点，请稍候...
echo					****************************>> %logfile%
echo					**********%time:~0,8%**********>> %logfile%
for /f "delims=." %%i in (a.txt) do (
	set var=%%i
	set hname1=!var!.cn
	set hname2=www.!var!.cn
	set hname3=!var!.baidu.com
	appcmd list site !hname1! >nul 2>&1
	if !errorlevel! == 0 (
		appcmd set site !hname1! /bindings:http/125.77.197.154:80:!hname1!,http/125.77.197.154:80:!hname2!,http/125.77.197.144:80:!hname3!>> %logfile% 2>>&1
		echo 站点!hname1!绑定成功.>> %logfile% 2>>&1
		) else (
		echo 站点!hname1!不存在.>> %logfile% 2>>&1
		)
)
echo 站点绑定完毕，请查看同目录下的%logfile%了解详情，按任意键退出程序。
pause>nul
exit


:7
exit
复制代码

for /f "delims=." %%i in (a.txt) do (
        set var=%%i
        set hname1=!var!.cn
        set hname2=www.!var!.cn
        set hname3=!var!.baidu.com
        appcmd list site !hname1! >nul 2>&1
        if !errorlevel! == 0 (
                appcmd set site !hname1! /bindings:http/125.77.197.154:80:!hname1!,http/125.77.197.154:80:!hname2!,http/125.77.197.144:80:!hname3!>> %logfile% 2>>&1
                echo 站点!hname1!绑定成功.>> %logfile% 2>>&1
                ) else (
                echo 站点!hname1!不存在.>> %logfile% 2>>&1
                )
)
复制代码

for /f "delims=." %%i in (a.txt) do (
        set var=%%i
        set hname1=!var!.cn
        set hname2=www.!var!.cn
        set hname3=!var!.baidu.com
        appcmd 
)
复制代码