搜索
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 问一个不常见的问题
标题:
问一个不常见的问题
只看楼主
fanjinyu9108
等 级:
论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
结帖率:
88.5%
楼主
已结贴
√
问题点数:20 回复次数:9
问一个不常见的问题
比如说data文件夹下有一些ACCESS数据库文件,文件夹里面的文件名如下:
现在我想让程序自动识别文件名为”Tankfarmdailydata20140311“之类的数据库文件,该文件名的特点是
由2部分组成,前面是”Tankfarmdailydata“,名字是固定的,后面是”20140311“,不固定的,是一个不确定的
日期,我怎样让程序自动识别“Tankfarmdailydata....”的数据库文件,使其自动打开,做一个SELECT语句查询后自动
关闭?问题有些难,苦想了2天没有结果
搜索更多相关主题的帖子:
数据库文件
文件夹
2014-03-22 18:45
hu9jj
来 自:红土地
等 级:
贵宾
威 望:
396
帖 子:11713
专家分:43267
注 册:2006-5-13
第
2
楼
得分:5
试试用adir()函数将文件名读入数组中再作处理。
活到老,学到老! http://www. E-mail:hu-jj@
2014-03-22 18:51
taifu945
等 级:
贵宾
威 望:
80
帖 子:1545
专家分:3298
注 册:2012-7-6
第
3
楼
得分:0
FoxPro可以直接打开Access的数据库文件吗?
2014-03-22 19:00
tlliqi
等 级:
贵宾
威 望:
204
帖 子:15453
专家分:65956
注 册:2006-4-27
第
4
楼
得分:0
好象不可以
2014-03-22 19:11
sdta
来 自:江苏省连云港市
等 级:
版主
威 望:
323
帖 子:9621
专家分:26174
注 册:2012-2-5
第
5
楼
得分:5
楼主是不是走错门了
何必舍近求远,用ACCESS数据库命令直接打开文件不行吗
[
本帖最后由 sdta 于 2014-3-22 19:18 编辑
]
坚守VFP最后的阵地
2014-03-22 19:14
fanjinyu9108
等 级:
论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
第
6
楼
得分:0
我用的是spt技术打开ACCESS的,感谢hu9jj的指点,我在论坛搜索到一个解决办法,是一个叫“追求者”的师傅说的,代码如下:
clear
Create Cursor mylsb (wjm c(120))
x=ADIR(mysz, cPath+'\*.*') &&cPath=你的文件路径
If x<>0
Append From Array Mysz
Endif
BROWSE
解决的思路是把文件的文件名全部存入数组,加入到表里面,然后字段名的长度,决定是否打开该数据库文件
2014-03-22 19:18
fanjinyu9108
等 级:
论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
第
7
楼
得分:0
sdta大师啊,ACCESS数据库命令我不会啊,
2014-03-22 19:20
fanjinyu9108
等 级:
论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
第
8
楼
得分:0
在网上摘抄了一段用SPT打开ACCESS数据库的内容,挺管用,反正我只做查询,数据的是执行另外一个软件生成的
2014-03-22 19:23
sdta
来 自:江苏省连云港市
等 级:
版主
威 望:
323
帖 子:9621
专家分:26174
注 册:2012-2-5
第
9
楼
得分:10
以下是引用
fanjinyu9108
在2014-3-22 19:18:32的发言:
我用的是spt技术打开ACCESS的,感谢hu9jj的指点,我在论坛搜索到一个解决办法,是一个叫“追求者”的师傅说的,代码如下:
clear
Create Cursor mylsb (wjm c(120))
x=ADIR(mysz, cPath+'\*.*') &&cPath=你的文件路径
If x<>0
Append From Array Mysz
Endif
BROWSE
解决的思路是把文件的文件名全部存入数组,加入到表里面,然后字段名的长度,决定是否打开该数据库文件
这段代码并不完全适用你,修改如下:
clear
Create Cursor mylsb (wjm c(120))
x=ADIR(mysz, cPath+'\
Tankfarmdailydata
*.*') &&cPath=你的文件路径
If x<>0
Append From Array Mysz
Endif
BROWSE
坚守VFP最后的阵地
2014-03-22 19:46
fanjinyu9108
等 级:
论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
第
10
楼
得分:0
sdta老师,运行了您稍加修改的代码,非常满意,苦思冥想2天的东西竟然这么轻易的解决了,我恨不得立刻下楼跑上几圈,太兴奋了,非常感谢
2014-03-22 20:13
10
1/1页
1
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-428980-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 2.283587 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved