| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1462 人关注过本帖
标题:有关VFP9.0添加信息的问题
只看楼主 加入收藏
Eric1111
Rank: 2
等 级:论坛游民
威 望:1
帖 子:183
专家分:88
注 册:2013-11-25
收藏
得分:0 
回复 28楼 bccn0906
怪不得,我就是刚才改了下,不行。我把修改的代码改成这样发现能同时修改父表和子表
if messagebox('确定要修改吗?',32+4,'系统提示') =6
    SET ORDER TO 客户编码 IN 销售信息
    IF NOT SEEK(销售信息修改tmp.客户编码,'销售信息')
        INSERT INTO 销售信息 (客户编码) VALUES (销售信息修改tmp.客户编码)
    ENDIF
    UPDATE 基本信息 SET 单位名称=b.单位名称,联系人=b.联系人,联系电话=b.联系电话 from 销售信息修改tmp b WHERE ALLTRIM(基本信息.客户编码)==ALLTRIM(b.客户编码)
    UPDATE 销售信息 SET 单位名称=b.单位名称,联系人=b.联系人,联系电话=b.联系电话,产品名称=b.产品名称,型号规格=b.型号规格,单价=b.单价,数量=b.数量,配件=b.配件;
        ,总价=b.总价,快递公司=b.快递公司,订货时间=b.订货时间,发货日期=b.发货日期,合同编号=b.合同编号,货款=b.货款,发票=b.发票,经手人=b.经手人,联系方式=b.联系方式,备注=b.备注 from 销售信息修改tmp b WHERE ALLTRIM(销售信息.客户编码)==ALLTRIM(b.客户编码)
    *SELECT 基本信息
    *LOCATE FOR ALLTRIM(客户编码)==ALLTRIM(销售信息修改tmp.客户编码)
    *ZAP IN 销售信息修改tmp
    messagebox('修改成功',0+64,'系统提示')
ENDIF
thisform.Refresh
你看看这样会不会有啥不对的
2013-11-28 14:08
Eric1111
Rank: 2
等 级:论坛游民
威 望:1
帖 子:183
专家分:88
注 册:2013-11-25
收藏
得分:0 
回复 28楼 bccn0906
在你的代码上改了些,能修改父表和子表,但是就是没法显示在两个表格上,有没有好的办法能显示上的呢?
2013-11-28 14:09
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
收藏
得分:30 
以下是引用Eric1111在2013-11-28 14:09:59的发言:

在你的代码上改了些,能修改父表和子表,但是就是没法显示在两个表格上,有没有好的办法能显示上的呢?
本就是可以的,我没数据环境,要不加我Q,远程看看
2013-11-28 14:14
Eric1111
Rank: 2
等 级:论坛游民
威 望:1
帖 子:183
专家分:88
注 册:2013-11-25
收藏
得分:0 
回复 33楼 bccn0906
772020996
2013-11-28 14:19
快速回复:有关VFP9.0添加信息的问题
数据加载中...
 
   



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

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