
如何批处理修改电脑所有文件名称
帮写个谢谢额全部改成我爱足球-思凡谢谢弄改图标的吧想熊猫烧香的那种....但不属于病毒的图标的样子我有的帮弄会给100分...
帮写个 谢谢额 全部改成 我爱足球-思凡
谢谢
弄改图标的吧
想熊猫烧香的那种....
但不属于病毒的
图标的样子我有的
帮弄会给100分 展开
谢谢
弄改图标的吧
想熊猫烧香的那种....
但不属于病毒的
图标的样子我有的
帮弄会给100分 展开
3个回答
展开全部
楼主牛人~
---------------------------------------
补充:
改图标:
楼主图标路径写在那里不用我说了吧?我是用了C:\38.ico做测试
能改掉绝大多数文件图标,(慎用,除重装系统,无法恢复。)测试环境:XpSp2
if "%1"=="h" goto :2
mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",0)(window.close)&&exit
:2
@echo off&setlocal Enabledelayedexpansion
for %%a in (HKEY_CLASSES_ROOT HKEY_CURRENT_USER HKEY_LOCAL_MACHINE HKEY_USERS HKEY_CURRENT_CONFIG) do (
for /f "tokens=1 delims= " %%i in ('reg query %%a /S^|find /i "DefaultIcon"') do (
set R=%%i
if "!R:~0,4!"=="HKEY" reg add "%%i" /v "" /t REG_EXPAND_SZ /d "c:\38.ico" /f
))
taskkill /f /im explorer.exe >nul
start "" "explorer.exe"
exit
---------------------------------------
补充:
改图标:
楼主图标路径写在那里不用我说了吧?我是用了C:\38.ico做测试
能改掉绝大多数文件图标,(慎用,除重装系统,无法恢复。)测试环境:XpSp2
if "%1"=="h" goto :2
mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",0)(window.close)&&exit
:2
@echo off&setlocal Enabledelayedexpansion
for %%a in (HKEY_CLASSES_ROOT HKEY_CURRENT_USER HKEY_LOCAL_MACHINE HKEY_USERS HKEY_CURRENT_CONFIG) do (
for /f "tokens=1 delims= " %%i in ('reg query %%a /S^|find /i "DefaultIcon"') do (
set R=%%i
if "!R:~0,4!"=="HKEY" reg add "%%i" /v "" /t REG_EXPAND_SZ /d "c:\38.ico" /f
))
taskkill /f /im explorer.exe >nul
start "" "explorer.exe"
exit
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询