If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.Cancel Then
            Exit Sub
        End If
 
        Try
            My.Computer.FileSystem.CopyFile(SysDateiPfad.Text, _
              SaveFileDialog1.FileName)
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try