当前位置:编程学习 > VB >>

vbscript模拟请求远程验证码,如何将得到的结果转为图片?

如题,小弟在做一个小东西,其中要xmlhttp模拟post请求一个远程地址的 验证码图片,请求完了,如何将二进制流转为正常的图片呢?
我给出验证码的地址吧,https://ssl.captcha.qq.com/getimage?aid=2001601&0.5978519566745728
现在要实现的就是
asp中模拟请求这个地址,并将图片还原为验证码图片,有没有能办到的?急求。。。。 

一定要模拟请求,然后将respons转为图片!求救啊 --------------------编程问答-------------------- 二进制流存入byte数组,然后put写出来,就是图片了。 --------------------编程问答-------------------- 除 --------------------编程问答-------------------- Private Sub Command1_Click() ' GET下载图片
    Dim arr() As Byte
    With CreateObject("Msxml2.XMLHTTP.6.0")
        .Open "GET", "https://ssl.captcha.qq.com/getimage?aid=2001601&0.5978519566745728", False
        .Send
        Do While .readyState <> 4
            DoEvents
        Loop
        arr = .responseBody
        Open "c:\1.tif" For Binary As #1
        For i = 0 To UBound(arr)
            Put #1, i + 1, arr(i)
        Next i
        Close #1
    End With
End Sub
Private Sub Command2_Click() ' POST下载图片
    Dim arr() As Byte
    With CreateObject("Msxml2.XMLHTTP.6.0")
        .Open "POST", "https://ssl.captcha.qq.com/getimage?aid=2001601&0.5978519566745728", False
        .Send
        Do While .readyState <> 4
            DoEvents
        Loop
        arr = .responseBody
        Open "c:\2.tif" For Binary As #1
        For i = 0 To UBound(arr)
            Put #1, i + 1, arr(i)
        Next i
        Close #1
    End With
End Sub
补充:VB ,  网络编程
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,