0

我正在尝试让应用程序找到其当前路径/目录,然后使用它来安装 zip 文件,然后将其解压缩到指定位置。(自文件夹)

Dim progDirectory As String

Public Sub Install()
    progDirectory = Environment.GetFolderPath(System.Environment.CurrentDirectory)
    My.Computer.FileSystem.WriteAllBytes(SelFolder & "\Resource.zip", progDirectory, False)
    Unzip(SelFolder & "\Resource.zip", SelFolder)
End Sub

错误是使用 WriteAllBytes 命令时 progDirectory 所在的位置。

任何帮助将不胜感激!:)

4

1 回答 1

1

看来你误解了如何使用WriteAllBytes.

的第二个参数FileSystem.WriteAllBytes是要写入的数据(byte[] data)。您正在传递一个指示文件路径的字符串,这就是您收到此错误的原因。

于 2013-07-14T13:01:45.793 回答