nacookan https://blog.hatena.ne.jp/nacookan/ 今日覚えたこと https://nacookan.hatenadiary.org/ VB ファイルを書き込もうとしたら、他のプロセスなどにそのファイルが掴まれていて、書き込みに失敗することがある。このとき成功するまで何度もチャレンジしたい。 Dim fso As New FileSystemObject Dim t As TextStream Do On Error Resume Next Set t = fso.CreateTextFile("hoge.txt", True, False) On Error GoTo 0 If Not t Is Nothing Then Exit Do Sleep 500 Loop t.Write "hello, world!" t.Close … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fnacookan.hatenadiary.org%2Fentry%2F20071227%2F1198730173" title="ファイルに変更を与える際、すでにファイルが掴まれていたら何度もチャレンジする - 今日覚えたこと" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-12-27 13:36:13 rich https://nacookan.hatenadiary.org/entry/20071227/1198730173 1.0 100%