vb.net - VB.NET | 获取当前用户配置文件文件夹

Question

如何使用'path'转到用户的当前个人资料？

例如，我有这个代码：

        Dim fso, fldr
    fso = CreateObject("Scripting.FilesystemObject")

    fldr = fso.GetFolder("C:\Documents and Settings\%UserProfile%\Local Settings\TEST")

    'delete subfolders
    For Each subf In fldr.SubFolders

        subf.Delete(True)

    Next

    'delete subfiles
    For Each fsofile In fldr.Files

        fsofile.Delete(True)

    Next

我试过这种方式，路径未知。

我怎样才能C:\Documents and Settings\???\Local Settings\TEST 进入当前用户的文件夹？

Answer 1

使用“用户配置文件”环境变量...

MsgBox(Environment.GetFolderPath(Environment.SpecialFolder.UserProfile))

Answer 2

在我的 Windows 8.1 上，我无法访问本地设置文件夹。它的权利受到保护。就获得正确的文件夹路径而言，我认为答案已经在上面发布了。只需将您的自定义文件夹路径附加到DotNetUserProfile返回的文件夹路径即可。Environment

就像是：

Environment.GetFolderPath(Environment.SpecialFolder.UserProfile) & "\Local Settings\TEST"

Answer 3

这对我有用，使用 VB6.0 Sp6

    Dim myDocuPath As String
    myDocuPath = Environ$("USERPROFILE") & "\My Documents"

Answer 4

获取本地 AppData 文件夹：

Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData)

然后使用方法将它与您的“TEST”文件夹连接起来Path.Combine。
请参阅SpecialFolders和合并msdn 页面。