Question

我只是想触发将程序复制到Startup文件夹的事件。我不明白我哪里出错了？我一直在收到异常消息。正在复制的文件未在使用中。

 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)

WPF Vb.net Copyto不工作？

1 个答案: