2,749
社区成员
发帖
与我相关
我的任务
分享批量修改文件名的问题
我现在有一个歌库盘，里面都是歌曲文件
用VP6.0做的歌表，我想将歌库里的文件都改成表的文件名对应的ID号，如何实现
原来的歌名 忘记你我做不到.mp2
ID 80010356
该成 80010356.mp2
改的是硬盘里的文件名，不只是表里的
批量改，能实现吗？
用VP6.0做的歌表，我想将歌库里的文件都改成表的文件名对应的ID号，如何实现
原来的歌名 忘记你我做不到.mp2
ID 80010356
该成 80010356.mp2
改的是硬盘里的文件名，不只是表里的
批量改，能实现吗？
...全文
请发表友善的回复…
发表回复
noproblem12 2003-07-25
- 打赏
- 举报
人家是mp2，呵呵
fj_jiangqi 2003-07-25
- 打赏
- 举报
fs=adir(arr)
for i=1 to fs
if seek(arr[i,1])
rename (arr[i,1]) to (id+".mp2")
endif
endfor
表里要按歌名建个索引，运行前要激活它。
以上写的不完整，可能还有些错误，仅供参考！
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊
for i=1 to fs
if seek(arr[i,1])
rename (arr[i,1]) to (id+".mp2")
endif
endfor
表里要按歌名建个索引，运行前要激活它。
以上写的不完整，可能还有些错误，仅供参考！
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊
aabiao 2003-07-25
- 打赏
- 举报
用程序，几千有什么怕的，不就是循环次数多点，怎么了，这么简单的道理不懂？
rename (oldfilename) to (newfilename)
rename (oldfilename) to (newfilename)
acura 2003-07-25
- 打赏
- 举报
如果可行，一定加分
是批量啊，好几千呢？
是批量啊，好几千呢？
szjhxu 2003-07-24
- 打赏
- 举报
如果你的ID的类型是数值的话要加函数
newfilename=allt(str(id))+".mp3"
newfilename=allt(str(id))+".mp3"
szjhxu 2003-07-24
- 打赏
- 举报
use 歌名表
scan
oldfilename=歌名
newfilename=id+".mp3"
rename (oldfilename) to (newfilename)
endscan
use
scan
oldfilename=歌名
newfilename=id+".mp3"
rename (oldfilename) to (newfilename)
endscan
use
aabiao 2003-07-24
- 打赏
- 举报
循环不就行了！
