| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 5632 人关注过本帖
标题:为什么会出现"不能访问选定表“的提示?
只看楼主 加入收藏
liuhaijun
Rank: 2
等 级:论坛游民
威 望:1
帖 子:176
专家分:45
注 册:2008-12-27
结帖率:100%
收藏
已结贴  问题点数:10 回复次数:12 
为什么会出现"不能访问选定表“的提示?
我是想通过一个表单从总表中筛选出符合条件的数据,并生成一个表。
图片附件: 游客没有浏览图片的权限,请 登录注册

查了一下原因,主要是因为“专业名称”用到了组合框控件,数据来自一个自由表,但不知如何解决?另外想问下组合查询的代码如何写(给思路就可以了)。

表单中[确定]按钮的代码为:
set talk off
cFileName=getfile("dbf")
sele 1
use &cFileName  excl
qn="全年"
km1=alltrim(thisform.text1.value)    && 文件名
km2=alltrim()   && 专业名称
km3=alltrim()   && 毕业时间
km4=alltrim()   && 所属季节
sele 1
if km4<>' '.and. km3<>' '
   if  km4=qn
     copy to   就业信息\&km1 for  zymc=km2.and.substr(byrq,1,4)=km3
   else
      copy to  就业信息\&km1 for  zymc=km2.and.substr(byrq,1,4)=km3.and.ssjj=km4
   endif
else      
    copy to    就业信息\&km1 for  zymc=km2
endif
  use
thisform.release

此对话框不影响查询结果。

[ 本帖最后由 liuhaijun 于 2010-4-13 21:28 编辑 ]
搜索更多相关主题的帖子: 提示 访问 
2010-04-12 21:59
cnfarer
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:179
帖 子:3330
专家分:21157
注 册:2010-1-19
收藏
得分:2 

一般有这样几种情况不能访问选定表:
1.表已被打开,要求重新打开(其中有一个要求是独占方式打开)
2.另一个可能的问题,就是当前工作区的问题

组合查询问题:
1.查询语句中使用预先设置好的变量,使用前,将控件中的值赋给变量,然后执行查询语句
2.可以根据控件中的数据动态生成一个SQL语句或VFP的查询命令(字符串,用宏执行之)

★★★★★为人民服务★★★★★
2010-04-13 07:32
panpende
Rank: 8Rank: 8
等 级:蝙蝠侠
威 望:4
帖 子:528
专家分:963
注 册:2009-4-27
收藏
得分:1 
表.字段
2010-04-13 07:37
liuhaijun
Rank: 2
等 级:论坛游民
威 望:1
帖 子:176
专家分:45
注 册:2008-12-27
收藏
得分:0 
感谢版主cnfarer的回答,再帮我看一下代码。我是按3楼方法设的,否则也得不到表中的专业名称。

[ 本帖最后由 liuhaijun 于 2010-4-13 21:17 编辑 ]
2010-04-13 21:16
茵梦湖
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:31
帖 子:545
专家分:2180
注 册:2009-4-25
收藏
得分:6 
表单中[确定]按钮的代码为:
set talk off
cFileName=getfile("dbf")
sele 0  && 1改为0
use &cFileName  excl
qn="全年"
km1=alltrim(thisform.text1.value)    && 文件名
km2=alltrim()   && 专业名称
km3=alltrim()   && 毕业时间
km4=alltrim()   && 所属季节
*sele 1  && 这句多余~
if km4<>' '.and. km3<>' '
   if  km4=qn
     copy to   就业信息\&km1 for  zymc=km2.and.substr(byrq,1,4)=km3
   else
      copy to  就业信息\&km1 for  zymc=km2.and.substr(byrq,1,4)=km3.and.ssjj=km4
   endif
else      
    copy to    就业信息\&km1 for  zymc=km2
endif
  use
thisform.release
2010-04-13 23:19
茵梦湖
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:31
帖 子:545
专家分:2180
注 册:2009-4-25
收藏
得分:0 
代码太冗长, 9句代码或12句代码就可以了~~

2010-04-13 23:25
qingfameng
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:35
帖 子:964
专家分:3019
注 册:2010-2-6
收藏
得分:1 
执行表单之前的主程序中,加上一句话,再试试。其他的都不用改动。
即:  store space(1) to cFileName,km1,km2,km3,km4
      do form 这个表单


[ 本帖最后由 qingfameng 于 2010-4-13 23:41 编辑 ]
2010-04-13 23:35
茵梦湖
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:31
帖 子:545
专家分:2180
注 册:2009-4-25
收藏
得分:0 
以下是引用qingfameng在2010-4-13 23:35:41的发言:

执行表单之前的主程序中,加上一句话,再试试。其他的都不用改动。
即:  store space(1) to cFileName,km1,km2,km3,km4
      do form 这个表单

不需要再增加代码的, 楼主那段代码出错的原因, 主要是在 thisform.release 前, 就无意中将那个combo的自由表关闭了, 所以才会出现那样的提示~~~我5楼和6楼的思路 应该是行得通的~~~事实上, 我也实际测试过, 无误~~~




2010-04-13 23:48
pmc1234
Rank: 5Rank: 5
等 级:职业侠客
帖 子:398
专家分:383
注 册:2010-1-6
收藏
得分:0 
\&什么意思 谢谢
2010-04-14 20:21
pmc1234
Rank: 5Rank: 5
等 级:职业侠客
帖 子:398
专家分:383
注 册:2010-1-6
收藏
得分:0 
问一下 如果是把这些数据复制到数据库中的表应该怎么写 谢谢
2010-04-14 20:47
快速回复:为什么会出现"不能访问选定表“的提示?
数据加载中...
 
   



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

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