Ваш код ужасно многословен.Подробный код не является неправильным, его труднее читать и, следовательно, он более подвержен ошибкам.Если вы хотите сохранить двоичные данные из файла в базу данных, вы можете сделать это довольно просто, например:
Dim data = File.ReadAllBytes(filePath)
Using connection As New OracleConnection(connectionString),
command As New OracleCommand("UPDATE MyTable SET MyColumn = :MyColumn", connection)
command.Parameters.Add("MyColumn", OracleType.Blob, -1).Value = data
connection.Open()
command.ExecuteNonQuery()
End Using
Я не использую Oracle, поэтому я не уверен, работает ли он точно так жекак SQL Server, но третий параметр Add
- это размер столбца, а -1 используется для MAX
.Это может или не может быть применимо к столбцу BLOB
, поэтому пропустите этот аргумент, если это не так, и установите для него соответствующее значение, если это так.