VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
楼主: ErickYoung

[转帖] VB显示网上的图片的两种方法

[复制链接]
发表于 2010-6-9 16:56:48 | 显示全部楼层
29# VB---NEW
5# 那个 是装载byte()到picturebox 中
就是 用二进制读取图片文件到 byte()数组中  然后再显示到 图像框中
跟 picture 的 loadpicture 一个意思
回复 支持 反对

使用道具 举报

发表于 2010-6-10 08:12:26 | 显示全部楼层
显示不了...
回复 支持 反对

使用道具 举报

发表于 2010-6-10 08:45:03 | 显示全部楼层
1# ErickYoung

  1. Private Sub Command1_Click()
  2.     If InetVCode.StillExecuting Then Exit Sub
  3.     InetVCode.Execute "http://www.aus-emaps.com/links/captcha.php", "GET"
  4. End Sub

  5. Private Sub Command2_Click()
  6.     If InetVCode.StillExecuting Then Exit Sub
  7.     InetVCode.Execute "http://reg.email.163.com/mailregAll/verifyCodeImg.jsp", "GET"
  8. End Sub

  9. Private Sub InetVCode_StateChanged(ByVal State As Integer)
  10.     If State = icResponseCompleted Then
  11.         Dim BinBuff() As Byte
  12.         Dim StrPath As String
  13.         StrPath = App.Path & "\vcode.jpg"
  14.         BinBuff = InetVCode.GetChunk(0, icByteArray)
  15.         If Dir(StrPath) <> "" Then Kill StrPath
  16.         Open StrPath For Binary As #1
  17.         Put #1, , BinBuff
  18.         Close #1
  19.         Set ImgCode.Picture = LoadPicture(StrPath)
  20.     End If
  21. End Sub
复制代码

来帮我看看这段获取验证码的代码 一些网站能成功 一些网站却不能成功.大家帮看看
回复 支持 反对

使用道具 举报

发表于 2010-6-10 12:32:00 | 显示全部楼层
icByteArray 是什么意思?
回复 支持 反对

使用道具 举报

发表于 2010-6-10 13:34:28 | 显示全部楼层
icByteArray值为1,把数据作为字节数组来检索。
回复 支持 反对

使用道具 举报

发表于 2010-6-10 13:49:02 | 显示全部楼层
1# ErickYoung  

Private Sub Command1_Click()
    If InetVCode.StillExecuting Then Exit Sub
    InetVCode.Execute "http://www.aus-emaps.com/links/captcha.php", "GET"
End Sub

Private Sub Comm ...
aa2564168 发表于 2010-6-10 08:45


其实两个网站都是成功的,第一个为便携式网络图像,第二个为JPG图像,
问题出在如何在IMG中加载网络图像?
回复 支持 反对

使用道具 举报

发表于 2010-6-10 13:57:50 | 显示全部楼层
好像Picture属性只支持Bitmap, icon, metafile, GIF, JPEG,不支持PNG
回复 支持 反对

使用道具 举报

发表于 2010-6-10 15:00:50 | 显示全部楼层
奇怪了,楼上你那代码的command1为什么提示图片无效呀?
可是下载下来的jpg图片可以看呀
回复 支持 反对

使用道具 举报

发表于 2010-6-10 16:21:45 | 显示全部楼层
下载下来的是PNG格式,你用ACD当然可以打开,而Picture属性只支持Bitmap, icon, metafile, GIF, JPEG,不支持PNG
回复 支持 反对

使用道具 举报

发表于 2010-6-10 16:33:03 | 显示全部楼层
哦,那遇到PnG格式的怎么办呢
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-7-4 05:16

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表