Help please

[Developerguy]

one of two things, I am trying to create a save button for my program. I want it to save Images that are displayed in Axwindowsmedia player from a listbox. It kind of works only thing is that it saves the file but does notsave the image within it (so the file is save but like it diplays nothing and image size is 0 bytes), here is the code:

Private Sub btnpfsave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpfsave.Click
        SaveFileDialog1.Filter = "Bitmap Image(*.BMP)|*.BMP|Jpeg Image(*.JPG)|*.JPG|GIF Image(*.GIF)|*.GIF|TIFF Image(*.TIFF)|*.TIFF|Portable Network Graphic(*.PNG)|*.PNG|Icon Image(*.ICO)|*.ICO|All Files(*.*)|*.*"
        SaveFileDialog1.Title = "Save an Image File"
        SaveFileDialog1.FilterIndex = 2
        SaveFileDialog1.FileName = lstadd.SelectedItem
        SaveFileDialog1.InitialDirectory() = "C:\Documents and Settings\yes\My Documents\My Pictures;"
        SaveFileDialog1.RestoreDirectory() = True




        If SaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
            AxWindowsMediaPlayer1.URL = lstadd.SelectedItem
            lstadd.SelectedItem = SaveFileDialog1.OpenFile()
            lstadd.Items.Remove(lstadd.SelectedItem)
        End If

        If SaveFileDialog1.FileName = lstadd.SelectedItem Then
            Select Case SaveFileDialog1.FilterIndex
                Case 1
                    lstadd.SelectedItem = System.Drawing.Imaging.ImageFormat.Bmp
                    SaveFileDialog1.DefaultExt = ".BMP"

                Case 2
                    lstadd.SelectedItem = System.Drawing.Imaging.ImageFormat.Jpeg
                    SaveFileDialog1.DefaultExt = ".JPG"

                Case 3
                    lstadd.SelectedItem = System.Drawing.Imaging.ImageFormat.Gif
                    SaveFileDialog1.DefaultExt = ".GIF"

                Case 4
                    lstadd.SelectedItem = System.Drawing.Imaging.ImageFormat.Tiff
                    SaveFileDialog1.DefaultExt = ".TIFF"

                Case 5
                    lstadd.SelectedItem = System.Drawing.Imaging.ImageFormat.Png
                    SaveFileDialog1.DefaultExt = ".PNG"

                Case 6
                    lstadd.SelectedItem = System.Drawing.Imaging.ImageFormat.Icon
                    SaveFileDialog1.DefaultExt = ".ICO"

            End Select
        End If

    End Sub
End Class

any ideas

 

[Developerguy]

second thing, is I want to be able to select and add more than one list box item, to be added to another listbox, I am trying to tweak my code but I am having difficulty. here is the code for add one item:

 Private Sub btnpfadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpfadd.Click
        Dim i As Integer




        For i = 0 To lstopen.SelectedIndices.Count - 1
        Next
        Try
            AxWindowsMediaPlayer1.URL = lstopen.SelectedItem
            lstadd.Items.Add(lstopen.SelectedItem)
            lstopen.Items.Remove(lstopen.SelectedItem)
            AxWindowsMediaPlayer1.URL = ""

        Catch ex As Exception

        End Try


    End Sub

any ideas? thank you

 

[hmm]

i'm confused, can you upload the source so i have a better idea of what youre doing?

 

[Developerguy]

i'm confused, can you upload the source so i have a better idea of what youre doing?

source? you mean the prog or the code?

 

[hmm]

source? you mean the prog or the code?

the files containing the source.
basically, i need to visually see what youre trying to do, and what control is name what.

otherwise i can't help on this one.

 

[Developerguy]

It says the file is bigger than the limit it would allow, is there anything else I ca do to help shed more light on the situation?

 

[Developerguy]

Actually I uploaded it at this site right here, So you can take a look at it and aid me, thank you very much

http://www.megaupload.com/?d=RC2C2AU8 <<<< where I uploaded it too, just follow the instructions