首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

致命异常c0000005

2012-09-07 
致命错误c0000005请教各位高手:基本情况:表单中有13个组合框,这些组合框事件基本相同,以combo1为例:click

致命错误c0000005
请教各位高手:
基本情况:表单中有13个组合框,这些组合框事件基本相同,以combo1为例:
click代码:
set escape on
zy='zy'-khbh
if used('&zy') &&如果表已打开
  sele &zy &&选择表所在的工作区  
else
  sele 116 &&选择116工作区
  use &zy order tag 1 shared alias &zy &&打开并以zy字段进行索引 共享 别名
endif
thisform.combo1.rowsourcetype=2
thisform.combo1.rowsource='&zy'
init代码:
zy='zy'-khbh
if used('&zy') &&如果表已打开
  sele &zy &&选择表所在的工作区 
else
  sele 116 &&选择116工作区
  use &zy order tag 1 shared alias &zy &&打开并以zy字段进行索引 共享 别名
endif
thisform.combo1.rowsourcetype=2
thisform.combo1.rowsource='&zy'
lostfocus代码:
zy='zy'-khbh
this.value=this.displayvalue &&当组合框或列表框只有一列时,如果控制的displayvalue 
this.displayvalue=this.value &&属性和Value 属性都包含字符串,则两者有相同的设置
if used('&zy') &&如果表已打开
  sele &zy &&选择表所在的工作区  
else
  sele 116 &&选择116工作区
  use &zy order tag 1 shared alias &zy &&打开并以摘要字段进行索引
endif
zy1=alltrim(thisform.combo1.displayvalue) &&将组合框中文本框的displayvalue值赋给zy1
locate for 摘要=zy1 &&查找变量zy1
if eof() &&如果没找到
  appe blank &&增加新摘要
  replace 摘要 with zy1
endif
flush
thisform.combo1.rowsourcetype=0
thisform.combo1.rowsource=''
问题现象:
1、一般情况下,能够正常运行,(有可能几十次正常无误)。
2、当某次点击组合框时,偶然出现‘致命错误 c0000005’。且组合框下拉菜单中数据不全。
3、此时,‘khbh’(客户编号)刚换值,比如由2改为3后进入表单运行。出现错误提示。之后就进入死循环,且不断地出现上述错误提示。
产生这些错误的原因及解决方法,请高手赐教。谢谢!







[解决办法]
zy1=alltrim(thisform.combo1.displayvalue) &&将组合框中文本框的displayvalue值赋给zy1
这里的变量建议不要用 ZY开头,全部改一下试试

热点排行