自动生成文件目录及链接

水无痕59 · 发表于 2011-12-3 11:10

很好的，谢谢分享

Pferdcheng · 发表于 2011-12-5 16:38

来顶一下，支持更新07和10版 XD

Pferdcheng · 发表于 2011-12-16 03:03

cxffxc 发表于 2011-2-5 13:26
不错呀

我以前也做过一个

不好意思，能麻烦发个链接吗？最近做东西正好需要这个，谢谢先！

Pferdcheng · 发表于 2011-12-16 03:04

rg555555 发表于 2011-2-7 08:29
不错，虽然以前已有类似贴子发过。

不好意思如果你之前收藏了的话能发个链接吗，谢谢！

Pferdcheng · 发表于 2011-12-16 03:16

shijianchang 发表于 2011-10-10 04:13
修改为07版，代码如下，
Sub wjlj() '适用于07版
Dim fso As Object

这里是替换原来的所有代码吗？

风云际会6 · 发表于 2011-12-16 08:21

我是来学习的，留个记号。

我让子弹飞 · 发表于 2011-12-16 09:39

好东西，收藏了！

狐狸在线 · 发表于 2011-12-20 20:42

实用的东西，学习了

kjianwu · 发表于 2011-12-20 21:29

xianla 发表于 2011-4-6 23:59
2007和2010下选择目录后没有读取目录下文件::Q

我用2010也是读不出来。

kjianwu · 发表于 2011-12-21 21:37

shijianchang 发表于 2011-10-10 11:13
修改为07版，代码如下，
Sub wjlj() '适用于07版
Dim fso As Object

我刚试过了很好用的。谢谢提供代码！

		自动登录	找回密码
密码			免费注册

[原创] 自动生成文件目录及链接