如何用正则提取这里面的名称与代码(已解决)
本帖最后由 紫色风林 于 2011-9-2 16:19 编辑搞得头晕,还是请老师们帮忙吧。
这里有一个TXT文件,如何去掉保险,电力,电器等这些分类,并修改里面的格式
如:
SH601318 中国平安
SH601601 中国太保
SH601628 中国人寿
改成
中国平安=601318
中国太保=601601
中国人寿=601628
在线等了,有路过的老师请留步 ;\w{2}\d{6}\h.*
#include <array.au3>
$File_arr=StringRegExp(FileRead("板块.txt"),'\w{2}(\d{6})\h(.*?)\v',3)
Local $str
For $i=0 To UBound($File_arr)-1 Step 2
$str&=$File_arr[$i+1]&"="&$File_arr[$i]&@CRLF
Next
FileWrite("out.txt",$str)
太好了,这么快,先谢再试 谢谢,正是我要的,看起来那么复杂没想到就这么几句代码搞定了,可惜我没看懂
谢谢老师。。。。
页:
[1]