下载到根目录

时间:2013-08-28 19:58:09

标签: vb.net directory root

好的,所以我一直在寻找年龄来找到这个,但没有运气。

我正在使用:

Me.downloader.DownloadFileAsync(New Uri(fileUrl), Path.GetFileName(fileUrl), Stopwatch.StartNew)

要下载文件,但我希望它在名为launcher的文件中保存到我的程序的根目录。

因此,例如,如果我的程序在桌面上并且我打开它并单击“开始”,我希望它创建启动器文件夹(如果它丢失),然后将文件下载到该文件夹​​中,如果不是,则只需将文件下载到其中。

我一直在寻找能够让我这样做的代码,而且我尝试过很多不同的东西。

目前,它只是保存在程序所在的根目录中。

感谢。

1 个答案:

答案 0 :(得分:0)

尝试这样的事情:

Dim baseDir As String = AppDomain.CurrentDomain.BaseDirectory
Dim launcherDir As String = Path.Combine(baseDir, "Launcher")

If Not Directory.Exists(launcherDir) Then
   Directory.CreateDirectory(launcherDir)
End If

Dim targetFile = Path.Combine(launcherDir, Path.GetFileName(fileUrl))

Me.downloader.DownloadFileAsync(New Uri(fileUrl), targetFile, Stopwatch.StartNew)