0

我创建了文本文件并想将一些内容写入该文件,但在流写入器语句中出现错误。

-------
 Dim fileLoc As String = "d:\sample1.txt"
    Dim fs As FileStream = Nothing
    If (Not File.Exists(fileLoc)) Then
        fs = File.Create(fileLoc)
    Else
        File.Delete(fileLoc)
        fs = File.Create(fileLoc)
    End If
    Using sw As StreamWriter = New StreamWriter(fileLoc)
   --------
   --------
   some thing

    ----------
    ----------
   sw.writeline(phone)

   ---------
   end using

我得到的错误是:

该进程无法访问文件“d:\sample1.txt”,因为它正被另一个进程使用。

4

1 回答 1

0

发生这种情况是因为您正在删除文件并很快创建它。删除过程正在进行中,因此您可以创建文件。

Dim fs As FileStream = New FileStream(Application.StartupPath & "\Log\log.txt", FileMode.OpenOrCreate, FileAccess.ReadWrite)
Dim s As StreamWriter = New StreamWriter(fs)
s.Close()
fs.Close()$

希望这段代码对您有所帮助。

于 2012-07-16T12:36:06.943 回答