已经使用WEBBROWSER打开的图片，怎么样在其他地方引用？？

csuker 2008-11-24 04:11:22

已经使用WEBBROWSER打开的图片，通过什么方式可以在其他的地方引用。而且是通过访问缓存的方式引用，而不是再打开一次网址的方式。

...全文

185 8 打赏收藏转发到动态举报

写回复

用AI写文章

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

vansoft 2008-12-15

打赏
举报

就算是IE也无所谓，只要得到webbrowser控件句柄
再得到document对象，剩下的就是用老马的办法复制粘贴而已。

嗷嗷叫的老马 2008-11-26

打赏
举报

[Quote=引用 4 楼 csuker 的回复:]
确实是显示验证码，不过各位大哥，不好意思，是我没说明白。是在其他程序里引用。比如网上的。
[/Quote]

如果是要别的进程的图片,那就有难度了,晚上我折腾一下看看,手里正好收藏了一些相关的代码片段,应该能组合成功.

esummer 2008-11-25

打赏
举报

把验证码存在数据库里，在别的网站上读取数据库

SYSSZ 2008-11-24

打赏
举报

如果仅是从缓存中读取也是做得到的,只是读取缓存代码很多,所以只说思路.先获取图片文件的文件名,再读取缓存,找出该文件在缓存中的位置,再读到图片框里就行了

csuker 2008-11-24

打赏
举报

确实是显示验证码，不过各位大哥，不好意思，是我没说明白。是在其他程序里引用。比如网上的。

嗷嗷叫的老马 2008-11-24

打赏
举报

[Quote=引用 2 楼 lorl2 的回复:]
有了id何必遍历
dim img as HTMLIMG

set img=Document.getElementById(ID)
再粘贴就行了
[/Quote]

学习~~~~收藏~~~~

lorl2 2008-11-24

打赏
举报

有了id何必遍历
dim img as HTMLIMG

set img=Document.getElementById(ID)
再粘贴就行了

嗷嗷叫的老马 2008-11-24

打赏
举报

这一百给我吧,正好以前有弄过:

'窗体添加一个WebBrowser,一个PictureBox,名称默认.

Option Explicit



Private Sub Form_Load()

    WebBrowser1.Navigate "http://www.m5home.com/blog/article.asp?id=201"   '这个页面有验证码

End Sub



Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

    Dim I As Object, CR As Object

    

    For Each I In WebBrowser1.Document.All

        If I.tagName = "IMG" And I.Id = "vcodeImg" Then     '判断一下ID就行了,这里是判断ID=vcodeImg的那个验证码.

            Set CR = WebBrowser1.Document.body.createControlRange()     '设置选区

            

            CR.Add I        '添加选区

            CR.execCommand ("Copy")     '复制

            Set Picture1.Picture = Clipboard.GetData()

        End If

    Next

End Sub