如何允许访问文件夹?

时间:2018-07-22 01:36:36

标签: vb.net

尝试将文本从文本框中写入文件,并保留其中已有的所有文本,但是出现此消息:

  

mscorlib.dll中发生了类型为'System.UnauthorizedAccessException'的未处理异常   拒绝访问路径“ C:\ Tickets.txt”。

这是为学校分配的任务,用于为学校创建IT票务软件。

到目前为止我所做的:

Private Sub BtnComSubmit_Click(sender As Object, e As EventArgs) Handles BtnComSubmit.Click
    My.Computer.FileSystem.WriteAllText("C:\Tickets.txt", TxtComList.Text, True)
End Sub

我该如何授予执行此操作所需的权限?

1 个答案:

答案 0 :(得分:0)

更改此:

My.Computer.FileSystem.WriteAllText("C:\Tickets.txt", TxtComList.Text, True)

对此:

Dim desktopPath As String = Environment.GetFolderPath( Environment.SpecialFolder.Desktop )
Dim filePath As String = System.IO.Path.Combine( desktopPath , "Tickets.txt" )
My.Computer.FileSystem.WriteAllText( filePath , TxtComList.Text, True )

顺便说一句,我建议您避免使用VB专用的My.Computer...东西,而应使用System.IO API,这样您就可以逐步过渡到C#,最终更加熟悉.NET API。很少有人长期使用VB.NET。