重命名flash控件达到禁止应用程序调用它播放广告的目的

把下面代码保存成xxx.bat运行按提示操作即可

::flash 控件禁/启开关程序
@echo off
setlocal enabledelayedexpansion
title %date% %time:~,8% flash 控件禁/启开关程序
set flash="%SystemRoot%/System32/Macromed/Flash/"
if not exist %flash% (echo "flash默认安装的目录%flash%  不存在,无法处理,程序退出" && pause && exit)
cd /D %flash%
:tip
echo 请选择操作:
echo 1. 输入任意字符后回车表示禁用
echo 2. 直接回车表示启用
set /p how=
if "%how%"=="" (
    ::启用
    for %%p in (*.ocx.flash_ocx_turn_off_by_qidizi) do (
        ::在for中使用改变后的变量需要开房变量延迟 setlocal enabledelayedexpansion,且%变!
        set newName=%%p
        set newName=!newName:ocx.flash_ocx_turn_off_by_qidizi=ocx!
        echo 准备把禁用时重命名的文件%%p恢复原名!newName!启用flash功能
        ren %%p !newName!
        goto :exit
    )
    for %%p in (*.ocx) do (
        echo 发现%%p文件并未被本程序重命名进行禁用,无需处理    
        goto :exit    
    )
    echo 未发现flash *.ocx文件,无法处理
    goto :exit
)else (
    ::禁用
    for %%p in (*.ocx.flash_ocx_turn_off_by_qidizi) do ( 
        echo flash *.ocx文件已经被本程序禁用时重命名成%%p,无需再次处理
        goto :exit
    )
    for %%p in (*.ocx) do (
        echo 发现*.ocx文件,准备进行重命名禁用flash    
        ren %%p %%p.flash_ocx_turn_off_by_qidizi        
        goto :exit    
    )
    echo 无法禁用flash,未找到需要的*.ocx文件
)
:exit
echo 处理完成
pause

禁用后,应用程序无法使用flash控件了.