网而验证码提取

ff358838399

下面这组代码哪里不对，为什么在单元格G2显示的验证码与网页显示的不一致？

Sub whgljdl() '登录
    On Error Resume Next
    With CreateObject("internetexplorer.application")
        .Visible = True
        .Navigate "http://asone.safesvc.gov.cn/asone/servlet/LoginOutServlet"
        Do Until .ReadyState = 4
            DoEvents
        Loop
        r = ActiveCell.Row
        C = ActiveCell.Column
        .Document.All("orgCode").Value = Cells(r, C)
        .Document.All("userCode").Value = Cells(r + 1, C)
        .Document.All("pwd").Value = srmm
        '.document.All.tags("img")(0).Click
        Cells(2, "g").RowHeight = 15
        Cells(2, "g").ColumnWidth = 5.25
        ML = Cells(2, "g").Left
        MT = Cells(2, "g").Top
        MW = Cells(2, "g").Width
        MH = Cells(2, "g").Height
        Cells(1, "g").Select
        ActiveSheet.Shapes.AddShape(msoShapeRectangle, ML, MT, MW, MH).Select
        Selection.ShapeRange.Fill.UserPicture .Document.All.tags("img")(0).src
        Selection.ShapeRange.Line.Visible = False
    End With
End Sub

liucqa

验证码一次有效，不能用IE对象来搞

html2013

刚才发的帖子，不见了，邪门

html2013

liucqa 发表于 2013-7-4 17:27
验证码一次有效，不能用IE对象来搞

验证码应该是一次有效，但是应该可以用ＩＥ来搞。

liucqa

html2013 发表于 2013-7-4 21:02
验证码应该是一次有效，但是应该可以用ＩＥ来搞。

你没看明白一楼的意思

用ie登录，然后再用ie对象来看验证码，这种事初学者干得多了

你仔细想想就知道了

html2013

不知道为什么，发不了代码，还是发附件给你吧，

jackl123

html2013 发表于 2013-7-5 08:52
不知道为什么，发不了代码，还是发附件给你吧，

你的同步下载为什么取不到这个网站的验证码"http://etax.zjtax.gov.cn/dzswj/user/login.html"

02761752696

              谢谢分享