中国DOS联盟

特定文件夹取MP3路径并实现文本替换

先说： 太佩服坛子里的你们了，让很多事情都变的很简洁：）
--
问题：想在服务器上自动生成最新上传的100首mp3的list，并用http://ip替换list里面的mp3目录的盘符的路径，这样远程用list就能直接听了，该怎么写脚本呢。看过了帮助，可是自己还是没写出来。谢谢。

[ Last edited by mymp3 on 2009-2-22 at 15:59 ]

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%a in ('ipconfig /all^|findstr /c:"IP Address" ') do set ip=%%b
(
for /f "delims=" %%a in ('dir /s /o-d /b *.mp3') do set n+=1&echo http://%ip%%%~pnx&if %n%==100 goto :full100
)>1.list
:full100
endlocal

真快啊，谢谢哦，运行了一下，2003系统说"此时不应有goto".
ip地址您也是自动从系统取的吧。

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%a in ('ipconfig /all^|findstr /c:"IP Address" ') do set ip=%%b
(
for /f "delims=" %%a in ('dir /s /o-d /b *.mp3') do set n+=1&echo http://%ip:~1%%%~pnxa&if !n!==100 goto :full100
)>1.list
:full100
endlocal

[[i] Last edited by netbenton on 2009-2-21 at 18:03 [/i]]

嘿嘿，就差一点点了，忘了要把目录的“\” 替换成"/"，麻烦您了。

//我找论坛的例子单独写了一个：

@echo off&setlocal enabledelayedexpansion&set file=%random%
for /f "delims=" %%a in (1.list) do (
set str=%%a
set "str=!str:\=/!"
echo !str!
) >>2.txt

可以替换了，但是，运行了一下，好像把目录下所有的歌曲都列出来了，
不是最新的100，我看不太懂你取的100是怎么处理的。

另外还发现，运行之后文件是按照文件名字母顺序排的，不是按照时间排序，不知道怎么修改了。

[ Last edited by mymp3 on 2009-2-21 at 22:23 ]

::原来有多个目录时，dir /od/s /b各自目录进行排序的
::改了下方法，这次可以了，我测试过了。
::整个代码如下



@echo off&setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%a in ('ipconfig /all^|findstr /c:"IP Address" ') do set ip=%%b

(for /f "delims=" %%a in ('dir /s /b *.*') do set "str=%%~dta [url]http://%ip:~1%%%~pnxa[/url]"&set "str=!str:\=/!"&echo !str!)>1.txt
set n=0
(for /f "tokens=3*" %%a in ('sort /r 1.txt') do set/a n+=1&echo %%b&if !n!==100 goto :full100)>2.list

:full100
endlocal
pause

[[i] Last edited by netbenton on 2009-2-23 at 18:50 [/i]]

问题彻底解决了，非常感谢！：） 现在可以直接从server上来听歌了。

如果想在这100首里随机排序一下呢？ 好像有一次看到类似的帖子，但是找不到了。

是的在论坛里有的：
http://www.cn-dos.net/forum/viewthread.php?tid=45494&fpage=1&highlight=%E9%9A%8F%E6%9C%BA

你也可以搜索“随机”
可以找到很多

如果有人帮你解决了问题，建议进行以下操作：

1、修改帖子标题，在标题最前面注明：[已结]

2、给正确回答问题者加分（你自己的积分不会减少）以示感谢，虽然大家来论坛是为了学习而不是为了积分，但加分聊表谢意总是或多或少能够让花费了时间和精力无私帮助你的人略感欣慰。

3、如果你是在别人的提示下自己写出了代码，请把自己的方法贴出来跟大家分享一下，也许他人可以帮你指出代码中的不足之处、告诉你如何提高执行效率等，有交流才能更快地进步。

::其实就改两行就可以了
::在串前加入随机数，并以M隔开，
::经排序后，丢掉M前面的部分后输出，便达到随机目的了

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%a in ('ipconfig /all^|findstr /c:"IP Address" ') do set ip=%%b

(for /f "delims=" %%a in ('dir /s /b *.*') do set "str=%%~dta http://%ip:~1%%%~pnxa"&set "str=!str:\=/!"&echo !str!)>1.txt
set n=0

(for /f "tokens=3*" %%a in ('sort /r 1.txt') do set/a n+=1&echo !random!M%%b&if !n!==100 goto :full100)>2.txt

:full100
(for /f "tokens=1* delims=M" %%a in ('sort 2.txt') do echo %%b)>1.list

endlocal
pause

[[i] Last edited by netbenton on 2009-2-23 at 18:50 [/i]]

谢谢了，搞定，每次播放的时候会感谢你的，呵呵。