作者i82 (blinking)
看板Prob_Solve
标题[问题] 请教程设高手们~
时间Tue Mar 31 17:57:44 2009
如果我想写一只程式把记事本.txt档案上的特殊资料筛选出来 再填入EXCEL上的话
范例如下 我是觉得很难写啦 不知道各位大大觉得呢
---------------------------------------------以下是记事本内容
abcde cdefg xxxxx xxx123 xxxx13
hudhifuhf
jdisjdisjdijdjjdis
No #: 111111
date 123d.l
jicjdiojdfoijfjoijfddo
jfidojfsijdfod
Co # Qty price total
----- ------- ------- ------
0010 479 13.28 6361.12
XYZ
change date
-------------
12/25/09
hisafuhiudfhiudhf
oifjfoijffjisf
jdisadods
---------------------------------------------------------记事本结束
跑完程式之後 抓出以下六个栏位及其值 并output在Excel上
1.title = abcde cdefg
2.No # = 111111
3.Co # = 0010
4.Qty = 479
5.total = 6361.12
6.change date =12/25/09
对不起 表达的很烂 请多包涵......:P
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.204.168.241
1F:→ neverfly:你记事本里的资料格式也未免太乱了吧 04/01 13:38
2F:→ i82:对不起忘了说明 乱打的意思是有可能是任何格式 文字 或数字 04/01 13:43
3F:→ i82:因为不是要选出来的 所以就乱打一通 其实就把他想都是英文就好 04/01 13:43
4F:推 ClubT:应该还是会有一些规则吧 其实你只要会搜寻子字串应该不难 04/03 11:39
5F:→ ClubT:好比说Title就是最早读到的2个字串 NO应该是独立一行 04/03 11:40
6F:→ ClubT:所以搜寻有NO #的行数 在去头尾空白 剩下的四个应该都一样 04/03 11:41
7F:→ ClubT:搜寻到该字串"CO #"然後算下面2列同位置的值 (如果有对齐) 04/03 11:42
8F:→ gofin:如果是用VB就先用X=split(全文,vbcrlf),在找到标题栏的index 05/19 23:25
9F:→ gofin:index+2的那个就是资料栏,再用split(资料," ")切出 05/19 23:26