<%
function black5(yy)
for i = 1 to 12
if weekday(yy&"-"&i&"-13")=4 then
yyTem = yyTem&yy&"-"&i&"-13|"
end if
next
yyTemLen = Len(yyTem) - 1
black5 = left(yyTem,yyTemLen)
end function
Response.Write(black5(1994))
%>
不用那么麻烦吧,只提供四位数年份就行了
对不起,但我没明白什么意思?!
什么语言?