二进制流转换成图像,揭示无效图片

二进制流转换成图像,提示无效图片

  Dim m_lFingerData As String
         Dim m_lFingerData1 As String
         Dim newImage As Image
         Dim bitmapData() As Byte
  Dim iStm As ADODB.Stream

Dim strValue As String
         
         m_lFingerData = FormatDbValue(rsTemp!fng_value)
         bitmapData = Trim(StrConv(m_lFingerData, vbUnicode))
        Set iStm = New ADODB.Stream
         With iStm
         .Mode = adModeReadWrite
         .Type = adTypeBinary
         .Open
         .Write bitmapData
        
         .SaveToFile App.Path & "\test1.jpg"
         End With
           imgFinger.Picture = LoadPicture(App.Path & "\test1.jpg")

m_lFingerData的值

m_lFingerData=TTtTUzIxAAAEeH0ECAUHCc7QAAAceWkBAAAAhKUliHggAA0PtAD2AIt32QA1AJ4PvgA9eAYKjQA6AEAKg3hQAIQB6gCwADR+ZwB8AAsOQgCEeCIPSwCEADAO9HiFALIG9ABUADd/GwCZAFsOmACeeGcJMACdAJwPT3ipAOsJZABsACFxuACvADoPRgDEeEkPJgDXAIEP4XjbALkPiQAaAE93MgDmAMsL+gDjeNYLsQDsAIYPMXj3ANcIVQA+AGV3WAAIAV4P3AAXedcLbQAXAZwPLHgvAXIMgwD0AVZ3VwA4AWAP9ABAeWYJuQBLAYELIHhRAeUJygCTAUFzsIrNC4aDM/FudoeHZhEbc6Ybef2oh1X/fYGAAr0CyAKpfz9gRICChAaX6RvCpLvo4mAeoMu8ge90k8p1AICBhDd7xIAGfLr7LQYzcdJpTTiAfsFzsQL8cw4dfIaZyiWXzMDZRnfeu/Zng0r7doTXJtvmYXmTbG4VOnprg5OLKwRGc6LvuPfx9JyJKHcAAUKUyvv2jgNzZAyBAbJ4kAS69KeM1fw9BnOK0hyLAoMNwf6LCcqBQA66nFaNF/mvjM73lvr6Ct4Qef3I9g4KVQEW99OXfIFidYuGEAHXj/IHSi4CItcgPHkDmSg4BgBfDg2G/jsSAIcUwzw6RcH+wf9UCsXPHGQ/wTLAFABHGwRRPv/+Sv9VnwwEsBoc//5bRYUGBBUjA//+VgPFkSZ0/hoAWSQMB8AruP//NURC/wT+xYfB/gQA/CziPQF4UzL6//7B0gCCSxHAODU+SpZVQn4B9zMpwP+XBgTANho+/gQAsjiH9BYAiD8G/eo7Qrr/VGTAThXFOkOVKf9ANf//O8BAIxwAPk30Lzr8xbj8QD5KVMCPwGh/AYFQhn6H0wB9GA5B//1ERInC+bjAbAoAdmRGwsa4dnwfACdqLjg8Vjo+wP7BRJZYU3QBeGqAjGmcwgx4e2sGJ/8x0ABuBAL8/f/+LgVl+4dX/zsgABe658SHP/7AKv/
+9VRcKf9rbBkATUXw+4b8//z+//0F/cWHwf//wMDBO8H7uP8UAIqCIDr++ldZN1T/wP7SAFf89f0h/ypK+8DEuf84CABHh6xvfH8B+JMxRUTNAPfsNsBkQgoAnJhpvH3BwzQMAKSZBIP9/DT/wFXPACrnW2lZfxAAr6kagfz//kw+/jhsC3i2szpHwUSQ/2x3AbyzN0X9B0TEuMBMBQBftp/BTVIBZLk6Hv46wvqD9/c8wUYqOPwlUUdUwTY0BsVgxSgywSEABcITVPoyMCf+Mf1kOsI2GG0MAIPLSfvA+z5LBAAm3UapGgRM48k7/f7/Pfr4hEfAwMD9wTvA+odTDACJ5UyPR1CHCwCx70D+BcHEhmkVADPy063A+IH3+v3+wP47wvqH/P/8CABUO2JLSQkQWAtcOPkiFGsQqfnANv+BKvmF/P79LlRF80QOaGkYVzhLUs0QaWNR/l5BAxDgMHC4BxCDNlP/Bf75fhFUO144/8EQKDxoOA==

差不多就这样 ,转化后结果是无效图片 ,哪里错了呢?
[解决办法]
看上去像BASE64编码啊，解码后再处理。
[解决办法]
怎么能忽略呢，数据库里是二进制的话，你经过编码转为字符串了
知道怎么编码的才能解码

引用:

引用:
FormatDbValue这是什么

这个是自定义函数 你可以忽略 没注意 就发上来了~

[解决办法]
为什么不直接从数据库读到二进制数组，还要通过字符串绕一下
[解决办法]
BASE64解码网上一大堆啊。

FormatDbValue函数干什么用的？
为什么用StrConv转换？
图像数据是Byte()啊，怎么使用String来存储呢？
[解决办法]
"返回 的 指纹图像就是那个 string类型的"......
有点迷糊//
[解决办法]

引用:

这个具体是这样的 我用指纹机登记 的指纹 返回 的 指纹图像就是那个 string类型的
FormatDbValue 只是简单的自定义函数  
StrConv 转换成二进制

因为我用你的字符串解码后，不能形成JPG图片，说明你给出的字符串不是rsTemp!fng_value里的值或者不正确。
[解决办法]
http://download.csdn.net/source/1483930

查看更多 下一篇