下面是我想获得网页上的验证码图片的vb代码，但是有问题欢迎各路大虾探讨！

Question

下面是我根据帮助写的代码但是该文件还是获得不了各位看看怎么会事？
sub search()
Dim webdoc, img
Set webdoc = WebBrowser1.document
Set img = WebBrowser1.document.images
For i = 0 To img.length - 1    
    Debug.Print i & "//" & img(i).Height & ":" & img(i).Width
    getpic (i)
Next
end subPublic Sub getpic(sImgID As Integer)
Dim doc1 As Object
Set doc1 = WebBrowser1.document
Dim ctrlRange As Object
Set ctrlRange = doc1.body.createControlRange 
ctrlRange.Add doc1.images(sImgID) '//选择区域
ctrlRange.execCommand "saveas", True, App.Path & "\" & i & ".bmp" '//保存图片
End Sub问题是 为什么该图片获得不了。

Answer 1

怎么没有人来看呀，太可怜了 ~ 我都贴了两天了

Answer 2

我最近也在找这方面的资料，顶一下，希望哪位高手解答下