[文本处理] [已解决]背景的批处理如何随机抽取文本中的指定行？

hmlstfqtl

标题够醒目了 方便大家查找
第一步  搜索批处理所在目录里的图片文件 暂定为 *.PNG 类型且文件不只一个 即可以多个  然后 输出一个包含有图片完整路径的 BGlist.txt 文件列表 方便第三部的提取
第一步搞定

@echo off&setlocal enabledelayedexpansion
if exist BGList.txt del /f /q /a BGList.txt
for /f "tokens=*" %%i in ('dir /a /b /s "*.PNG"') do echo "%%~fi" >>BGList.txt
exit
复制代码

第二步  搜索全盘 不包含desktop.ini文件的目录 并导出列表FList.txt (注：即使某个文件夹里有 desktop.ini 这个文件 但是这个文件夹的子文件夹里没有 desktop.ini 这个文件 也仍然输出 子文件夹的完整路径 而不输出有 desktop.ini 文件的文件夹路径)
第二步搞定

@echo off&setlocal enabledelayedexpansion
if exist Flist.txt del /f /q /a Flist.txt
for /f "skip=4" %%i in ('mountvol ^| find ":"') do (for /f "delims=" %%j in ('dir /s /b /ad "%%i" 2^>nul') do if not exist %%j\desktop.ini echo "%%j">>Flist.txt)
exit
复制代码

第三步  把第二步导出的文本里 所有文件夹都加上 系统属性 即 (attrib +s "路径") 然后在所有的文件夹里 输出一个 desktop.ini 文件 文件输出完后 加上 attrib +s +h +r 属性    内容为

[{BE098140-A513-11D0-A3A4-00C04FD706EC}]
IconArea_Image=从第一步输出的BGList.txt图片路径中 随机提取一行 写入=号后面
复制代码

第四步  工作到此基本完了   现在的工作是做一个逆向操作的批处理   即  取消第三步设置的文件夹的系统属性  attrib -s     然后 删除第三步输出的 desktop.ini 文件      第四步可以调用第二步输出的FList.txt文本

第四步搞定

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (FList.txt) do if exist %%i\desktop.ini del /f /a /q %%i\desktop.ini & attrib -s %%i
exit
复制代码

这样全盘文件都有背景了

[ 本帖最后由 hmlstfqtl 于 2010-4-22 23:56 编辑 ]

hmlstfqtl

占个沙发做个标记

现在还差第三步了   
我写的代码在第三步里 有点问题     即是    不能随机提取BGList.txt文本里的行数 提取出来的值全部都是同一行的值     解决不了这个问题 求救了…………
下面是有问题的代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (BGList.txt) do set .!random!!random!!random!=%%i
for /f "tokens=2 delims==" %%i in ('set .') do (
    set/a n+=1 
    if !n! gtr 1 goto lp
    for /f "delims=" %%j in (FList.txt) do (echo [{be098140-a513-11d0-a3a4-00c04fd706ec}]>>%%j\desktop.ini) & (echo iconarea_image=%%i>>%%j\desktop.ini) & (attrib +s %%j)
   )
:lp
exit
复制代码

第三步的要求是     把第二步导出的文本里 所有文件夹都加上 系统属性 即 (attrib +s "路径") 然后在所有的文件夹里 输出一个 desktop.ini 文件 文件输出完后 加上 attrib +s +h +r 属性    内容为

 
[{BE098140-A513-11D0-A3A4-00C04FD706EC}]
IconArea_Image=从第一步输出的BGList.txt图片路径中 随机提取一行 写入=号后面
复制代码

用上面这个批处理输出 desktop.ini 的话 不能随机提取 BGList.txt 里的内容 只会在一开始随机提取一条 然后就只用这一条输入到 desktop.ini 这个文件
结果所有的 desktop.ini 文件内容都是相同的         这怎么改才能把 提取的内容随机化

[ 本帖最后由 hmlstfqtl 于 2010-4-19 17:39 编辑 ]

hanyeguxing

if !n! gtr 1 goto lp什么意思？

hmlstfqtl

if !n! gtr 1 goto lp      同     if %n% 大于1 goto lp

x9tiancmd

 
@echo off
::判定 图片文本 的行数
for /f  "delims=" %%i in ('find /c /v /n "" BGList.txt) do for %%j in (%%i) do set v=%%j
::提供小于 图片文本行数的NUM值
set  num=%random%%%%v%
::为 for 命令, SKIP 设定值, 为文本随机跳跃提供支持,  并修复 for 命令  SKIP=0  时报错并退出CMD情况的出现
set "skip=skip=%num% "&&echo.%num%|find "0" >nul&&set skip=
:: 随机设定图片值
for  /f  "%skip%delims="  %%i  in  (BGList.txt) do set "jpg=%%i"&& goto :eof
::生成DESKTOP.INI 
for /f "delims=" %%j in (FList.txt) do (echo [{be098140-a513-11d0-a3a4-00c04fd706ec}]>>"%%j\desktop.ini") & (echo iconarea_image=%jpg%>>"%%j\desktop.ini") & (attrib +s %%j)
   )
复制代码

这个是不是你发的         另记得加点分喔（￣Ｑ￣）╯

[ 本帖最后由 x9tiancmd 于 2010-4-19 21:12 编辑 ]

x9tiancmd

