我为缺乏基本的VB.net知识而道歉但我希望使用相当于%systemdrive%来查找包含Windows的驱动器来检查VB.net中的现有目录 - 所以我有以下内容。
Dim systemPath As String = Mid(Environment.GetFolderPath(Environment.SpecialFolder.System), 1, 3)
If Not Directory.Exists("'systemPath'\MyFolder") Then
Directory.CreateDirectory("'systemPath'\MyFolder")
End If
有人可以帮助在目录查询中使用systemPath字符串吗?谢谢。
答案 0 :(得分:1)
你应该写
Dim systemPath As String = Mid(Environment.GetFolderPath(Environment.SpecialFolder.System), 1, 3)
If Not Directory.Exists(Path.Combine(systemPath, "MyFolder")) Then
Directory.CreateDirectory(Path.Combine(systemPath, "MyFolder"))
End If
您可以使用Environment.GetEnvironmentVariable获取名为%SYSTEMDRIVE%的环境变量,但是获得的结果应该与当前目录分隔符char("\"
)手动组合,因为我没有找到任何方法来说服Path。组合以仅使用系统驱动器(IE C:
)
Dim sysDrive = Environment.GetEnvironmentVariable("SystemDrive")
Dim myPath = sysDrive & Path.DirectorySeparatorChar & "MyFolder"
答案 1 :(得分:0)
IO.Path有应该使用的方法恕我直言
Dim sysDrive As String = Environment.GetEnvironmentVariable("SystemDrive") & IO.Path.DirectorySeparatorChar
Dim myPath As String = IO.Path.Combine(sysDrive, "FolderName")