将文件下载到应用程序路径

Question

所以我正在使用此代码下载文件

Dim exePath As String = Application.ExecutablePath()
My.Computer.Network.DownloadFile(TextBox2.Text, exePath & "/img.png")

其中textbox2包含.png文件的网址，但出现此错误

请注意，test.exe在桌面上。

Answer 1

下面的代码应该可以实现您的目标，我从AppDomain获取文件夹路径，然后在WebClient.DownloadFile函数中使用它。

文件信息：

Dim fileName = "test.jpg"
Dim filepath = AppDomain.CurrentDomain.BaseDirectory

下载代码：

Dim web = New System.Net.WebClient
web.DownloadFile("https://i.stack.imgur.com/PIlTn.jpg?s=64&g=1", filepath + fileName)

Answer 2

您可以这样做

My.Computer.Network.DownloadFile(TextBox2.Text, Environment.CurrentDirectory & "/img.png");

Environment.CurrentDirectory 将为您提供当前的工作目录。

我希望这对您有用。