WPF Vb.net Copyto не работает?

Question

Я просто пытаюсь запустить событие, которое копирует программу в папку автозагрузки. Я не понимаю, где я иду не так? Я продолжаю получать сообщение об исключении. Копируемый файл НЕ используется.

 Try
        Dim DesktopLink As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
        Dim StartupFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup)

 Dim info As New FileInfo(StartupFolder)
            info.CopyTo(DesktopLink + "\doessomething.bat")

    Catch ex As Exception
        MessageBox.Show("Error: Can not copy to startup folder")
    End Try

Answer 1

Прямо сейчас вы создаете FileInfo из папки, а не из файла.

Вероятно, это должно быть:

Dim info As New FileInfo(Path.Combine(StartupFolder, "doessomething.bat"))
info.CopyTo(Path.Combine(DesktopLink, "doessomething.bat"))

Или еще проще:

Dim source = Path.Combine(StartupFolder, "doessomething.bat")
Dim target = Path.Combine(DesktopLink, "doessomething.bat")
File.Copy(source, target)