saving image

[aamir55]

i have a program in which i store an album into the database using Album table and after it I store a picture in that album into the database. I use an other table for pictures called Photos.
I want to save photo after editing so i have added following code in button's click event. There is no error is comming but photo is not stored.

Dim str As New IO.MemoryStream

        pb.Image.Save(str, Imaging.ImageFormat.Jpeg)
        Dim buffer(CInt(str.Length - 1)) As Byte

        ' Read the bytes from this stream
        str.Read(buffer, 0, CInt(str.Length))
        ' Now we can close the stream
        Dim con As New SqlConnection(My.Settings.ConnectionString)
        Dim cmd As New SqlCommand("INSERT INTO Photos Values(@name,@desc,@album_id,@photo)", con)
        cmd.CommandType = CommandType.Text
        Dim param(3) As SqlParameter
        With param
            param(0) = New SqlParameter()
            param(0).ParameterName = "@name"
            param(0).SqlDbType = SqlDbType.VarChar
            param(0).Value = "name"
            cmd.Parameters.Add(param(0))

            param(1) = New SqlParameter()
            param(1).ParameterName = "@desc"
            param(1).SqlDbType = SqlDbType.VarChar
            param(1).Value = "desc"
            cmd.Parameters.Add(param(1))

            param(2) = New SqlParameter()
            param(2).ParameterName = "@album_id"
            param(2).SqlDbType = SqlDbType.Int
            param(2).Value = 1
            cmd.Parameters.Add(param(2))

            param(3) = New SqlParameter()
            param(3).ParameterName = "@photo"
            param(3).SqlDbType = SqlDbType.Image
            param(3).Value = buffer
            cmd.Parameters.Add(param(3))
        End With
        'cmd.Parameters.Add(param)
        con.Open()
        cmd.ExecuteNonQuery()
        'str.Close()
    End Sub

no error is comming now but picture is not stored in database
i also want to show u my database structure which is as follow

CREATE TABLE [dbo].[Albums] (
	[id] [int] IDENTITY (1, 1) NOT NULL ,
	[name] [varchar] (20) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
	[desc] [varchar] (200) COLLATE SQL_Latin1_General_CP1_CI_AS NULL 
) ON [PRIMARY]
GO

CREATE TABLE [dbo].[Photos] (
	[id] [int] IDENTITY (1, 1) NOT NULL ,
	[name] [varchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
	[desc] [varchar] (200) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
	[album_id] [int] NOT NULL ,
	[photo] [image] NULL 
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO

CREATE PROC sp_GetPhotoAlbums AS
SELECT Albums.[id] AS AlbumID, Albums.[name] AS Album, Albums.[desc] AS Album_Desc,
	Photos.[id] AS PhotoID, Photos.[name] AS Photo, Photos.photo, Photos.[desc] AS Photo_Desc
FROM Albums INNER JOIN
Photos ON Albums.[id] = Photos.album_id
ORDER BY Albums.[id]
GO

CREATE PROCEDURE sp_InsertPhoto
	@name AS VARCHAR(50),
	@image AS IMAGE,
	@album AS INT
 AS

INSERT INTO Photos ([name],  photo, album_id) 
VALUES (@name, @image, @album) 

RETURN @@identity

GO

CREATE PROCEDURE sp_NewAlbum
	@name AS VARCHAR(20)
 AS

INSERT INTO Albums ([name]) 
VALUES (@name) 

RETURN @@identity
GO

[Thread1]

it seems that you are not saving the paramaters..

'cmd.Parameters.Add(param)


by the way, why are you not using your stored procedure?

[aamir55]

i m saving parameter for each
by the way how to use stored procedure??

[Thread1]

ah i see i overlooked that..

there is plenty on the web, just google

[aamir55]

if i send u my source file then can u help me??