| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 5720 人关注过本帖
标题:自动查找文件夹及文件!(搞定!)
只看楼主 加入收藏
qingquan31
Rank: 1
等 级:新手上路
威 望:2
帖 子:172
专家分:0
注 册:2007-6-19
收藏
 问题点数:0 回复次数:9 
自动查找文件夹及文件!(搞定!)
我想编一个程序自动查询指定路径下所有文件夹和文件的名称,并存入数据库!该用什么函数?还有如何用命令的方式通过我的电脑打开指定路径?跪求各位大侠了,小弟急用!谢谢!!!

[此贴子已经被作者于2007-6-21 17:34:23编辑过]


搜索更多相关主题的帖子: 文件 自动 
2007-06-19 16:32
songyuyu
Rank: 8Rank: 8
等 级:贵宾
威 望:47
帖 子:6090
专家分:25
注 册:2007-1-17
收藏
得分:0 
getfile( )

我喝水只喝纯净水,牛奶只喝纯牛奶,所以我很单纯……
2007-06-19 16:35
qingquan31
Rank: 1
等 级:新手上路
威 望:2
帖 子:172
专家分:0
注 册:2007-6-19
收藏
得分:0 

那个是查找一个已知文件啊,我想要像windows搜索一样查找未知文件应该用什么函数,谢谢大家了!


春风红照日,夏雨绿送归。 秋霜黄落叶,冬雪白花飞。
2007-06-19 16:38
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
adir()

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2007-06-19 16:38
qingquan31
Rank: 1
等 级:新手上路
威 望:2
帖 子:172
专家分:0
注 册:2007-6-19
收藏
得分:0 
谢谢,但能不能具体点,比如我c盘有个vfp文件夹 ,下边还有aa,bb,cc,qq.doc等一些子文件夹和文件c:\aa,bb,cc,qq.doc,我有个kk数据库,含有文件名和路径2个字段,我想系统自动把aa,bb,cc,qq.doc存入文件名字段的4条记录中,并且他们的路径为c:\qq,c:\bb,c:\cc,c:\qq.doc应该怎么编 ,谢谢了,还有什么命令能直接用我的电脑打开c:\qq

春风红照日,夏雨绿送归。 秋霜黄落叶,冬雪白花飞。
2007-06-19 17:01
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 

下面是从帮助文件中拷来的内容:

ADIR( ) 函数
示例 请参阅

将文件信息存放到数组中,然后返回文件个数。

语法

ADIR(ArrayName [, cFileSkeleton [, cAttribute [, cCreatorType]]])

参数
ArrayName

指定数组名。如果数组不存在,Visual FoxPro 将自动创建此数组。如果数组存在,但其大小不足以包含所有信息,则 Visual FoxPro 自动增加数组大小,使得数组能容纳所有信息。如果数组超过了所需大小,Visual FoxPro 将截掉多余部分。如果数组存在,并且 ADIR( ) 函数由于没找到匹配文件而返回 0,则数组保持不变。如果数组不存在,并且 ADIR( ) 函数返回零,则不创建数组。


下表说明了数组中每列的内容及其数据类型:

列 数组内容 数据类型
1 文件名 字符型
2 文件大小 数值型
3 文件最后修改日期 日期型
4 文件最后修改时间 字符型
5 文件属性 字符型

数组的最后一列包含匹配文件的文件属性。每个文件属性值由一个字母表示,一个文件可有多个属性。下表说明每个字母表示的文件属性含义:

字母 属性
A 档案文件 一 可读写
H 隐藏文件
R 只读文件
S 系统文件
D 目录或文件夹

cFileSkeleton

指定文件梗概,以便存储满足搜索条件的文件名或扩展名的文件信息。例如,条件可以是所有表、所有文本文件、所有文件名第一个字母为“A”的文件,等等。这些通配查询在 cFileSkeleton 中可以包含通配符 * 和 ?。其中问号代表单个字符,星号代表任意字符串。在文件梗概中,可在任意位置使用任意个数的通配符。
在 Visual FoxPro、FoxPro for Windows 和 FoxPro for MS-DOS 中,可以指定驱动器和目录名,程序将在此驱动器和目录下搜索匹配文件。如果不指定驱动器和目录名,将把当前目录下的文件信息存入数组中。

在 FoxPro for Macintosh 中,可以搜索匹配文件名的卷和文件夹。如果不指定卷和文件夹,
FoxPro for Macintosh 将当前文件夹中的文件信息存入数组中。

cAttribute

指定在返回内容中包含子目录或嵌套文件夹、隐藏或系统文件、或者卷名。
cAttribute 可以是 D、H 和 S 的任意组合。如果包含 D,除了返回匹配 cFileSkeleton 的文件名外,还将返回当前目录的子目录或当前文件夹的嵌套文件夹。如果包含 H,将返回与 cFileSkeleton 指定相匹配的隐藏文件信息。如果包含 S,将返回与 cFileSkeleton 指定通配文件名相匹配的系统文件信息。
如果 cFileSkeleton 为空字符串,仅返回子目录或嵌套文件夹名、隐藏或系统文件。

cAttribute 参数中包含字符 V,将返回当前驱动器的卷名。如果 V 和 D、H 或 S 一起包含在数组中,则只返回卷名。卷名存入数组的第一个元素中,并截去数组的其余部分。

cCreatorType

仅用于 FoxPro for Macintosh。
用指定的创建程序类型指定文件。如果参数 cFileSkeleton 为空字符串,则仅有匹配指定创建程序类型 cCreatorType 的文件放置到数组中去。如果在参数 cfileSkeleton 中有一个文件梗概,则匹配文件梗概且具有 cCreatorType 指定的创建程序类型的文件被放入数组中。
若要获取 FoxPro for Macintosh 所有的文件扩展名以及相关的创建程序类型,请参阅文件扩展名与文件类型。

返回值类型

数值型

说明

对于每一个文件,ADIR( ) 将文件名、大小、日期、时间和属性信息存入数组。


活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2007-06-19 21:34
qingquan31
Rank: 1
等 级:新手上路
威 望:2
帖 子:172
专家分:0
注 册:2007-6-19
收藏
得分:0 

刚刚做了测试 ,谢谢各位了,基本解决了,但还有个小问题,VFP有没有什么命令可以直接将我的电脑打开 ,并且路径是我库里的数据 ?

eg.

文件数据库.dbf

文件夹名 路径

vfp d:\vfp98\vf\vfp

使用命令可以直接用我的电脑打开d:\vfp98\vf\vfp这个文件夹


春风红照日,夏雨绿送归。 秋霜黄落叶,冬雪白花飞。
2007-06-19 22:09
啸凡
Rank: 8Rank: 8
等 级:贵宾
威 望:45
帖 子:1356
专家分:885
注 册:2006-2-22
收藏
得分:0 

用VFP来打开您的电脑?不懂,我只知道打开电脑必须按电源键。
至于要自动到达到你所要去的路径,以下方法可供参考:
方法一、在AUTIEXE.BAT文件上加上以下两句:
D:
cd\vfp98\vf\vfp
方法二、可以在VFP的主程序上用 RUN 来调用系统的命令。
方法三、在主程序上用SET DEFAULT TO命令

[此贴子已经被作者于2007-6-19 22:35:06编辑过]


两人行已有我师……
2007-06-19 22:32
qingquan31
Rank: 1
等 级:新手上路
威 望:2
帖 子:172
专家分:0
注 册:2007-6-19
收藏
得分:0 

我可能说得不太清楚,我的思路是建一个专门存储文件夹地址的数据库,当查询到该文件夹明后他有个字段叫路径 ,我想做个“打开“按钮,当指针定位到该记录时,按“打开“按钮,会自动用我的电脑根据“文件夹路径“字段打开该文件夹,我知道键盘快捷键是windows+e(打开我的电脑)然后再地址栏输入该路径,但怎么用命令一次性实现呢?


春风红照日,夏雨绿送归。 秋霜黄落叶,冬雪白花飞。
2007-06-19 22:43
qingquan31
Rank: 1
等 级:新手上路
威 望:2
帖 子:172
专家分:0
注 册:2007-6-19
收藏
得分:0 

找到答案了,贴出来大家共享一下
run /3 explorer 路径
多谢chinavfp论坛的xyh6801 及本论坛的各位帮助


春风红照日,夏雨绿送归。 秋霜黄落叶,冬雪白花飞。
2007-06-20 14:56
快速回复:自动查找文件夹及文件!(搞定!)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.019619 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved