Board logo

标题: 10元求个简单命令:想指定目录写入文件夹配置文件 [打印本页]

作者: sykIII    时间: 2019-12-3 23:22     标题: 10元求个简单命令:想指定目录写入文件夹配置文件

有个目录A,目录A的位置已知,假设为 %A%
现在需要向目录A下的所有文件夹写入这段东西
  1. [.ShellClassInfo]
  2. IconResource=#.ico
  3. [ViewState]
  4. Mode=
  5. Vid=
  6. FolderType=Pictures
复制代码
到desktop.ini
并把#.ico和desktop.ini添加attrib +s +h
作者: Batcher    时间: 2019-12-3 23:28

回复 1# sykIII


test.bat
  1. @echo off
  2. REM 设置待处理的文件夹
  3. set "DestFolder=D:\Test"
  4. cd /d "%DestFolder%"
  5. for /f "delims=:" %%i in ('findstr /n "^:DynamicScript$" "%~f0"') do (
  6.     more +%%i "%~f0" > "%temp%\desktop.ini"
  7. )
  8. for /f "delims=" %%i in ('dir /b /s /ad') do (
  9.     copy /y "%temp%\desktop.ini" "%%i\"
  10.     attrib +s +h "%%i\desktop.ini"
  11. )
  12. goto :eof
  13. REM 请确保待生成的文本位于脚本的末尾
  14. :DynamicScript
  15. [.ShellClassInfo]
  16. IconResource=#.ico
  17. [ViewState]
  18. Mode=
  19. Vid=
  20. FolderType=Pictures
复制代码

作者: sykIII    时间: 2019-12-3 23:48

回复 2# Batcher


    求这样写
  1. set "A=%~dp0"
  2. 目标:%A%B
复制代码
B是要弄的目录
作者: zaqmlp    时间: 2019-12-4 00:34

  1. @echo off
  2. set info=互助互利,支付宝扫码头像,感谢打赏
  3. rem 有问题,可加QQ956535081及时沟通
  4. title %info%
  5. set "rootpath=%~dp0"
  6. for /f "delims=:" %%a in ('findstr /n "^exit" "%~f0"') do set last=%%a
  7. for /f "delims=" %%a in ('dir /ad/b/s "%rootpath%"') do (
  8.     if exist "%%a\desktop.ini" (del /a /f /q "%%a\desktop.ini")
  9.     (for /f "skip=%last% delims=" %%b in ('type "%~f0"') do echo;%%b)>"%%a\desktop.ini"
  10.     attrib +s +h "%%a\desktop.ini"
  11.     if exist "%%a\#.ico" (attrib +s +h "%%a\#.ico")
  12.     attrib +r "%%a"
  13. )
  14. pause
  15. exit
  16. [.ShellClassInfo]
  17. IconResource=#.ico
  18. [ViewState]
  19. Mode=
  20. Vid=
  21. FolderType=Pictures
复制代码

作者: Batcher    时间: 2019-12-4 08:57

回复 3# sykIII


@echo off
REM 设置待处理的文件夹
set "A=%~dp0"
set "DestFolder=%A%B"

cd /d "%DestFolder%"
for /f "delims=:" %%i in ('findstr /n "^:DynamicScript$" "%~f0"') do (
    more +%%i "%~f0" > "%temp%\desktop.ini"
)
for /f "delims=" %%i in ('dir /b /s /ad') do (
    copy /y "%temp%\desktop.ini" "%%i\"
    attrib +s +h "%%i\desktop.ini"
)
goto :eof

REM 请确保待生成的文本位于脚本的末尾
:DynamicScript
[.ShellClassInfo]
IconResource=#.ico
[ViewState]
Mode=
Vid=
FolderType=Pictures
作者: sykIII    时间: 2019-12-4 15:59

回复 5# Batcher
  1. 拒绝访问
  2. 已复制   0个项目
复制代码
循环至退出
作者: Batcher    时间: 2019-12-4 20:26

回复 6# sykIII


    右键单击bat文件,以管理员身份运行
作者: sykIII    时间: 2019-12-5 22:22

本帖最后由 sykIII 于 2019-12-6 00:02 编辑

回复 7# Batcher


最后一个要求,先删除目录里的desktop.ini,然后把%A%这个目录本身也处理一下
然后希望能和这套命令组合在一起
  1. REM 配置状态
  2. @echo off
  3. %1 start "" mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c ""%~s0"" ::","","runas",1)(window.close)&&exit
  4. ::
  5. cls
  6. set "A=%~dp0"
  7. ::
  8. rd /q /s "%USERPROFILE%\Desktop\@控制台"
  9. mklink /d "%USERPROFILE%\Desktop\@控制台" "%A%User Files\Documents\ctrl_center"
  10. ::
复制代码
十分感谢




欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2