| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1671 人关注过本帖, 1 人收藏
标题:VF中两表数据替换,求帮助
只看楼主 加入收藏
nfd168
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2021-3-9
结帖率:0
收藏(1)
已结贴  问题点数:20 回复次数:9 
VF中两表数据替换,求帮助
将B表的数据填加到A表对应的表里,求帮助。
图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册
搜索更多相关主题的帖子: 替换 表里 数据 对应 
2021-03-09 10:32
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:4 
容易的,你传附件上来嘛

只求每天有一丁点儿的进步就可以了
2021-03-09 11:18
nfd168
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2021-3-9
收藏
得分:0 
回复 2楼 wengjl
新建文件夹.rar (1.07 KB)
2021-03-09 14:20
wangzhiyi
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:34
帖 子:366
专家分:684
注 册:2014-4-9
收藏
得分:4 
第一,数据表文件不能用a-j单字母作为文件名,因为已给系统留作工作区代码;第二,建议楼主用关联后修改。你现在写的命令是VFP6.0的命令,VFP9以后的UPDATA改为SQL语句。
sele 1
use bbb.dbf
inde on ksh to a
sele 2
use aaa.dbf
inde on ksh to b
SET RELATION TO ksh INTO a
REPLACE ALL cj WITH a.ywcj FOR kmdm='01'
图片附件: 游客没有浏览图片的权限,请 登录注册



[此贴子已经被作者于2021-3-9 14:52编辑过]

2021-03-09 14:39
nfd168
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2021-3-9
收藏
得分:0 
回复 4楼 wangzhiyi
谢谢
2021-03-09 15:07
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43182
注 册:2014-5-20
收藏
得分:4 
最好能说明一下B表字段的含意,就不用去猜想。
不知猜得对不对
图片附件: 游客没有浏览图片的权限,请 登录注册

程序代码:
CREATE CURSOR kmb (kmdm C(2), km C(4))
INSERT INTO kmb    VALUES ("01","YWCJ")
INSERT INTO kmb    VALUES ("02","SXCJ")
INSERT INTO kmb    VALUES ("04","WLCJ")
INSERT INTO kmb    VALUES ("05","HXCJ")
INSERT INTO kmb    VALUES ("06","SWCJ")
INSERT INTO kmb    VALUES ("07","ZZCJ")
INSERT INTO kmb    VALUES ("08","LSCJ")
INSERT INTO kmb    VALUES ("09","DLCJ")
INSERT INTO kmb    VALUES ("31","WYCJ")
INDEX on kmdm TAG kmdm

USE a ALIAS ab IN 0
USE b ALIAS bb IN 0

SELECT bb
INDEX on ksh TAG ksh
SELECT ab
SET RELATION TO ksh INTO "bb", kmdm INTO "kmb"
REPLACE ALL cj WITH IIF(!EMPTY(ksh),EVALUATE("bb."+kmb.km),0)
SELECT * FROM ab




[此贴子已经被作者于2021-3-9 15:57编辑过]

收到的鲜花
  • sdta2021-03-10 10:47 送鲜花  5朵  
2021-03-09 15:49
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:0 
程序代码:
   CLOSE DATABASES 
   SELECT 0
   USE b ALIAS kg
   SELECT 0
   USE a ALIAS bmk
   SELECT kg
   SCAN
     cksh=kg.ksh
     FOR i=3 TO FCOUNT()
       zdmc=FIELD(i)
       zdm='KG.'+ZDMC
       DO case
         CASE zdmc='YWCJ'
            ckmdm='01'
         CASE zdmc='SXCJ'
            ckmdm='02'
         CASE zdmc='WLCJ'
            ckmdm='04'
         CASE zdmc='SWCJ'
            ckmdm='06'
         CASE zdmc='ZZCJ'
            ckmdm='07'
         CASE zdmc='LSCJ'
            ckmdm='08'
         CASE zdmc='DLCJ'
            ckmdm='09'
         CASE zdmc='WYCJ'
            ckmdm='31'
         CASE zdmc='HXCJ'
            ckmdm='05'         
       ENDCASE        &&& 将字段名转换为学科代码,以用于查找
       SELECT bmk
       LOCATE FOR bmk.ksh=cksh AND bmk.kmdm=ckmdm
       IF FOUND()
         REPLACE bmk.cj WITH EVALUATE(zdm)
       ENDIF
       SELECT kg 
     ENDFOR
   ENDSCAN 

只求每天有一丁点儿的进步就可以了
2021-03-09 17:53
foxprosue
Rank: 2
等 级:论坛游民
帖 子:27
专家分:11
注 册:2021-2-3
收藏
得分:4 
学习
2021-03-09 19:32
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:4 
正常情况下,应该先有A表,然后再有B表,不知道楼主这样做的原因为何,能说说吗

[此贴子已经被作者于2021-3-10 11:41编辑过]


坚守VFP最后的阵地
2021-03-10 10:17
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
B 表 成绩字段有 9 个,而 A 表 km 内容只有 6 个,并且顺序也不一样。

坚守VFP最后的阵地
2021-03-10 10:25
快速回复:VF中两表数据替换,求帮助
数据加载中...
 
   



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

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