写入读到二进制数据到DB

byte[] data = File.ReadAllBytes(m_filePath);

 

        private string SaveFileToDB(byte[] data)
        {

            string sqlText = "insert into macuploadfile values(@bdata);select lastval();";
            BaseDataProvider db = DbSelector.GetDbClass();
            Npgsql.NpgsqlCommand command = (Npgsql.NpgsqlCommand)db.GetCommand(sqlText);
            command.Parameters.Add("@bdata", NpgsqlTypes.NpgsqlDbType.Bytea);
            command.Parameters[0].Value = data;
            db.Open();
            string fileid = command.ExecuteScalar().ToString();
            db.Disconnect();
            return fileid;
        }

 

--------------------------------------------------------------------

Dim bdata As Byte() = dr("filedata")

writeBytesToFile(bdata, destFilePath)

 

 Private Sub writeBytesToFile(ByVal mybyte As Byte(), ByVal filename As String)

      Dim fs As FileStream = New FileStream(filename, FileMode.Create)

     fs.Write(mybyte, 0, mybyte.Length)

     fs.Flush()

     fs.Close()

End Sub