按表1中km来统计表2中包含表1km信息的不同学校数据，生成tjb，虽然以前求助过类似的，但是一是没学会循环统计并写入新表，二是被包含难住了。

[此贴子已经被作者于2024-5-16 18:23编辑过]

非常正确[强]
这样设计更加合理，请教程序语句学习

[此贴子已经被作者于2024-5-16 23:01编辑过]

完全正确，目前还是拿来主义，scan中间的for if repl还没理解，下次还是不会用，得好好消化
CLOSE DATABASES
USE 表1 ALIAS CHY1 IN 0
USE 表2 ALIAS chy2 IN 0
sELECT DISTINCT bmddm    FROM chy2 INTO ARRAY arr_bmddm
cmd = "CREATE CURSOR TJB (km c(8),zong I"
FOR i=1 TO ALEN(arr_bmddm)
    cmd = cmd + "," + "N" + arr_bmddm[i] + " I"
ENDFOR
cmd = cmd + ")"
EXECSCRIPT(cmd)

APPEND FROM chy1&&&提示chy1不存在，用原名表1才可以，上面有别名了，为什么提示错误
INDEX ON Km TAG Km
SELECT Chy2
SCAN
    FOR ln = 1 TO ALINES(laKm, Xkkmzhmc, 5, "、")
        IF SEEK(laKm[ln]+SPACE(8-LEN(laKm[ln])), "Tjb", "Km") = .T.
            REPLACE Zong WITH Zong+1, ("N"+ALLTRIM(Chy2.Bmddm)) WITH EVALUATE("N"+ALLTRIM(Chy2.Bmddm)) + 1 IN Tjb
        ENDIF
    ENDFOR
ENDSCAN
SELECT Tjb
SET ORDER TO
DELETE TAG Km.CDX

[此贴子已经被作者于2024-5-16 22:34编辑过]

我设想的tjb是自动判断生产，参考您的代码修改了一下。但环境不同了，这种环境下明显感觉不如2楼的合理和好用

是打开的，我测试无论打开还是关闭表1，appe from 是文件原名都可以，别名不行不是appe from 只能是文件名不能是别名

谢谢，对我这样水平更好理解一点，这样其实您以前分享过，不过我没学会举一反三

谢谢，非常正确，对我这样初级水平浅显好理解掌握，我在您语句末尾加上这句合计也有了
SELECT * FROM tj UNION ALL SELECT '合计',SUM(物理),SUM(化学),SUM(生物),SUM(政治),SUM(历史),SUM(地理) FROM tj