Access 2016图片存取异常：保存成功但读取时“参数无效”报错

问题现象 #

在Access 2016数据库中保存图片时代码运行无报错，但读取图片时触发“参数无效”错误，报错行：pbDatbase.Image = Image.FromStream(msImage)。排查发现：

• 保存时图片字节数约为251625字节
• 读取时字节数仅为8字节或16字节

错误根源 #

1. SQL参数占位符错误：保存语句中把@Pic放在单引号内，Odbc会将其识别为字符串字面量而非参数，实际存储的是@Pic字符串的字节（8字节左右），并非图片二进制数据。
2. MemoryStream缓冲区冗余：使用GetBuffer()返回的是整个内存流缓冲区（包含未使用的空字节），可能导致存储无效数据，应使用ToArray()获取实际的图片字节数组。
3. DataReader未定位行：读取时未调用Read()方法，DataReader默认未指向结果行，导致读取到无效数据。

修复后的代码 #

图片保存代码 #

Dim strQuery As String
strQuery = "Insert Into tblPictures(Picture) Values(?)" ' Access Odbc标准参数占位符为?
Using msImage As New MemoryStream
    pbFile.Image.Save(msImage, pbFile.Image.RawFormat)
    bytImage = msImage.ToArray() ' 获取仅包含图片数据的字节数组
    MsgBox(bytImage.Count)

    Using cmdImage As New OdbcCommand(strQuery, dbConnection)
        dbConnection.Open()
        cmdImage.Parameters.AddWithValue("@Pic", bytImage)
        cmdImage.ExecuteNonQuery()
    End Using ' Using自动释放Command资源
End Using
dbConnection.Close()

图片读取代码 #

Dim strQuery As String
strQuery = "Select Picture From tblPictures Where PictureId=(Select Max(PictureId) from tblPictures)"
Using cmdImage As New OdbcCommand(strQuery, dbConnection)
    dbConnection.Open()
    Using drImage As OdbcDataReader = cmdImage.ExecuteReader()
        If drImage.HasRows Then
            drImage.Read() ' 定位到结果行
            Dim bytImage() As Byte = DirectCast(drImage("Picture"), Byte())
            MsgBox(bytImage.Count)
            Using msImage As New MemoryStream(bytImage)
                pbDatbase.Image = Image.FromStream(msImage)
            End Using
        End If
    End Using ' Using自动释放DataReader资源
End Using
dbConnection.Close()

关键修改说明 #

• 保存SQL改用?作为参数占位符，移除单引号，确保参数被Odbc正确解析。
• 替换msImage.GetBuffer()为msImage.ToArray()，避免存储冗余的空字节。
• 读取时添加drImage.Read()，确保DataReader指向有效结果行。
• 使用Using语句自动释放Command、DataReader等资源，避免手动管理的疏漏。

内容的提问来源于stack exchange，提问作者M Luqman