| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 787 人关注过本帖
标题:为什么添加却产生修改的结果?请看代码
取消只看楼主 加入收藏
淡雪薇香
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2005-4-11
收藏
 问题点数:0 回复次数:3 
为什么添加却产生修改的结果?请看代码

以下是添加按钮里的代码 dimension c[1] sele 1 m=messagebox("确实要增加记录吗?",4,"系统提示!") if m=6 thisform.pageframe1.page1.text1.readonly=.f. ..

thisform.pageframe1.page1.text1.value=' ' thisform.pageframe1.page1.text2.value=" " .. c[1]=0 sele max(编号) from 开关 into array c thisform.pageframe1.page1.text11.value=c[1]+1 endif 以下是保存按钮里的代码 sele 1 loca for 编号=thisform.pageframe1.page1.text11.value if eof() inse into 开关(双编号,...,编号); values(thisform.text1.value,; thisform.pageframe1.page1.text1.value,; thisform.pageframe1.page1.text2.value,; .. thisform.pageframe1.page1.text11.value) else repl 双编号 with thisform.pageframe1.page1.text1.value repl 设备型号 with thisform.pageframe1.page1.text2.value .... repl 编号 with thisform.pageframe1.page1.text11.value endif thisform.PAGEframe1.page1.text1.readonly=.t. .... thisform.pageframe1.page1.text10.readonly=.t.

if thisform.pageframe1.page1.text1.value=" " messagebox("设备名称不能为空",4,"系统提示!") endif

请问为什么添加保存会将表中当前数据覆盖掉,产生修改的结果呢? 究竟错在哪里呀?大家给看看吧,谢谢

搜索更多相关主题的帖子: 代码 结果 
2005-04-19 10:48
淡雪薇香
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2005-4-11
收藏
得分:0 

我可能找到问题的原因了,当时为了实现一个察看记录的微调按钮,在属性里进行了文本框的数据绑定!所以添加时就会把原先的记录覆盖,把数据绑定解除,就能正常添加了

可是我的微调按钮也不能用了,希望大家继续帮助,怎样才能两全?

是不是应该在微调按钮里设置数据源呢?请大家指教!

2005-04-19 15:55
淡雪薇香
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2005-4-11
收藏
得分:0 

自己顶一下了,设过数据源,结果出错呢

我是这么设的

thisform.pageframe1.page1.text1.ControlSource =双编号 thisform.pageframe1.page1.text2.ControlSource =设备型号 thisform.pageframe1.page1.text3.ControlSource =生产厂家

。。出错提示:此对象的数据源必须是一个参数引用

为对象指定了非法的数据源或控制源。

2005-04-19 20:17
淡雪薇香
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2005-4-11
收藏
得分:0 
thisform.pageframe1.page1.text1.ControlSource ="开关.双编号"
我照着这样改好了,一开始挺好的不过查询回来再点微调按钮就出错了“找不到别名“开关””,这样子该怎么办呢
2005-04-20 11:47
快速回复:为什么添加却产生修改的结果?请看代码
数据加载中...
 
   



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

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