删除创建的目录操作

精易☆挚爱

新手求帮助
请问如果删除已知创建的目录，源码入下：
.版本 2
.子程序 _按钮1_被单击
.局部变量 分割后文本, 文本型, , "0"
.局部变量 欲创建子目录, 文本型
.局部变量 是否创建成功, 逻辑型
.局部变量 变量1, 整数型
分割后文本 ＝ 分割文本 (编辑框1.内容, “\”, )
欲创建子目录 ＝ 分割后文本 [1]
.计次循环首 (取数组成员数 (分割后文本) － 1, 变量1)
    欲创建子目录 ＝ 欲创建子目录 ＋ “\” ＋ 分割后文本 [变量1 ＋ 1]
    .如果真 (寻找文件 (欲创建子目录, #子目录) ＝ “”)
        .如果 (创建目录 (欲创建子目录) ＝ 真)
            是否创建成功 ＝ 真
        .否则
            是否创建成功 ＝ 假
            跳出循环 ()
        .如果结束
    .如果真结束
.计次循环尾 ()
信息框 (选择 (是否创建成功, “创建成功”, “创建失败”), 0, )

QQDHY

咖啡不加糖 发表于 2012-2-7 15:28
能不能不用模块啊，谢谢，写一下源码好吗？

没有用任何模块的   我直接用子程序的方式写给你的

补充内容 (2012-2-7 15:32):
直接把代码复制粘贴到易语言即可

mokeyjay

精易模块3.0命令

目录_删除

精易☆挚爱

mokeyjay 发表于 2012-2-7 15:21
精易模块3.0命令

目录_删除

能不能不用模块啊，谢谢，写一下源码好吗？

QQDHY

[e].版本 2

.子程序 高级删除目录
.参数 目录, , , 用于存放要删除的目录路径，此操作会删除子目录下的所有文件和目录

运行 (“cmd rd /s /q ” ＋ #引号 ＋ 目录 ＋ #引号, 假, )
[/e]


调用CMD是最简单 最容易理解的方法

补充内容 (2012-2-7 15:27):
.版本 2

.子程序 高级删除目录
.参数 目录, , , 用于存放要删除的目录路径，此操作会删除子目录下的所有文件和目录

运行 (“cmd rd /s /q ” ＋ #引号 ＋ 目录 ＋ #引号, 假, )

精易☆挚爱

QQDHY 发表于 2012-2-7 15:26
调用CMD是最简单 最容易理解的方法

补充内容 (2012-2-7 15:27):

能不能不用模块啊，谢谢，写一下源码好吗？

精易☆挚爱

QQDHY 发表于 2012-2-7 15:31
没有用任何模块的   我直接用子程序的方式写给你的

补充内容 (2012-2-7 15:32):

我要用循环实现，不用DOS命令，我发的代码是创建目录的，我现在要删除目录的，要求改写我的代码实现，谢谢！！！

沐雨之风

    调用格式： 〈逻辑型〉 删除目录 （文本型 欲删除的目录名称） - 系统核心支持库->磁盘操作
    英文名称：RmDir
    删除一个存在的目录及其中的所有子目录和下属文件，请务必谨慎使用本命令。成功返回真，失败返回假。本命令为初级命令。
    参数<1>的名称为“欲删除的目录名称”，类型为“文本型（text）”。该目录应实际存在，如果目录中存在文件或子目录，将被一并删除，因此使用本命令请千万慎重。

    操作系统需求： Windows、Linux


系统核心支持库里就有这命令啊。

大家好呵呵

顶上去吧！   呵呵