显示给定的开始和结束日期，所有日期

Question

我下面的代码获取2个日期

foreach records $get_times { 
     lassign $records start_date stop_date 
     puts [clock format [clock scan $start_date] \ 
      -format {%d %b}] 
     puts [clock format [clock scan $stop_date] \ 
      -format {%d %b}] 
} 

有没有一种方法，我可以显示所有start_tdate和stop_date之间的日期。 喜欢的东西：

puts "<tr><td>the $start_date</td>the next Date</td><td>....</td><td>the $stop_date</td>" 

Answer 1

你可以用用‘英语’的时间表，让你在找什么clock scan的能力。例如：

set start_ts [clock scan $start_date] 
set end_ts [clock scan $stop_date] 
for {set current $start_ts} {$current < $end_ts} {set current [clock scan "+1 day" -base $current} { 
    puts [clock format $current -format {%d %b}] 
} 

Answer 2

假设你的意思是你要打印起始日期和stop_date之间的每一天，我会用时钟在while循环添加。

set start_date [clock scan {2012-04-20 00:00:00} -format {%Y-%m-%d %H:%M:%S}] 
set stop_date [clock scan {2012-04-24 00:00:00} -format {%Y-%m-%d %H:%M:%S}] 
while {$start_date<$stop_date} { 
    set start_date [clock add $start_date 1 day] 
    puts $start_date 
}