在图像查看器中打开图像，然后将其保存到具有新名称的文件夹中

Question

我想要一些代码在客户端的硬盘中打开'ImageViewer'中的图像。之后，我想在文件夹中使用新名称保存该图像。

我使用此代码从客户端的计算机上传图片。

    Dim open As New OpenFileDialog
    open.Multiselect = False
    open.Filter = "Image Files(*.jpg; *.jpeg; *.gif; *.bmp)|*.jpg; *.jpeg; *.gif; *.bmp"
    Dim chck As Boolean = open.ShowDialog()
    If chck = True Then
        Dim filepath As String = open.FileName
        Dim img_source As ImageSource = New BitmapImage(New Uri(filepath))
        img_viewer.Source = imgsr
    End If

但现在我想知道如何在文件夹中使用新名称保存该图像。