二进制流转换成图像,提示无效图片
- VB code
Dim m_lFingerData As String Dim m_lFingerData1 As String Dim newImage As Image Dim bitmapData() As Byte Dim iStm As ADODB.StreamDim 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的值
- VB code
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编码啊,解码后再处理。
[解决办法]
怎么能忽略呢,数据库里是二进制的话,你经过编码转为字符串了
知道怎么编码的才能解码
[解决办法]
为什么不直接从数据库读到二进制数组,还要通过字符串绕一下
[解决办法]
BASE64解码网上一大堆啊。
FormatDbValue函数干什么用的?
为什么用StrConv转换?
图像数据是Byte()啊,怎么使用String来存储呢?
[解决办法]
"返回 的 指纹图像就是那个 string类型的"......
有点迷糊//
[解决办法]
[解决办法]
http://download.csdn.net/source/1483930