|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『楼 主』:
vbs 如何判断字符串及截取字符串?
标题意思表达不太准确 - -!!
兄们且听我慢慢道来.
并希望可以解决这个问题.
我这里有 2 个.txt 文件.
old.txt
love.txt
现在要将 old.txt 里一行
如这种格式的 [00:00.00] 字符串取下来
也就是说提取 ] 本身包括左边的字符
和
love.txt 里的一行进行合并.
例:
old.txt 里
[00:00.00]《La la love on my mind》－ Ann Winsborn
[00:01.91]La la la la la la…
[00:03.54]La la la la la la…
...
love.txt 里
《La la love on my mind》－ Ann Winsborn
La la la la la la… 啦……
La la la la la la… 啦……
...
合并后 str.txt 里应有
[00:00.00]《La la love on my mind》－ Ann Winsborn
[00:01.91]La la la la la la… 啦……
[00:03.54]La la la la la la… 啦……
...
用以下的代码虽然成功了,但是如果 [00:00.00] 这里不等于 10 个字符就会截取错误的字符串
不晓得如何判断 "]" 后提取他和左边的字符串.
还有就是以下的代码执行完毕后说 "输入超出了文件尾" ,该怎么解决呢?
with createobject("scripting.filesystemobject")
set rfile = .opentextfile("love.txt",1,true)
set rfile1 = .opentextfile("old.txt",1,true)
set wfile = .opentextfile("str.txt",2,true)
end with
do
rfile1s=left(rfile1.readline,10)
str=rfile1s&rfile.readline
if str = vblf then
msgbox str
wscript.quit
end if
loop [ Last edited by huzixuan on 2007-4-21 at 08:03 AM ]
附件
1:  love.txt (2007-4-21 07:29, 1.88 K,下载次数： 7)
附件
2: old.txt (2007-4-21 07:29, 1.95 K,下载次数： 6)
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
 2007-4-21 07:29 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
 『第
2 楼』:
instr & mid
replace & split都可以
|
|
|
2007-4-21 07:40 |
|
|
lxmxn
版主
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
『第
3 楼』:
两个文件行数不一样也照样合并吗？
|
|
|
2007-4-21 07:45 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
4 楼』:
slore 兄可以举个合适的小例子吗?
如何提取 ] 本身包括左边的字符?
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-21 08:03 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
5 楼』:
StrA="[00:bb00.sdfsd00]《La la love on my mind》－ Ann Winsborn"
Msgbox Mid(strA,1,Instr(StrA,"]"))
|
|
|
2007-4-21 08:38 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
6 楼』:
谢谢,这样问题就可以得到完美的解决了!
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-21 21:21 |
|
