[已解决]如何从TXT文本中顺序读取数据并写入另外一个文件?
本帖最后由 222222 于 2010-9-2 15:16 编辑现有一个文本文件,文件名为成绩.txt。
内容为:
张学文 80
李国 78
马力 91
夏成 88
王国涛 76
张振东 68
赵飞 90
关心 76
钱鹏飞 89
刘茜 55
李军武 69
备注:每行姓名与分数中间的间隔为1个半角空格。
请教高手:如何从这个文件中读取第一个人的姓名,写入已打开的另外一个网页的A表单,然后读取第一个人的成绩数,写入网页的B表单,再点击网页上的确定。 完成后再按上面的步骤依次读取第二行、第三行?
初学Auoit,搜索了论坛和电子书,好像没有发现类似的例子……
现在正在下载Autoitscript5.1,还不知道能不能找到借鉴。 方法很多
你这样笼统的说,又没有自己的代码
只能随便说个思路给你了
1.数据处理部分
使用正则将文本进行处理,逐行选取空格前的内容为名称
参考语句如下,内容保存在数组$s中$s = StringRegExp($str,"(.+) .+",3)
再使用正则选取空格后的内容为成绩
参考语句,内容保存在数组$t中$t = StringRegExp($str,".+ (.+)",3)2.网页填写部分
打开网址,指向表单,填入内容,提交 $file = FileOpen("test.txt", 0)
; 检查打开的文件是否可读
If $file = -1 Then
MsgBox(0, "错误", "不能打开文件.")
Exit
EndIf
; 每次读取一行文本,直到文件结束.
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$array = StringSplit($line, ' ', 1)
;写入表单
Wend
FileClose($file) 一:用二楼的方法把数据转成二维数组,方便后续工作。 二:提交表单部分最好用post,省时省力少错误。 stringregext($str,'([^\x00-\xff]*)\h(\d+)',3) 还是正则好啊 谢谢楼主的提问,又学习到新的东西了 回复 5# 3mile
不错。。学习了 谢谢各位的热情解答,让我真切的感觉到俺们论坛的良好风气。
另:回复8楼
不用感谢我的提问,要谢的,是楼上慷慨解答的各位。
页:
[1]