VFP中非空文件夹的删除 - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → VFP中非空文件夹的删除

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 4216 人关注过本帖， 1 人收藏

标题：VFP中非空文件夹的删除

取消只看楼主加入收藏

wengjl

等　级：贵宾
威　望：109
帖　子：2202
专家分：3862
注　册：2007-4-27
结帖率：95.83%

楼主

已结贴√ 问题点数：20 回复次数：6

VFP中非空文件夹的删除

VFP中删除非空的文件夹，用什么命令？

搜索更多相关主题的帖子: 文件夹　

2012-02-11 15:51

wengjl

等　级：贵宾
威　望：109
帖　子：2202
专家分：3862
注　册：2007-4-27

第 2 楼

得分:0

有子文件夹存在，行不通

只求每天有一丁点儿的进步就可以了

2012-02-11 16:09

wengjl

等　级：贵宾
威　望：109
帖　子：2202
专家分：3862
注　册：2007-4-27

第 3 楼

得分:0

我做了一个报名系统，系统有一个设置比赛项目后，再产生一个子系统，各子系统报名后，上报报名数据，在母系统中汇总。

在发布子系统时，要先删除以前发布时生成的文件夹，但有时，用户因操作而在那个文件夹里新建了文件夹，母系统又不知道的

所以有得问了

只求每天有一丁点儿的进步就可以了

2012-02-11 16:13

wengjl

等　级：贵宾
威　望：109
帖　子：2202
专家分：3862
注　册：2007-4-27

第 4 楼

得分:0

  LOCAL cdlmc
  cdlmc='报名管理系统'
  *-----------------
  IF DIRECTORY(cdlmc)
    IF DIRECTORY('.\'+cdlmc+'\ZP')
      RD ('.\'+cdlmc+'\ZP')
    ENDIF
    DELETE FILE ('.\'+cdlmc+'\*.*')    &&& ERASE  ('.\'+cdlmc+'\*.*')
    RD (cdlmc)
  ENDIF
  *删除处理
  *-----------------
  IF !DIRECTORY(cdlmc)
    MD (cdlmc)
  ENDIF
  IF !DIRECTORY('.\'+cdlmc+'\ZP')
    MD ('.\'+cdlmc+'\ZP')
  ENDIF

  　……　
　　以上是系统设置.exe里面的部分代码（系统设置.exe——是母系统，科技竞赛报名管理系统.exe ——是子系统，通过系统设置.exe产生）

当‘报名管理系统'下没有多余的文件夹时，正常。当出现额外的文件夹（用户自建的）时，出错。

求解决办法！谢谢啦

[ 本帖最后由 wengjl 于 2012-2-11 16:29 编辑 ]

只求每天有一丁点儿的进步就可以了

2012-02-11 16:20