如何使用vb.net代码在SQL Server列中保存PDF文件

Imports System.IO
Imports System.Data.SqlClient

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim filePath As String = "C:\path\to\your\pdf\file.pdf"
        Dim pdfData As Byte() = File.ReadAllBytes(filePath)

        Using connection As New SqlConnection("MySqlConnection")
            Dim command As New SqlCommand("INSERT INTO YourTableName (PDFContent) VALUES (@PDFContent)", connection)
            command.Parameters.AddWithValue("@PDFContent", pdfData)

            Try
                connection.Open()
                command.ExecuteNonQuery()
                MessageBox.Show("PDF file saved to database successfully.")
            Catch ex As Exception
                MessageBox.Show("Error saving PDF file to database: " & ex.Message)
            End Try
        End Using
    End Sub
End Class