| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 907 人关注过本帖
标题:还是关于vfp9.0
取消只看楼主 加入收藏
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
结帖率:85.71%
收藏
已结贴  问题点数:20 回复次数:13 
还是关于vfp9.0
明明已经用select main 选中了主表,然后 append blank ,系统却提示选中的是另一个临时表,这时怎么回事,怎么返回我要的表啊
搜索更多相关主题的帖子: blank 
2013-02-15 12:13
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
6.0用的没有问题,到9.0有时出些问题
2013-02-15 12:14
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
图片附件: 游客没有浏览图片的权限,请 登录注册
我选的是主表,系统却指向临时表
2013-02-15 12:27
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
应该没有,如果没有指定CURSOR别名,查询结果会显示出来,我先检查下
2013-02-15 12:35
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
程序代码:
thisform.lockscreen=.t.
select main
    select max(bianhao) as maxbianhao1 from main into cursor yy
    maxbianhao=maxbianhao1

 if thisform.pf.page2.text1.value=""
    select main
    maxjilu=maxbianhao

else
    select main
     select max(bianhao) as maxbianhao2,shenhe from main where 罐号=alltrim(thisform.pf.page2.text1.value) into cursor uu
     maxjilu=maxbianhao2
     maxshenhe=shenhe
     *calc max(bianhao) for 罐号=alltrim(thisform.pf.page2.text1.value) to maxjilu
     guanhao1=alltrim(thisform.pf.page2.text1.value)
     select youguan
     locate for 罐号=guanhao1
         mypinzhong=品种
     select main
    
endif

select main
mybian=bianhao
if  maxjilu=mybian and getnextmodified(0)=0 and nkeycode=24
           if thisform.pf.page2.text1.value=""   
               select main
               append blank   **这里开始出问题
            replace 日期 with date()
            replace bianhao with maxbianhao+1
        else 
             if maxshenhe=1
                select main
                append blank 
                replace 日期 with date()
                replace bianhao with maxbianhao+1
                replace 罐号 with guanhao1
                replace 品种 with mypinzhong
              else
                 messagebox("该罐的上一笔数据未审核,不能添加",0,"注意") 
               
              endif 
        endif
           
endif
thisform.lockscreen=.f.
2013-02-15 12:45
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
我检查了下,没有和主表同名的CURSOR别名,是不是前面的CURSOR 别名yy和uu 引起的,但在6.0下运行得都很好
2013-02-15 12:50
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
为什么在6.0就不出问题呢
2013-02-15 12:58
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
我来试试
2013-02-15 13:00
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
解决了,就是要在结尾加一句thisform.refresh,实际上程序正确执行了,已经添加了,在1区,但添加的结果没有刷新,再按键盘,结果跑到9区去了。加了thisform.refresh后,就没有这种情况了,真实奇怪。
2013-02-15 13:23
jiguanqiang8
Rank: 1
等 级:新手上路
帖 子:154
专家分:2
注 册:2013-2-7
收藏
得分:0 
thisform.refresh这句话其实开始有,是我觉得多余了,将他删除,才出现的,没有注意
2013-02-15 13:25
快速回复:还是关于vfp9.0
数据加载中...
 
   



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

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