易表在线答疑技术与交流用户社区 → [讨论]与大家探求易表能否自动获取目录名(含下级目录)和目录下的文档名?


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

主题:[讨论]与大家探求易表能否自动获取目录名(含下级目录)和目录下的文档名?

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/18 22:03:00 [显示全部帖子]

是不是这样?
我试了,好象没办法用Run,只能手工运行一下VBSRAR文件下载

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/18 22:20:00 [显示全部帖子]

试了一下,只要将a.vbs放到易表安装目录就行了,改一下VBS路径就行了。

例如改VBS指向路径,例如:d:\abc 文件夹:

CreateObject("WScript.Shell").Run "cmd /c D:\abc\ylm.bat",0

或者,在bat中加入路径也行的。

如改批处理路径,例如:d:\abc 文件夹:

for /r d:\abc %%i in (*.doc) do echo %%i>>ylm.txt



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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/18 22:55:00 [显示全部帖子]

for /r d:\abc %%i in (*.*) do echo %%i>>ylm.txt

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/18 23:15:00 [显示全部帖子]

下面引用由xj227102007/09/18 11:10pm 发表的内容:
摸不着头脑了,怎么问题转到VBS的运行上来了?
目的是不是要通过外部运行产生排序后的文本,然后再导入到易表中使之对应?

现在的问题是易表有时用如:Run(docdir + "a.vbs")没反映.放到易表安装目录却正常.

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/18 23:19:00 [显示全部帖子]

下面引用由lxl2007/09/18 10:09pm 发表的内容:
我知道怎么用run运行VBS
点自定义按钮 将在D盘下 生成一个list.txt
后面的工作 就交给易表了-=-=-=- 以下内容由lxl在2007年09月18日 10:11pm时添加 -=-=-=-
易表对bat表对 第2列用evalfor进行控制 呵呵 用起 ...

可以用这个办法,将VBS文件加入当前文件目录,通过易表导出到易表安装目录.

-=-=-=- 以下内容由 ylm2007年09月18日 11:20pm 时添加 -=-=-=-
也就是间接将路径写入了VBS文件了:

CreateObject("WScript.Shell").Run "cmd /c D:\abc\ylm.bat",0


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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/18 23:40:00 [显示全部帖子]

将VBS文件字符在易表中加入docdir ,参考lxl的办法(看32楼).
VBS导到易表安装目录,就个我想你会做的.
bat,不要加路径,放在文件目录就行了.

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/19 11:12:00 [显示全部帖子]

试试这个,不会出现黑闪屏了:
RAR文件下载

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2007/9/19 11:33:00 [显示全部帖子]

改一改,这样稍好看点:
RAR文件下载

 回到顶部