24-06-23, 12:44 AM
27-06-23, 06:58 PM
Dim fileName As String = "path/to/file.pdf"
Dim fileData() As Byte = System.IO.File.ReadAllBytes(fileName)
Dim connectionString As String = "connection_string_here"
Dim queryString As String = "INSERT INTO table_name (file_column_name) VALUES (@fileData)"
Using connection As New SqlConnection(connectionString)
connection.Open()
Using command As New SqlCommand(queryString, connection)
command.Parameters.Add("@fileData", SqlDbType.VarBinary).Value = fileData
command.ExecuteNonQuery()
End Using
connection.Close()
End Using
بس لا ينصح بتخزين الملفات مباشرةً في قاعدة البيانات ولكن بدلاً من ذلك يمكن حفظ المسار المؤدي إلى الملف في القاعدة.
Dim fileData() As Byte = System.IO.File.ReadAllBytes(fileName)
Dim connectionString As String = "connection_string_here"
Dim queryString As String = "INSERT INTO table_name (file_column_name) VALUES (@fileData)"
Using connection As New SqlConnection(connectionString)
connection.Open()
Using command As New SqlCommand(queryString, connection)
command.Parameters.Add("@fileData", SqlDbType.VarBinary).Value = fileData
command.ExecuteNonQuery()
End Using
connection.Close()
End Using
بس لا ينصح بتخزين الملفات مباشرةً في قاعدة البيانات ولكن بدلاً من ذلك يمكن حفظ المسار المؤدي إلى الملف في القاعدة.