OpenEdge Study - QAD

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 508|回复: 1

判断目录是否存在。

[复制链接]
  • TA的每日心情
    郁闷
    2019-6-14 16:51
  • 签到天数: 18 天

    连续签到: 1 天

    [LV.4]偶尔看看III

    4

    主题

    55

    帖子

    208

    积分

    中级会员

    Rank: 3Rank: 3

    积分
    208
    发表于 2018-12-7 15:06:45 | 显示全部楼层 |阅读模式
    FILE-INFO:FILE-NAME = "DirName".
    IF FILE-INFO:FILE-TYPE = ? THEN DO:
          /* The directory is invalid */
          {mfmsg.i 3679 3}
          undo, retry.
    END.
    该会员没有填写今日想说内容.
  • TA的每日心情
    奋斗
    4 天前
  • 签到天数: 1156 天

    连续签到: 1 天

    [LV.10]以坛为家III

    610

    主题

    1317

    帖子

    2万

    积分

    管理员

    进击的思考者

    Rank: 9Rank: 9Rank: 9

    积分
    28705
    发表于 2018-12-8 14:38:12 | 显示全部楼层
    建议判断file-info:file-type 的第一位 是否不是"D" ;

    因为有可能传入的是一个文件的绝对路径,file-type <> ? ,但也不是路径。
    1. file-info:file-name = v_filepath.
    2.     if substring(file-info:file-type,1,1) <> "d"
    3.     then do:
    4.         message "输入的路径不存在!".
    5.         pause.
    6.         undo mainloop ,retry mainloop.
    7.     end.
    复制代码


    该会员没有填写今日想说内容.
    *滑动验证:
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|小黑屋|手机版|OpenEdge Study - QAD ( 沪ICP备15012660号 QAD OpenEdge Study385468063

    GMT+8, 2019-8-18 20:57 , Processed in 0.489716 second(s), 27 queries .

    Powered by Discuz! X3.4 Licensed

    © 2001-2017 Comsenz Inc.

    快速回复 返回顶部 返回列表