原帖由 hmlstfqtl 于 2010-4-19 17:33 发表
if !n! gtr 1 goto lp      同     if %n% 大于1 goto lp

最好带上引号   有时后  文件编码 不同, 也出错

  if  "*"  gtr "*"  ****

abxialiang

我不忍心给硬盘做这样的处理，文件夹太多了，还不如去下载一个文件夹背景设置软件，不过楼主积极探索的精神是我等要学习的。我顶！！

hmlstfqtl

真的很感谢   哈哈 是我发的

hmlstfqtl

D:\bg\BGList.bat
D:\bg\FList.bat
D:\bg\Photos
D:\bg\back.bat
D:\bg\FList.txt
D:\bg\BGList.txt
D:\bg\有问题的那个批处理.bat
        D:\bg\Photos\1 (1).PNG
        D:\bg\Photos\1 (2).png
        D:\bg\Photos\1 (3).png
        D:\bg\Photos\1 (4).png
        D:\bg\Photos\1 (5).png
        D:\bg\Photos\1 (6).PNG
        D:\bg\Photos\1 (7).PNG
        D:\bg\Photos\1 (8).PNG
        D:\bg\Photos\1 (9).png
        D:\bg\Photos\1 (10).png
        D:\bg\Photos\1 (11).png
        D:\bg\Photos\1 (12).png
        D:\bg\Photos\1 (13).png
        D:\bg\Photos\1 (14).png
        D:\bg\Photos\1 (15).png
        D:\bg\Photos\1 (16).PNG
        D:\bg\Photos\1 (17).PNG
        D:\bg\Photos\1 (18).png
        D:\bg\Photos\1 (19).png
        D:\bg\Photos\1 (20).png
        D:\bg\Photos\1 (21).png
        D:\bg\Photos\1 (22).png
        D:\bg\Photos\1 (23).png
        D:\bg\Photos\1 (24).png
        D:\bg\Photos\1 (25).PNG

hmlstfqtl

你的回复 我运行后 输出的文件是 下面的样子


[{be098140-a513-11d0-a3a4-00c04fd706ec}]
iconarea_image=

如果你觉得加QQ弄比较好交流也方便的话 可以随时加我 QQ 394441501

hanyeguxing

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /a-d /b /s "*.png"') do call:han "%%~fi"
for /F "tokens=1,2* delims==:" %%i in ('set han_^|findstr /n .*') do set "BG_%%i=%%k"&set ye_BG=%%i
for /f "skip=4" %%i in ('mountvol^|find ":"') do for /f "delims=" %%j in ('dir /s /b /ad "%%i" 2^>nul') do if not exist "%%j\desktop.ini" set "xing_%%j=="
for /F "tokens=1,2* delims==:_" %%i in ('set xing_^|findstr /n .*') do set a=%%k&set "Fl_%%i=!a:~0,-2!"&set ye_Fl=%%i
for /l %%i in (1,%ye_BG%,%ye_Fl%) do for /l %%j in (1,1,%ye_BG%) do set/a "gu=%%i-1+%%j"&call set "gu=%%Fl_!gu!%%"&if not defined gu (goto :xing) else (attrib +s "!gu!"
>>"!gu!\Desktop.ini" echo.[{BE098140-A513-11D0-A3A4-00C04FD706EC}]
>>"!gu!\Desktop.ini" echo.IconArea_Image=!BG_%%j!
attrib -s "!gu!")
:xing
exit
:han
set han=%random%%random%%random%
if "!han_%han%!"=="" (set "han_%han%=%~1") else goto:han
复制代码

1，本批处理不产生临时文件，所需内容全部定义为变量
2，由于大量操作，所以批处理中尽量少使用set/a以加快运行速度

[ 本帖最后由 hanyeguxing 于 2010-4-20 06:37 编辑 ]

d5jobWY

我 编的 东西 目前跟你的没法比-_-!

x9tiancmd

原帖由 hmlstfqtl 于 2010-4-19 22:25 发表
你的回复 我运行后 输出的文件是 下面的样子


[{be098140-a513-11d0-a3a4-00c04fd706ec}]
iconarea_image=

如果你觉得加QQ弄比较好交流也方便的话 可以随时加我 QQ 394441501

     怪了，  我就按你发的加我写的第三步运行， 没一点问题呀，       我知道 你是哪里出错了， 应当是，  goto :eof  这里出了错，  我第三步没有子程序 ， 所以用了的是GOTO ：eof      而你第一二步有 冒号开头的子程序，  所以出错吧

x9tiancmd

兄台  这学了一招:    for  /l  %%i  (1, num1, num2)  do  for /l  %%j  (1,1,num1)  do set /a *=%%i-1+%%j  &if *


    好聪明 的方法呀,  …(⊙_⊙;)…○圭~○列

   劳记在心, 感激涕零,  谢谢  "寒夜孤星" 的智慧   ○(￣﹏￣)○

qzwqzw

孤星的代码看的头大
大概明白那句两层嵌套的for/l是什么意思了
就我的看法
这种场合下使用嵌套for/l
不能做到完全随机选取图片
不如使用for/l+set !random!
for /l %%i in (1,,%ye_Fl%)  do (
    set /a i_bg=!random! %% %ye_BG% + 1
    call set BG=%%BG_!i_bg!%%
    ...
    >>"!gu!\Desktop.ini" echo.IconArea_Image=!BG!
)