BUG? BUG! 还是什么……
我调用的时候<%Call ShowDate(A,2,2,2)%>却取不出StrTmp的值。怪事了。 昨天晚上写的时候还没问题。今天调用时候却只有YYMMDD的值了。
sub ShowDate(strTmp,strBegin,defauYear,defauMonth)
BeginYear=year(date)-strBegin
defauYear=year(date)-defauYear
response.write "<select name='"&strTmp&"yy'>"
for i=0 to strBegin
response.write "<option value='"&BeginYear+i&"'"
if defauYear=BeginYear+i then response.write " selected"
response.write ">"&BeginYear+i&"</option>"
next
response.write "</select><select name='"&strTmp&"mm'>"
for i=1 to 12
response.write " <option value='"&i&"'"
if defauMonth=i then response.write " selected"
response.write ">"&i&"</option>"
next
response.write "</select><select name='"&strTmp&"dd'>"
for i=1 to 31
response.write " <option value='"&i&"'"
if i=day(now) then response.write " selected"
response.write ">"&i&"</option>"
next
response.write "</select>"
response.write strtmp
end sub