找回密码
 加入
搜索
查看: 2266|回复: 2

[AU3基础] 输出格式为什么不是自己想象中的那样?(已解决)

[复制链接]
发表于 2010-11-1 15:56:39 | 显示全部楼层 |阅读模式
本帖最后由 yiruirui 于 2010-11-23 17:59 编辑
#include<IE.au3>
#include<array.au3>
#include<file.au3>
$file=FileOpen("result.txt",10)
;FileClose($file)
$k=1
$line1=1
$line2=2
$line3=1
Dim $i,$j,$p
$line=1
For $k=1 To 2
        $oIE=_IECreate("http://www.9ask.cn/search/findindex.asp?page="&$k&"&pnameid=2",0,0,1,0)
        $stext=_IEBodyReadHTML($oIE)
        $aReg = StringRegExp($sText, '\D(1[358]\d{9})\D', 3)

$bReg = StringRegExp($sText,'\[上海.+?\]',3)
$cReg = StringRegExp($stext,'<STRONG>(.+?律师)</STRONG>',3)
 for $j=0 to UBound($bReg)-1
        _FileWriteToLine("result.txt",$line1,$bReg[$j],0)
        $line1=$line1+2;
Next

for $i=0 To UBound($bReg)-1
        MsgBox(0,$i+1,$aReg[$i])
        _FileWriteToLine("result.txt",$line2,$aReg[$i],0)
        $line2=$line2+2;
Next
next
我把此网页中的内容[上海 **区]的放在第一行,第三行,....奇数行,
把手机号码放到了2,4,...偶数行,
代码中并没发现什么问题 ,但是结果确意料之外完全没有按照我的格式输出,乱七八糟的,大虾们帮小弟看看那里有问题?3Q!
 楼主| 发表于 2010-11-1 16:18:43 | 显示全部楼层
没人吗?好可怜的我
 楼主| 发表于 2010-11-1 17:19:57 | 显示全部楼层
For $k=1 To 2
        $oIE=_IECreate("http://www.9ask.cn/search/findindex.asp?page="&$k&"&pnameid=2",0,0,1,0)
        $stext=_IEBodyReadHTML($oIE)
        $aReg = StringRegExp($sText, '\D(1[358]\d{9})\D', 3)

$bReg = StringRegExp($sText,'\[上海.+?\]',3)
$cReg = StringRegExp($stext,'<STRONG>(.+?律师)</STRONG>',3)
for $i=0 To UBound($bReg)-1
        ;MsgBox(0,$i+1,$aReg[$i])
        _FileWriteToLine("result.txt",$line2,$aReg[$i],0)
        $line2=$line2+2;
Next
Next
这样的话,输出为空.具体问题到底出现在什么地方?难道从第2行开始就不行吗?
还是因为数字跟字体所占用的宽度,高度不同有关系呢?这个问题莫非我是第一个发现的?那我就成名人了啊!!!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 16:50 , Processed in 0.083633 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表