DELFILESQQ

実行時関数:ワイルドカード (*?) を含むことができる指定した名前に一致するすべてのファイルを削除します。

モジュールUSE DFLIB

形式

result = DELFILESQQ (files)

files
(入力) CHARACTER*(*)。削除するファイル。ワイルドカード (*?) を含むことができます。

結果

結果の型は INTEGER(2) です。結果は,削除したファイル数です。

同時に複数のファイルを削除するためにワイルドカードを使用することができます。DELFILESQQ は,ディレクトリまたはシステム・ファイル,隠されたファイル,読み取り専用ファイルを削除しません。この関数は一度にたくさんのファイルを削除することができるため,この関数を使う場合には注意が必要です。ファイルを他のプロセスが使用中 (たとえば,ファイルを他のプロセスが開いている) の場合,削除することはできません。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

FINDFILEQQ

	USE DFLIB
	INTEGER(4) len, count
	CHARACTER(80) file
	CHARACTER(1) ch
	WRITE(*,*) "Enter names of files to delete: "
	len = GETSTRQQ(file)
	IF (file(1:len) .EQ. '*.*') THEN
	   WRITE(*,*) "Are you sure (Y/N)?"
	   ch = GETCHARQQ()
	   IF ((ch .NE. 'Y') .AND. (ch .NE. 'y')) STOP
	END IF
	count = DELFILESQQ(file)
	WRITE(*,*) "Deleted ", count, " files."
	END