易表在线答疑技术与交流用户社区 → 文件目录问题


  共有7701人关注过本帖树形打印复制链接

主题:文件目录问题

帅哥哟,离线,有人找我吗?
ZM296514
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:业余侠客 帖子:362 积分:219 威望:0 精华:0 注册:2006/10/24 10:07:00
文件目录问题  发帖心情 Post By:2007/1/24 22:34:00 [只看该作者]

易表中返回当前文件目录参数为:docdir,现请教如何返回当前目录的上一级目录?例如当前文件所在目录为:C:\1\2\3,则要求返回为C:\1\2,如何实现?请教等待中。。。

 回到顶部
帅哥哟,离线,有人找我吗?
ZM296514
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:业余侠客 帖子:362 积分:219 威望:0 精华:0 注册:2006/10/24 10:07:00
  发帖心情 Post By:2007/1/24 22:44:00 [只看该作者]

请教等待中,自己顶一下

 回到顶部
帅哥哟,离线,有人找我吗?
lmk
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:235 积分:10 威望:0 精华:0 注册:2006/8/11 11:02:00
  发帖心情 Post By:2007/1/24 23:11:00 [只看该作者]

Substitute(Split(Substitute(docdir,"\", "*",Len(docdir) - Len(Substitute(docdir,"\","")) - 2),"\",Len(docdir) - Len(Substitute(docdir,"\","")) - 2),"*","\")

 回到顶部
帅哥哟,离线,有人找我吗?
lmk
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:235 积分:10 威望:0 精华:0 注册:2006/8/11 11:02:00
  发帖心情 Post By:2007/1/24 23:18:00 [只看该作者]

呵呵,这样应该更简单:
Substitute(Split(Substitute(docdir,"\", "*",Len(docdir) - Len(Substitute(docdir,"\","")) - 2),"\",1),"*","\")

 回到顶部
帅哥哟,离线,有人找我吗?
czy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2007/1/24 23:22:00 [只看该作者]

记得dos中的两点,在这里用一下。
docdir+"..\"
打开上一级文件夹,如:
Run(docdir+"..\")

 回到顶部
帅哥哟,离线,有人找我吗?
xj22710
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1024 积分:10 威望:0 精华:0 注册:2006/8/12 0:15:00
  发帖心情 Post By:2007/1/24 23:27:00 [只看该作者]

不知楼主的目的是取目录路径还是取文件文件路径,如果是前者,就很难,如楼上公式

但目的如果是取文件路径就很简单,方法同Dos下面一样,比如这个公式:
Exist(docdir+"..\a.egd"),判断当前文件目录的上级目录是否有a.egd这个文件存在,就楼主的路径作比,判断C:\1\2\a.egd是否存在,这个写法的缺点是如果要显示出这个绝对路径,则显示结果不正确,会显示为C:\1\2\3\..\a.egd,这个就没办法了


 回到顶部
帅哥哟,离线,有人找我吗?
ZM296514
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:业余侠客 帖子:362 积分:219 威望:0 精华:0 注册:2006/10/24 10:07:00
  发帖心情 Post By:2007/1/25 13:38:00 [只看该作者]

下面引用由lmk2007/01/24 11:18pm 发表的内容:
呵呵,这样应该更简单:
Substitute(Split(Substitute(docdir,"\", "*",Len(docdir) - Len(Substitute(docdir,"\","")) - 2),"\",1),"*","\& ...

问题这是这样解决了,谢谢哈
三人行,必有我师

 回到顶部