vfp9.0 APPEND BLANK 不会更新列表 - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → vfp9.0 APPEND BLANK 不会更新列表

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 1894 人关注过本帖

标题：vfp9.0 APPEND BLANK 不会更新列表

取消只看楼主加入收藏

xiaruiok

等　级：新手上路
帖　子：4
专家分：0
注　册：2020-4-26

楼主

问题点数：0 回复次数：3

vfp9.0 APPEND BLANK 不会更新列表

程序代码：

SELECT istosm

 GOTO BOTTOM

 IF RECCOUNT()<>0
    jlhno = 次序+1

 ELSE
    jlhno = 0

 ENDIF

 APPEND BLANK 
REPLACE *** WITH thisform.txtpartno.value

为什么这段代码在VFP9.0下面执行后不会实时更新列表，在6.0和8.0下面会实时更新，如果APPEND BLANK换成APPEND就可以正常替换

2020-06-29 09:03

xiaruiok

等　级：新手上路
帖　子：4
专家分：0
注　册：2020-4-26

第 2 楼

得分:0

回复 3楼吹水佬

IF  .NOT. TABLEUPDATE(.T.)
    = MESSAGEBOX('更新不成功', "提醒")
    TABLEREVERT(.T.)
 ENDIF

是这段代码问题，VFP8下面正常，vfp9下面不正常也不报错。

图片附件: 游客没有浏览图片的权限，请登录或注册

小弟是第一次接触VFP,请大佬指点一二,谢谢

2020-06-29 14:11

xiaruiok

等　级：新手上路
帖　子：4
专家分：0
注　册：2020-4-26

第 3 楼

得分:0

回复 5楼吹水佬

是的，用VFP8编译的就可以看到刷新，VFP9要把添加数据这个窗口关了才会刷新

2020-06-29 14:47

xiaruiok

等　级：新手上路
帖　子：4
专家分：0
注　册：2020-4-26

第 4 楼

得分:0

回复 7楼吹水佬

谢谢大佬，找到问题了，VFP9下面差一句代码，VFP8就不需要，有点坑人了。在9下面完整代码为：

程序代码：

IF  .NOT. TABLEUPDATE(.T.)
    = MESSAGEBOX('此批有相同的零件,更新不成功', "友情提醒")
    TABLEREVERT(.T.)

 ELSE
     TABLEREVERT(.F.)

 ENDIF

2020-06-29 15:01

快速回复：vfp9.0 APPEND BLANK 不会更新列表