论坛 › 已解决问题区 › [已解决]抓TXT文件档的内容显示出来...

t895073 发表于 2011-10-21 15:23:37

[已解决]抓TXT文件档的内容显示出来...

本帖最后由 t895073 于 2011-10-22 12:36 编辑

txt内容为
------------------------------------------
C:\abc\bisc\psm.ad
C:\abc\bisc\stat.ad
C:\abc\ac\host\msmed.ad
C:\abc\net\file\204\ails.ad
C:\abc\net\file\204\bcmsdh.ad
C:\abc\net\file\204\116\bc.ad
C:\abc\infer\file2004\201\1160\bcommal_ca.ad
C:\abc\net\file\ext\110\bocm.ad
------------------------------------------
我要抓出所有的*.ad 名称
然后用msgbox 一次一个显示出来要怎么弄呢?
如: MSGBOX 第一次显示 psm.ad 案确定后 在显示stat.ad 一直显示完
谢谢

binhu3188 发表于 2011-10-21 15:39:47

这个功能不错,同求.

jj119120 发表于 2011-10-21 15:58:19

正则过滤{字数补丁}

jj119120 发表于 2011-10-21 15:59:05

一会看看有没有时间   有时间的话写个LZ

t895073 发表于 2011-10-21 16:24:12

拜托大家了!!

drunk 发表于 2011-10-21 17:03:56

$str = "------------------------------------------"& _
"C:\abc\bisc\psm.ad"& _
"C:\abc\bisc\stat.ad"& _
"C:\abc\ac\host\msmed.ad"& _
"C:\abc\net\file\204\ails.ad"& _
"C:\abc\net\file\204\bcmsdh.ad"& _
"C:\abc\net\file\204\116\bc.ad"& _
"C:\abc\infer\file2004\201\1160\bcommal_ca.ad"& _
"C:\abc\net\file\ext\110\bocm.ad"& _
"------------------------------------------"

$str=StringRegExp($str,"[^\\]+\.ad",3)
For $i = 0 To UBound($str) - 1
        MsgBox(0,0,$str[$i])
Next

t895073 发表于 2011-10-22 12:35:35

回复 6# drunk


解决了
drunk真的很感谢你!

查看完整版本: [已解决]抓TXT文件档的内容显示出来...