标题:日期量的处理
只看楼主
sarge_xp
Rank: 2
等 级:论坛游民
帖 子:120
专家分:13
注 册:2006-4-30
结帖率:60%
已结贴  问题点数:20 回复次数:13 
日期量的处理
数据采集后,要逐个记录加日期信息,如果是当天,可以用  update test set test.日期=date(),但添加的记录与文件名一样,是过去的某天,年份是今年,要怎样批量加到test中?
搜索更多相关主题的帖子: 处理 批量 test 日期 记录 
2021-05-03 07:43
radiofan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:466
专家分:696
注 册:2006-7-30
得分:1 
看不懂,啥意思
2021-05-03 14:21
sarge_xp
Rank: 2
等 级:论坛游民
帖 子:120
专家分:13
注 册:2006-4-30
得分:0 
回复 2楼 radiofan
各个文件是每日测体温数据,两个列,学生编号,体温,文件名是采集日期3.26日,以此类推
2021-05-03 22:14
zhousr
Rank: 2
等 级:论坛游民
威 望:1
帖 子:226
专家分:42
注 册:2019-3-8
得分:1 
没怎么看懂你的需求。是不是这意思:你每天采集的体温数据都是以日期命名的EXCEL表,现在要把所有这些EXCEL表的数据转换添加到test.dbf?
“要逐个记录加日期信息”,你在EXCEL表中把这项加进去以后再转成DBF不就可以了?
“各个文件是每日测体温数据,两个列”,这个文件是EXCEL文件还是DBF文件?
真是没看懂你的意思,无能为力
2021-05-03 23:40
sarge_xp
Rank: 2
等 级:论坛游民
帖 子:120
专家分:13
注 册:2006-4-30
得分:0 
以下是引用zhousr在2021-5-3 23:40:30的发言:

没怎么看懂你的需求。是不是这意思:你每天采集的体温数据都是以日期命名的EXCEL表,现在要把所有这些EXCEL表的数据转换添加到test.dbf?
“要逐个记录加日期信息”,你在EXCEL表中把这项加进去以后再转成DBF不就可以了?
“各个文件是每日测体温数据,两个列”,这个文件是EXCEL文件还是DBF文件?
真是没看懂你的意思,无能为力

已经给图了,难道没看出有EXCEL文件? 加记录没问题,加记录后刷个日期值出错

2021-05-04 05:39
radiofan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:466
专家分:696
注 册:2006-7-30
得分:5 
以下是引用sarge_xp在2021-5-3 07:43:41的发言:

数据采集后,要逐个记录加日期信息,如果是当天,可以用  update test set test.日期=date(),但添加的记录与文件名一样,是过去的某天,年份是今年,要怎样批量加到test中?


日期 = ctod(alltrim(str(year(date())))+"-"+left(文件名,2)+"-"+right(left(文件名,4),2))  &&不知猜的对不对
2021-05-04 07:42
gs2536785678
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:45
帖 子:565
专家分:1668
注 册:2017-7-16
得分:3 
确实不太理解作者思想,最好多发点图片
2021-05-04 08:18
瓜瓜1990
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:18
帖 子:125
专家分:699
注 册:2020-2-25
得分:4 
cdate=juststem()&&获取文件名
cmonth=left(cdate,2)&&月
cday=right(cdate,2)&&日
dd=date(YEAR(DATE()),VAL(cmonth),VAL(cday))&&日期信息
replace 日期 with dd all

piu~piu~
2021-05-04 08:51
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:2 
C1 = JUSTSTEM("a\0329.xls")
C2 = TRANSFORM(LEFT(DTOS(DATE()), 4) + C1, "@R 9999,99,99")
D1 = DATE(&C2)
? D1
简化:

SET DATE ANSI
SET MARK TO "-"
REPLACE 日期 WITH CTOD(TRANSFORM(LEFT(DTOS(DATE()), 4) + JUSTSTEM("a\0329.xls"), "@R 9999-99-99")) ALL

[此贴子已经被作者于2021-5-4 09:25编辑过]


坚守VFP最后的阵地
2021-05-04 08:59
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:2 
? CTOD(TRANSFORM(YEAR(DATE())) + "-" + STUFF(JUSTSTEM("a\0329.xls"), 3, 0, "-"))

坚守VFP最后的阵地
2021-05-04 09:29



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-505636-1-1.html




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

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