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 に答える