动态添加信任网址

1.手动添加

 

 2.添加成功以后保存在注册表的 HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains

 

 注意有的bat 脚本会把 信任网站放在:HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Ranges\Range101

@reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Ranges\Range101" /v ":Range" /t REG_SZ /d 你的网站 /f
@reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Ranges\Range101" /v "http" /t REG_DWORD /d 2 /f

  这样到Inter属性管理安全站点也能看到,但是实际效果没有,还是会被安全拦截

3.脚本

@echo off & setlocal enabledelayedexpansion
@echo 系统安装中,请不要关闭这个窗口  
 
:: 处理输入的网址例如:http://s001cdtest.yuns.rwxyun.net/yunerp678276/#_hh%2fNavigatePage.gam
set /p aa=请输入网址:
@set bb=%aa:http://=%
@set bb=%bb:https://=%
@for /f "tokens=1 delims=/" %%a in ("%bb%") do (
  @set aa=%%a
)

@set remain=%aa%
::处理后s001cdtest.yuns.rwxyun.net 再截取二级域名
:loop
for /f "tokens=1* delims=." %%a in ("%remain%") do (
    ::输出第一个分段(令牌) 
    set /a counter+=1
    rem 将截取剩下的部分赋给变量remain,其实这里可以使用延迟变量开关
    set remain=%%b
)
::如果还有剩余,则继续分割
if defined remain goto :loop

set /a skip=counter-1
for /f "tokens=%skip% delims=." %%i in ("%aa%") do (
  @set url=%%i
)
for /f "tokens=%counter% delims=." %%i in ("%aa%") do (
  @set url=%url%.%%i
)
echo %url% 
::二级域名 rwxyun.net
@set isHas=0
::下面判断这个域名是否在网站安全列表
@set UnKey=HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains
echo 正在获取列表,请稍后。。。
 for /F "tokens=* delims= " %%i in ('reg query "%UnKey%"') do (
   @set bb=%%i     
    @set cc=!bb:HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\=!     
   if !%cc! geq !url! goto Has 
)
goto End
:Has
 set /a isHas=1    
:End
 if %isHas% == 0  goto register
 goto complete
:register
echo %url%
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\%url%" /v http /t REG_DWORD /d 0x00000002 /f
:complete


mshta vbscript:msgbox("准备开始设置IE安全级别",64,"设置IE安全级别")(window.close)

@echo 1001 下载已签名的 ActiveX 控件
@echo 1004 下载未签名的 ActiveX 控件
@echo 1200 运行 ActiveX 控件和插件
@echo 1201 对没有标记为安全的 ActiveX 控件进行初始化和脚本运行
@echo 1405 对标记为可安全执行脚本的 ActiveX 控件执行脚本
@echo 1406 通过域访问数据源
::@echo 1607 跨域浏览子框架
::@echo 2200 文件下载自动提示 **
::@echo 2201 ActiveX 控件自动提示 **

reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1001 /t REG_DWORD /d 00000000 /f
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1004 /t REG_DWORD /d 00000000 /f
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1200 /t REG_DWORD /d 00000000 /f
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1201 /t REG_DWORD /d 00000000 /f
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1405 /t REG_DWORD /d 00000000 /f
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1406 /t REG_DWORD /d 00000000 /f
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 1607 /t REG_DWORD /d 00000000 /f
::reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 2200 /t REG_DWORD /d 00000000 /f
::reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v 2201 /t REG_DWORD /d 00000000 /f
::reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\2" /v CurrentLevel /t REG_DWORD /d 00000000 /f

@echo 安装结束!
@echo 开始清除IE浏览器缓存
rem del /f /s /q "%userprofile%\AppData\Local\Microsoft\Windows\Temporary Internet Files\*.*" 
rem del /f /s /q "%temp%\*.*" 
@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 2
::@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 1
::@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 8
::@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 32
::@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 16
::@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 4351
::@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 255
@echo 清除IE浏览器缓存结束
pause 
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\%url%" /v http /t REG_DWORD /d 0x00000002 /f 添加信任站点

 4.知识点

  1. 分割字符串

@for /f "tokens=1 delims=/" %%a in ("%bb%") do ()  //delims=/ 按照/分割字符串,默认会返回第一个
tokens=1 提取第一个 
Tokens=*表示删除每行前面的空格。忽略行首的所有空格。
Tokens=2,4 提取第二和4
Tokens=2-4 提取2到4
2. 计算分割后的字符串数量
:loop
for /f "tokens=1* delims=." %%a in ("%remain%") do (
    ::输出第一个分段(令牌) 
    set /a counter+=1
    rem 将截取剩下的部分赋给变量remain,其实这里可以使用延迟变量开关
    set remain=%%b
)
::如果还有剩余,则继续分割
if defined remain goto :loop

3.if 判断

可以用== equ geq

有时候一种用不起,多换几种尝试一下

4.计算值

set /a skip=counter-1

posted @ 2022-08-01 17:32  乌柒柒  阅读(416)  评论(0编辑  收藏  举报