Question

嗨，我似乎无法让mkdir创建一个不读的文件夹，这导致我的代码中出现很多问题，因为我无法将文件写入我创建的目录。谢谢你的帮助。这是我的代码：

Else

    MessageBox.Show("Please set a Root Path for your ****")
    RootFBD.ShowDialog()
    TextBox1.Text = RootFBD.SelectedPath
    My.Computer.FileSystem.CreateDirectory("C:\****-Tools\config\root.txt")
 End If
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim f2 As New FileIOPermission(FileIOPermissionAccess.Read, TextBox1.Text)
    f2.AddPathList(FileIOPermissionAccess.Write Or FileIOPermissionAccess.Read, TextBox1.Text)

    Dim rootSave As System.IO.StreamWriter
    rootSave = My.Computer.FileSystem.OpenTextFileWriter("C:\****-Tools\config\root.txt", True)
    rootSave.WriteLine(TextBox1.Text)
    Me.Hide()
    MainTool.Show()
End Sub
End Class

再次感谢josh

Answer 1

你误解了这个问题;这不是许可问题相反，您将文件保持打开状态，这会阻止其他进程写入ir。

您只需要Close() StreamWriter。

或者，您只需拨打File.AppendText，即可避免此问题。

Answer 2

您正在使用文件名创建目录。试试这个：

My.Computer.FileSystem.CreateDirectory("C:\****-Tools\config")

VB 2010 mkdir只读

2 个答案: