ResetRetryMode （排他エラーリトライ機能を解除する）

機能: 排他エラーリトライ機能を解除します。

形式

ResetRetryMode

説明: 排他エラーリトライ機能の対象となるコマンドおよびステートメントで，排他エラーが発生した場合のリトライを解除します。

例

Dim BkupFileName, FileNo
TempFile( BkupFileName, "BUP", _TEMP_ )
Copy( _TEMP + "MODE.INF", BkupFileName )
DeleteFile( _TEMP_ + "MODE.INF" )  ' ディスクの書き込み遅延のおそれあり
SetRetryMode( 5, 100 )  ' リトライ設定
FileNo = TextOpen( _TEMP_ + "MODE.INF", CREATE )
ResetRetryMode  ' リトライ解除
If FileNo = 0 Then
  MessageBox( _TEMP_ + "MODE.INF のオープンに失敗", OK )
  Exit 2
Else
  TextWrite( FileNo, "Mode=ReadOnly" )
End If
TextClose( FileNo )

対象バージョン: JP1/Script 10-00以降

9.9.3 ResetRetryMode （排他エラーリトライ機能を解除する）

9.9.3　ResetRetryMode （排他エラーリトライ機能を解除する）