日期字段如何写入未来一年的每天日期

wengjl 发布于 2021-01-13 09:40， 1779 次点击

我有一个表，每天增加一个空行，在日期字段手工输入日期后，再输入其他内容。
现在，我想要

表中一年的日期，用一个FOR循环，将一年日期先生成好，省得每天输日期
for i=1 to 365

这中间的写不出来

endfor
麻烦高手赐教！谢谢！

5 回复

wengjl2021-01-13 09:44

试成功了。给大家添麻烦了

sdta2021-01-13 10:37

create cursor tt (日期 D)
d1 = date(year(date()), 1, 1) - 1
for lnj = 1 to date(year(date()), 12, 31) - date(year(date()), 1, 1) + 1
d1 = d1 + 1
insert into tt values (d1)
endfor
browse

mywisdom882021-01-13 12:54

以下是引用wengjl在2021-1-13 09:44:33的发言：

试成功了。给大家添麻烦了

VFP的日期，可以直接相加的，怎么要这么麻烦那。。。
?DATE() && 01/13/2021
?DATE()+365 && 01/13/2022

hu9jj2021-01-13 20:15

date = date+1 就行。

wengjl2021-01-14 08:01

谢谢谢谢！