文件删除的样例代码

下面的样本代码应该在编辑窗口的命令模式下键入,而不是在文件输入/输出对话框中。

以下代码要求输入文件名,然后删除该文件。

C1=注释/输入,请键入要删除的文件。

,(包括完整文件路径)

V1=FILE/EXISTS,C1.INPUT

如果/V1<>0

注释/操作者,文件存在。可以删除。

FILE/DELETE,C1.INPUT

V2=文件/存在,

如果/V2==0

注释/操作者,文件删除成功

ROUTINE/END

END_IF/

ELSE/

注释/操作者,文件仍存在

ROUTINE/END

END_ELSEIF/

END_IF/

注释/操作者,要删除的文件不存在。选择已存在的文件。

代码说明

该代码大部分与文件移动的样例代码中所述类似。

下面仅介绍该示例独有的代码。

FILE/DELETE,C1.INPUT
此行删除指定的文件。这条命令取一个参数,即要删除的文件的名称。本例选择的参数是 C1.INPUT