使用 WebBrowser1 控件 加载完网页后以下代码
ImgFileName = App.Path & "\temp.bmp"
For Each X In WebBrowser1.Document.All
If X.Id = "img_verify" Then'X.Id 为图片ID
Set CtrlRange = WebBrowser1.Document.body.createControlRange()
CtrlRange.Add (X)
CtrlRange.execCommand ("Copy")
SavePicture Clipboard.GetData, ImgFileName
Image1.Picture = LoadPicture(ImgFileName)
Kill ImgFileName
End If
Next
想法很好,但不可行。
因为显示的验证码一般是图片,图片的图形分析,这是个很难的问题,某个硕士的毕业论文就是搞这个的。你有这个技术,你就拥有了金矿。
如果你觉得回答很好,请手机右角评价好评 谢谢