如何使用WPF VB.NET代码将图片保存到Access数据库

我看到你在尝试把文件夹里的图片保存到Access数据库，你的代码里有几个关键问题需要调整，我帮你梳理并修正：

原代码的核心问题 #

• 用StreamReader处理图片是错误的：StreamReader是专门读取文本数据的工具，图片属于二进制数据，直接用FileStream读取就好
• Stream.Read的参数错误：第三个参数应该是Stream.Length，你写的Stream.Length - 1会导致少读一个字节，图片数据不完整
• 缺少完整的连接字符串和SQL执行逻辑：原代码里的连接字符串没写完，也没看到执行SQL命令的步骤，而且直接拼接数据容易出问题，最好用参数化查询

修正后的完整代码 #

Dim FileDialog As New OpenFileDialog()
' 设置文件对话框只显示图片文件
FileDialog.Filter = "图片文件|*.jpg;*.jpeg;*.png;*.bmp"
FileDialog.Multiselect = False

If FileDialog.ShowDialog() = DialogResult.OK Then
    tbpath.Text = FileDialog.FileName ' 假设tbpath是显示路径的文本框

    Try
        ' 1. 构建正确的Access连接字符串
        ' 针对.accdb格式（Access 2007+）
        Dim connString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\YourDatabase.accdb;"
        ' 如果是.mdb格式（旧版Access），用这个连接字符串：
        ' Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\YourDatabase.mdb;"

        Using sqlconn As New OleDb.OleDbConnection(connString)
            sqlconn.Open()

            ' 2. 读取图片的二进制数据
            Dim imageBytes As Byte() = File.ReadAllBytes(tbpath.Text)

            ' 3. 构建参数化SQL命令（假设你的表名为Images，存储图片的字段名为ImageData，类型是OLE Object）
            Dim sqlquery As New OleDb.OleDbCommand("INSERT INTO Images (ImageData) VALUES (@ImageData)", sqlconn)
            ' 添加参数，指定二进制数据类型
            sqlquery.Parameters.Add("@ImageData", OleDb.OleDbType.VarBinary, imageBytes.Length).Value = imageBytes

            ' 4. 执行SQL命令
            sqlquery.ExecuteNonQuery()

            MessageBox.Show("图片保存成功！")
        End Using
    Catch ex As Exception
        MessageBox.Show("保存失败：" & ex.Message)
    End Try
End If

关键说明 #

• 参数化查询：用@ImageData参数传递二进制数据，既避免了SQL注入风险，也能正确处理二进制数据的格式
• 连接字符串选择：根据你的Access数据库格式（.accdb/.mdb）选择对应的驱动和连接字符串
• 数据库字段类型：确保你的表中用来存储图片的字段类型是OLE Object，这是Access中存储二进制大对象的标准类型

内容的提问来源于stack exchange，提问作者J.Mendiogarin