<%
function wd(d)
select case datepart("w",d)
case 1
wd1="星期日"
case 2
wd1="星期一"
case 3
wd1="星期二"
case 4
wd1="星期四"
case 5
wd1="星期五"
case 6
wd1="星期六"
end select
wd=wd1
end function
%>
像上面这样改下代码即可,注意红色部分