| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1544 人关注过本帖
标题:VFP9在WIN10中,使用APPEND BLANK偶发性出现“无效的寻找偏移量”错误,是兼 ...
只看楼主 加入收藏
hicgj
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2017-5-2
结帖率:0
收藏
已结贴  问题点数:20 回复次数:8 
VFP9在WIN10中,使用APPEND BLANK偶发性出现“无效的寻找偏移量”错误,是兼容性问题吗?
如标题,在以前的VFP版本或WINDOWS版本中从来没出现过这种错误的,最麻烦的是不是每次都出现,有时第一个保存就出现了,有时几十个都能正常保存,完全是偶发性的。真想不通是什么问题?大家在WIN10中有遇到过类似的错误吗?

“保存”按钮的相关代码如下:
 if len(alltrim(thisform.pageframe1.))=0
  messagebox("输入有错漏,请检查!!!")
ELSE
APPEND BLANK
lock()
repl 所属组 with ALLTRIM(thisform.pageframe1.) 业务类型 with ALLTRIM(thisform.pageframe1.)..........
unlock
endif
搜索更多相关主题的帖子: WIN10 APPEND 错误 BLANK 出现 
2021-09-21 15:59
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10609
专家分:43210
注 册:2014-5-20
收藏
得分:5 
VFP的HELP也无明确说明
无效的寻找偏移量 (错误 1103)
记录下最近使用 Visual FoxPro 时的操作,然后与 Microsoft 产品支持机构联系。

或者找出抛出异常的语句或模块,变通一下改用其他算法来处理,如先将某些对象属性值存放到内存变量,再去使用这个内存变量。
2021-09-21 16:25
xuminxz
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:41
帖 子:766
专家分:2517
注 册:2011-5-8
收藏
得分:5 
repl 所属组 with ALLTRIM(thisform.pageframe1.) 业务类型 with ALLTRIM(thisform.pageframe1.)..........
可能是这有问题,能完整地把这句复制上来吗?

dBase有人接盘了。
2021-09-21 20:18
hicgj
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2017-5-2
收藏
得分:0 
repl 所属组 with ALLTRIM(thisform.pageframe1.) 业务类型 with ALLTRIM(thisform.pageframe1.) 题目 with ALLTRIM(thisform.pageframe1.page5.edit1.value) 选项A with ALLTRIM(thisform.pageframe1.page5.edit2.value) 选项B with ALLTRIM(thisform.pageframe1.page5.edit3.value) ;
    选项C with ALLTRIM(thisform.pageframe1.page5.edit4.value) 选项D with ALLTRIM(thisform.pageframe1.page5.edit5.value) 选项E with ALLTRIM(thisform.pageframe1.page5.edit6.value) 录入员 with pname 录入日期 with DATE() 灵活题 WITH thisform.pageframe1.page5.check6.value
  IF thisform.pageframe1.page5.optiongroup1.option1.value=1
    REPLACE 题型 with "单选题" 识别码 WITH ALLTRIM(STR(month(DATE())))+ALLTRIM(STR(DAY(DATE())))+LEFT(TIME(),2)+SUBSTR(TIME(),4,2)+RIGHT(TIME(),2) 答案 with ALLTRIM(thisform.pageframe1.) 多选答案a WITH 0 多选答案b WITH 0 多选答案c WITH 0 多选答案d WITH 0 多选答案e WITH 0
    ELSE
    REPLACE 题型 with "多选题" 识别码 WITH ALLTRIM(STR(month(DATE())))+ALLTRIM(STR(DAY(DATE())))+LEFT(TIME(),2)+SUBSTR(TIME(),4,2)+RIGHT(TIME(),2) 多选答案a WITH thisform.pageframe1.page5.check1.value 多选答案b WITH thisform.pageframe1.page5.check2.value 多选答案c WITH thisform.pageframe1.page5.check3.value 多选答案d WITH thisform.pageframe1.page5.check4.value 多选答案e WITH thisform.pageframe1.page5.check5.value 答案 WITH ""
  endif
这是完整的LOCK和UNLOCK之间的代码,主要用APPEND BLANK在尾部新增一记录后保存题目和答案的,但我觉得这里没有问题,因为如果有问题的话不会保存N次成功的,然后就偶然会出现一次错误(但仍会在DBF表的后面生成一条空记录)。我也试过在APPEND BLANK后面加了一个测试MESSAGEBOX("测试"),发现如果出错后,后面的测试是不会被运行到,包括后面的REPL都没有运行就退出了。
2021-09-21 21:50
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9848
专家分:27241
注 册:2012-2-5
收藏
得分:5 
以下是引用hicgj在2021-9-21 21:50:40的发言:

repl 所属组 with ALLTRIM(thisform.pageframe1.) 业务类型 with ALLTRIM(thisform.pageframe1.) 题目 with ALLTRIM(thisform.pageframe1.page5.edit1.value) 选项A with ALLTRIM(thisform.pageframe1.page5.edit2.value) 选项B with ALLTRIM(thisform.pageframe1.page5.edit3.value) ;
    选项C with ALLTRIM(thisform.pageframe1.page5.edit4.value) 选项D with ALLTRIM(thisform.pageframe1.page5.edit5.value) 选项E with ALLTRIM(thisform.pageframe1.page5.edit6.value) 录入员 with pname 录入日期 with DATE() 灵活题 WITH thisform.pageframe1.page5.check6.value
  IF thisform.pageframe1.page5.optiongroup1.option1.value=1
    REPLACE 题型 with "单选题" 识别码 WITH ALLTRIM(STR(month(DATE())))+ALLTRIM(STR(DAY(DATE())))+LEFT(TIME(),2)+SUBSTR(TIME(),4,2)+RIGHT(TIME(),2), 答案 with ALLTRIM(thisform.pageframe1.), 多选答案a WITH 0, 多选答案b WITH 0, 多选答案c WITH 0, 多选答案d WITH 0, 多选答案e WITH 0
    ELSE
    REPLACE 题型 with "多选题" 识别码 WITH ALLTRIM(STR(month(DATE())))+ALLTRIM(STR(DAY(DATE())))+LEFT(TIME(),2)+SUBSTR(TIME(),4,2)+RIGHT(TIME(),2) 多选答案a WITH thisform.pageframe1.page5.check1.value 多选答案b WITH thisform.pageframe1.page5.check2.value 多选答案c WITH thisform.pageframe1.page5.check3.value 多选答案d WITH thisform.pageframe1.page5.check4.value 多选答案e WITH thisform.pageframe1.page5.check5.value 答案 WITH ""
  endif
这是完整的LOCK和UNLOCK之间的代码,主要用APPEND BLANK在尾部新增一记录后保存题目和答案的,但我觉得这里没有问题,因为如果有问题的话不会保存N次成功的,然后就偶然会出现一次错误(但仍会在DBF表的后面生成一条空记录)。我也试过在APPEND BLANK后面加了一个测试MESSAGEBOX("测试"),发现如果出错后,后面的测试是不会被运行到,包括后面的REPL都没有运行就退出了。

补齐参数间的逗号","

坚守VFP最后的阵地
2021-09-21 23:39
xuminxz
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:41
帖 子:766
专家分:2517
注 册:2011-5-8
收藏
得分:0 
软件是网络版吗?建议用其它数据库做为后台,VFP的锁定机制本身就不完善。另外,代码中如果没有敏感数据,提问时最好将相关代码段,原样复制上来

dBase有人接盘了。
2021-09-22 09:27
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1094
专家分:2693
注 册:2015-12-30
收藏
得分:5 
APPEND BLANK如果成功了,那个lock()还有必要吗?我是没这么用过
可以考虑用 insert into 数据表 试试
2021-09-22 14:29
hicgj
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2017-5-2
收藏
得分:0 
回复 6楼 xuminxz
是局域网版,不会用其他后台数据库管理,工作很忙,没时间学习。但除了这个问题,用现有的共享数据库也是很好用的,胜在简单。
2021-09-22 17:40
hicgj
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2017-5-2
收藏
得分:0 
以下是引用sdta在2021-9-21 23:39:59的发言:


补齐参数间的逗号","

这个需要补逗号的吗?我一直以来都是不用逗号的,晕。应该不是必须的吧
2021-09-22 17:42
快速回复:VFP9在WIN10中,使用APPEND BLANK偶发性出现“无效的寻找偏移量”错误 ...
数据加载中...
 
   



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

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