[RESOLVED] save picture filename with common dialog

[matrik02]

I have problem here. I want to save the image from picture box to my computer. I use common dialog, the filename is extract form text21. But When I change this filename to other filename, It save without extension *.jpg. But If I follow what the filename given, it save with extension *.jpg. How I use recommended filename or my own filename and save it with extension at the end of the filename.

'SAVE pest picture from picturebox to file
With CommonDialog2
    .fileName = Text21.Text & ".jpg"
    .Filter = "Image (*.*)|*.*"
    .ShowSave
    If Len(.fileName) <> 0 Then
    SavePicture Picture2.Image, CommonDialog2.fileName
    MsgBox "File berjaya disimpan di " & CommonDialog2.fileName
    End If
End With

[pons]

hi please try as following
i hope this is what you are trying to achive if not please clarify further
it will show untitled.jpg as default if you are selecting option 1
if you are selecting option two will show all the jpg files

[CODE]
 With CommonDialog2
        .FileName = Text21.Text & ".jpg"
        .Filter = "Preferred Image (untitled.JPG)|untitled.JPG|Image (*.jpg)|*.jpg|All Files (*.*)|*.*"
        .ShowSave
        If Len(.FileName) <> 0 Then
        SavePicture Picture2.Image, CommonDialog2.FileName
        MsgBox "File berjaya disimpan di " & CommonDialog2.FileName
        End If
    End With[/CODE]

[vivek_master146]

Use this

Private Sub Command1_Click()
With CommonDialog2
    .FileName = Text21.Text & ".jpg"
    .Filter = "Image (*.jpg)|*.jpg"
    .ShowSave
    If Len(.FileName) <> 0 Then
    SavePicture Picture2.Image, CommonDialog2.FileName
    MsgBox "File berjaya disimpan di " & CommonDialog2.FileName
    End If
End With

End Sub

[Keithuk]

But you can't save a picture as a jpg it always saves as a bmp unless you are using Bmp2jpeg.dll. Do a search on here for Bmp2jpeg.dll.