| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 590 人关注过本帖
标题:求教:下列代码无法将“考生号”和“姓名”写入gkcj.dbf中
取消只看楼主 加入收藏
王咸美
Rank: 1
等 级:新手上路
帖 子:627
专家分:3
注 册:2018-1-4
结帖率:97.26%
收藏
已结贴  问题点数:20 回复次数:2 
求教:下列代码无法将“考生号”和“姓名”写入gkcj.dbf中
图片附件: 游客没有浏览图片的权限,请 登录注册

下列代码无法将“0122012200.txt”中的“考生号”和“姓名”写入gkcj.dbf中,请高手赐教(仅限修改),万分感谢!!!

[0122012200.txt]
2014年重庆市全国普通高考成绩通知单 (涪陵区)

考生号

报名区县: 涪陵区

14500122119000 蒋文丽

报 名 点: 涪陵区招办报名点

成绩

总分 65: 语文 26 数学 15 外语 14 综合 10


2014年重庆市全国普通高考成绩通知单 (涪陵区)

考生号

报名区县: 涪陵区

14500122119001 杨浬

报 名 点: 涪陵区招办报名点

成绩

总分 145: 语文 73 数学 40 外语 27 综合 5

[具体代码如下]
CLOSE DATABASES
CLEAR all
cPath= ADDBS(JUSTPATH(SYS(16,1)))
SET Default TO (cPath)
lcStr=FILETOSTR("0122012200.txt")
CRCL=CHR(13)+CHR(10)
CREATE CURSOR gkcj (考生号 C(14),姓名 C(10),报名区县 C(10),报名点 C(20),总分 I,语文 I,数学 I,外语 I,综合 I)
FOR I=1 TO occurs("考生号",lcStr)
    lc考生号=STREXTRACT(lcStr,"考生号"+CRCL+CRCL,CRCL,I) &&这一句有问题
    INSERT INTO gkcj values(lc考生号,;
    STREXTRACT(lcStr,lc考生号+CRCL+" ",CRCL),;
     STREXTRACT(lcStr,"报名区县:",CRCL,i),;
     STREXTRACT(lcStr,"报 名 点:",CRCL,i),;
     VAL(STREXTRACT(lcStr,"总分",":",i)),;
     VAL(STREXTRACT(lcStr,"语文",CRCL,i)),;
     VAL(STREXTRACT(lcStr,"数学",CRCL,i)),;
     VAL(STREXTRACT(lcStr,"外语",CRCL,i)),;
     VAL(STREXTRACT(lcStr,"综合",CRCL,i)))
ENDFOR
GO top
BROWSE
 





[此贴子已经被作者于2023-5-17 09:21编辑过]

搜索更多相关主题的帖子: 数学 代码 总分 报名 姓名 
2023-05-17 08:25
王咸美
Rank: 1
等 级:新手上路
帖 子:627
专家分:3
注 册:2018-1-4
收藏
得分:0 
@sdta 谢谢!问题完美解决。
2023-05-17 10:18
王咸美
Rank: 1
等 级:新手上路
帖 子:627
专家分:3
注 册:2018-1-4
收藏
得分:0 
@吹水佬 谢谢!0h0D,0h0A,0h20分别表示什么意思?不太明白。盼指点!

[此贴子已经被作者于2023-5-17 15:50编辑过]

2023-05-17 14:56
快速回复:求教:下列代码无法将“考生号”和“姓名”写入gkcj.dbf中
数据加载中...
 
   



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

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