' Launch itself as administrator
            Dim proc As New ProcessStartInfo
            proc.UseShellExecute = True
            proc.WorkingDirectory = Environment.CurrentDirectory
            proc.FileName = Application.ExecutablePath
            proc.Verb = "runas"
            Try
                Process.Start(proc)
            Catch
                ' The user refused to allow privileges elevation.
                ' Do nothing and return directly ...
                Return
            End Try
            Application.Exit()