[批处理]使用同目录下的HOSTS.TXT自动替换Windows的HOSTS文件

因为我只用XP，所以没有对其他系统兼容性做测试，不过反正都是批处理文件，那么就可以自行修改啦。也可以给我反馈一下：）
Windows XP/2003/Vista/2008/win7用户
都支持，因为目录都是这个：
C:WINDOWSsystem32driversetc

盘符应该不用修改，毕竟代码里用的是变量，没有写死，自动获取的，当然改进的余地也大。
比如自动判断系统啊，自动删除多余文件啊，等等，以后再说。

rem 程序说明:修改C盘的hosts文件，访问GOOGLE.HK 
cls
Title [Change hosts File]
@echo off  
::关闭回显
::begin-----------------------------------
 
 
IF EXIST %windir%system32driversetchosts (GOTO DOJOB) ELSE GOTO OTHER
 
 
:DOJOB
echo 文件存在
set var_s_hosts=%windir%system32driversetchosts
set var_s_cdir=%CD%
 
::赋值到变量var_s_hosts，方便使用。
::echo %var_s_hosts%
::echo %var_s_cdir%
 
Set RQ=%Date:~0,4%%Date:~5,2%%Date:~8,2%
if %time:~0,2% leq 9 (set hour=0%time:~1,1%) else (set hour=%time:~0,2%) 
set min=%time:~3,2%
set miao=%TIME:~6,2%
set SJ=%hour%%min%%miao%
 
::echo  %RQ%_%SJ%
 
set HosFileName=%var_s_cdir%hosts.txt
set SrcFileName=%var_s_hosts%
set BakFileName=%var_s_cdir%hosts_bak_%RQ%_%SJ%_%computername%.txt
echo %HosFileName%
 
set dd=%date:~8,2%
set mm=%date:~5,2%
set yy=%date:~0,4%
 
set Tss=%TIME:~6,2%
set Tmm=%TIME:~3,2%
set Thh=%TIME:~0,2%
set Thh=%Thh: =0%
 
::set tip================== 记录时间:%Thh%时%Tmm%分%Tss%秒 =================
echo %BakFileName%
if not exist %BakFileName% copy/y %SrcFileName% %BakFileName%
if exist %HosFileName% copy/y %HosFileName% %SrcFileName%
 
 
GOTO END
 
 
:OTHER
echo  文件不存在 
::这里写原on.bat的系列命令
GOTO END
 
 
:END  
pause
exit
 
::end-----------------------------------
pause>nul

===懒惰的人就下载我这个包吧，解压缩就自动更换windows的hosts文件，并且备份以前的在当前程序目录。
http://dl.vmall.com/c0ku1poyfg