| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1173 人关注过本帖
标题:每次点击查询都要手动定位dbf,有没有可能每次提示手动定位dbf前,若找不到 ...
只看楼主 加入收藏
ruankao2022
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2022-8-22
结帖率:33.33%
收藏
已结贴  问题点数:10 回复次数:5 
每次点击查询都要手动定位dbf,有没有可能每次提示手动定位dbf前,若找不到表,弹出先导入数据的提示,若找到表,则执行下一步查询
每次点击查询都要手动定位dbf,有没有可能每次提示手动定位dbf前,若找不到表,弹出先导入数据的提示,若找到表,则执行下一步查询

小白的我,真心请教大神、朋友,谢谢
搜索更多相关主题的帖子: 提示 执行 定位 dbf 查询 
2022-08-27 09:40
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:10 
* command1.click
if file('要打开的表')
    use 要打开的表  
    * 继续后面的处理
else
    messagebox('没找到要打开的表,请先导入')
endif
2022-08-27 12:31
ruankao2022
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2022-8-22
收藏
得分:0 
回复 2楼 laowan001
这样的没有解决手动定位dbf的问题呢
2022-08-30 22:09
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:0 
回复 3楼 ruankao2022
有没有可能每次提示手动定位dbf前,若找不到表,弹出先导入数据的提示,若找到表,则执行下一步查询

问题并不是不弹出手动定位dbf表,而是给出提示
2022-08-31 09:13
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:0 
回复 楼主 ruankao2022
具体是什么情况
给点相关代码看看
2022-08-31 09:28
kangss
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:14
帖 子:272
专家分:604
注 册:2014-6-12
收藏
得分:0 
以下是引用laowan001在2022-8-27 12:31:30的发言:

* command1.click
if file('要打开的表')
    use 要打开的表  
    * 继续后面的处理
else
    messagebox('没找到要打开的表,请先导入')
endif


if not used("要打开的表")
       use 要打开的表
endif

*******************************************

Visual FoxPro 9.0 SP2
USED( ) 函数  
请参阅 示例
 全部折叠 全部展开
确定别名是否被使用,或在指定工作区内是否有打开的数据表。

 
USED([nWorkArea | cTableAlias])
 

参数
nWorkArea| cTableAlias
指定表的别名或工作区号。如果你指定一个工作区编号,那么当在指定工作区内有一个表被打开时,USED( ) 函数返回一个逻辑真值 (.T.),反之则返回一个逻辑假值 (.F.);如果指定一个别名,那么当别名指定的表被打开时,USED( ) 返回一个逻辑真值 (.T.) ,否则将返回逻辑假 (.F.) 。
返回值
逻辑型

说明
USED( ) 可以确定一个别名是否被使用,或一个表是否在指定工作区内被打开。

示例
  复制代码
CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data\testdata')
SELECT A
USE customer  && 打开 Customer 表
SELECT B
USE orders  && 打开 Orders 表
SELECT C
USE employee  && 打开 Employee 表
? USED('A')  && 显示 .T.
? USED('B')  && 显示 .T.
? USED(4)  && 显示 .F.
 
2022-09-01 15:54
快速回复:每次点击查询都要手动定位dbf,有没有可能每次提示手动定位dbf前,若找 ...
数据加载中...
 
   



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

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