lxz 发表于 2008-10-16 07:05:15

如何显示网页中的信息(已解决)

如何显示这个网页中下面的信息   http://bbs.nod32sj.cn/thread-3227-1-1.html

[ 本帖最后由 lxz 于 2008-10-16 09:33 编辑 ]

bob 发表于 2008-10-16 08:31:49

你是要获取ID和密码吗
可以看看这篇文章,用正则获取
http://www.autoitx.com/forum.php?mod=viewthread&tid=2852&highlight=nod32

lxz 发表于 2008-10-16 08:45:43

原帖由 bob 于 2008-10-16 08:31 发表 http://www.autoitx.com/images/common/back.gif
你是要获取ID和密码吗
可以看看这篇文章,用正则获取
http://www.autoitx.com/forum.php?mod=viewthread&tid=2852&highlight=nod32

还是不会用,你的网址和我的不一样.

liongodmien 发表于 2008-10-16 09:14:51

那文章中已经说的很清楚了,要按自己的情况修改一下!

#include <ie.au3>

Opt('TrayAutoPause', 0)

$oIE = _IECreate('http://bbs.nod32sj.cn/thread-3227-1-1.html', 0, 0, 1, 0)
$oIE = _IEDocReadHTML($oIE)

Local $offset = 1, $GET = ''
While 1
        $String = StringRegExp($oIE, 'EAV-\d{8} - \w{10}', 1, $offset)
        If @error = 0 Then
                $offset = @extended
        Else
                ExitLoop
        EndIf
        $GET &= $String & '        ' & @CRLF
WEnd
If MsgBox(36, '消息', '提取出的用户名和密码是:' & @CRLF & @CRLF & $GET & @CRLF & '是否记录到文件USER&PASS.LOG?') = 6 Then        FileWrite('USER&PASS.LOG', $GET)

lxz 发表于 2008-10-16 09:32:12

原帖由 liongodmien 于 2008-10-16 09:14 发表 http://www.autoitx.com/images/common/back.gif
那文章中已经说的很清楚了,要按自己的情况修改一下!

#include

Opt('TrayAutoPause', 0)

$oIE = _IECreate('http://bbs.nod32sj.cn/thread-3227-1-1.html', 0, 0, 1, 0)
$oIE = _IEDocReadHTML($oI ...

哈哈,大好人出现就是不一样.

liongodmien 发表于 2008-10-17 10:03:31

修改为可以自动获得当天帐号和密码:

#include <ie.au3>

Opt('TrayAutoPause', 0)

$oIE = _IECreate('http://bbs.nod32sj.cn/forum-11-1.html', 0, 0, 1, 0)
$GET = _IELinkClickByText($oIE, '['&@YEAR&'年'&@MON&'月'&@MDAY&'日]NOD32最新升级ID', '', 1)
If $GET <> -1 Then
        MsgBox(64, '错误', '今天的帐号和密码还没更新出来!稍后再试...')
        Exit
EndIf
Sleep(1000)
$oIE = _IEDocReadHTML($oIE)

Local $offset = 1, $GET = ''
While 1
        $String = StringRegExp($oIE, 'EAV-\d{8} - \w{10}', 1, $offset)
        If @error = 0 Then
                $offset = @extended
        Else
                ExitLoop
        EndIf
        $GET &= $String & '        ' & @CRLF
WEnd
If MsgBox(36, '消息', '提取出的帐号和密码是:' & @CRLF & @CRLF & $GET & @CRLF & '是否记录到文件USER&PASS.LOG?') = 6 Then        FileWrite('USER&PASS.LOG', $GET)


[ 本帖最后由 liongodmien 于 2008-10-17 10:22 编辑 ]

linmark 发表于 2008-10-18 20:41:53

学习了!果然很经典啊!新手学习了!

UID 发表于 2009-10-22 15:27:22

正则挺好用的
页: [1]
查看完整版本: 如何显示网页中的信息(已解决)