Click here to Skip to main content
13,249,174 members (34,504 online)
Rate this:
 
Please Sign up or sign in to vote.
'In DA_Company'
Function Company_Save(ByVal M_Model_DA As Model.M_Company) As String
       Try
           connection_enable()
           cmd = New SqlCommand()
           cmd.CommandText = "SP_HR_Company_Insert"
           cmd.Connection = con
           cmd.CommandType = CommandType.StoredProcedure
           cmd.Parameters.Add("@Company_Logo", SqlDbType.Image).Value = M_Model_DA.Company_Logo
           err_message = cmd.ExecuteNonQuery()
       Catch ex As Exception
           err_message = ex.ToString()
       End Try
       Return err_message
   End Function


'In BL_Company'

Function Company_Save(ByVal M_Company_BL As Model.M_Company) As String
      Try
          DA_Company = New DataAccess.DA_Company()
          error_message = DA_Company.Company_Save(M_Company_BL)
      Catch ex As Exception
          error_message = ex.ToString()
      End Try
      Return error_message
  End Function


'In M_Company'

Public Property Company_Logo() As Byte
       Get
           Return Me.CompanyLogo
       End Get
       Set(ByVal value As Byte)
           Me.CompanyLogo = value
       End Set
   End Property


'In Frm_Company'

  Private Sub Company_Save()
        Try
            BL_Company = New BusinessLogic.BL_Company()
            M_Comapny = New Model.M_Company()
            M_Comapny.Company_Logo = Convert.ToByte(browseCompanyLogo.Value)
            error_message = BL_Company.Company_Save(M_Comapny)
 
            If error_message > 0 Then
                MessageBox.Show("Complete Save")
                Company_GridView_FillData()
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message.ToString())
        End Try


 Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
        
Company_Save()
 
    End Sub





But It Shows Input Stream was not in a correct format . Why ? please !
Posted 28-Oct-12 19:02pm
Updated 31-Oct-12 21:07pm
v2
Comments
heinhtataung 1-Nov-12 1:59am
   
Nobody want to answer my quest?
Rate this: bad
 
good
Please Sign up or sign in to vote.

Solution 1

You make sure your SqlDbType.Image or SqlDbType.Binary
cmd.Parameters.Add("@Company_Logo", SqlDbType.Image).Value = M_Model_DA.Company_Logo


If Image
Will it be need to convert byte
<pre lang="vb">Convert.ToByte(browseCompanyLogo.Value)</pre>

in
Frm_Company'




Hope be helpful,
Theingi.
  Permalink  
Comments
heinhtataung 1-Nov-12 4:30am
   
I change format toByte but still having error sis.. how can i do ? :(
Theingi Win 1-Nov-12 4:59am
   
Is it IMAGE in the Store Procedure datatype? Pls let me know the error message.
heinhtataung 1-Nov-12 6:06am
   
Yes sis, Now it is ok in saving at table. But... Now, i face with next problem.
How can i show that saved picture with pictureBox ?
heinhtataung 1-Nov-12 6:07am
   
i used Store Procedure datatype.
Now , i finish saving image.
Now , the problem is how to retrieve to PictureBox ?
Rate this: bad
 
good
Please Sign up or sign in to vote.

Solution 2

M_Comapny.Company_Logo = IO.File.ReadAllBytes(browseCompanyLogo.Value.ToString())
  Permalink  

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month


Advertise | Privacy |
Web04 | 2.8.171114.1 | Last Updated 1 Nov 2012
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100