*实现功能:预置一个空的文件夹.
SET SAFETY OFF
IF DIRECTORY("E:\小精灵姓名文本")               &&文件夹存在
  IF ADIR(FARRAY,"E:\小精灵姓名文本\*.txt")=0   &&文件数为空
  hy=1                                          &&相当于什么也不做,随便给变量赋个值
  ELSE
  DELETE FILE "E:\小精灵姓名文本\*.txt"         &&文件夹存且有文件,就删除文件,保留空文件夹
  ENDIF
ELSE
   MD E:\小精灵姓名文本                         &&文件夹不存在就建立
ENDIF


结果提示: E:\小精灵姓名文本 已经存在.
问题好像出在:文件夹判断语句.
请分析.