如何批量在TXT文本每行前增加规则的数据?

王朝知道·作者佚名  2012-07-12
窄屏简体版  字體: |||超大  
 
分類: 電腦/網絡 >> 程序設計 >> 其他編程語言
 
問題描述:

比如:

[00.02.00]***********

[00.04.00]***********

[00.06.00]***********

…………

说明:我想在MP3上看电子书,但不支持TXT格式,只支持LRC歌词同步,每行8个字,我想把TXT每行前加上上述数据,改成LRC歌词格式,再建立一个空的音频,时间长短由TXT文本而定,然后再下载到MP3上,别的软件都全了,就差这个了,哪位高手有这个工具啊

參考答案:

很好办,如果想用和我联系,最好加点分,哈:)

你是想在TXT文件的每行前面加上[00.02.00]是吗?

set ws=createobject("wscript.shell")

set fso=createobject("scripting.filesystemobject")

if wscript.arguments.count=0 then msgbox "请把你要处理的文件文件拖放到这个脚本上!",4096,"系统提示":wscript.quit

set file=fso.opentextfile(wscript.arguments(0),1)

s=replace(file.readall,vbcrlf,"")

file.close

i=2

do until left(s,8)=""

m="[00.0" & i & ".00]"

n=left(s,8):s=mid(s,9)

sn=sn & m & n & vbcrlf

i=i+2

loop

set file=fso.opentextfile(wscript.arguments(0),2)

file.write sn

file.close

msgbox "操作成功",48+4096,"系统提示"

把它复制到记事本,另存为aa.vbs(注意:请在测试后使用)

小贴士:① 若网友所发内容与教科书相悖,请以教科书为准;② 若网友所发内容与科学常识、官方权威机构相悖,请以后者为准;③ 若网友所发内容不正确或者违背公序良俗,右下举报/纠错。
 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航