我测试的可以:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<%
zr=WeekdayName(Weekday(Date))
if zr="星期一" then
response.write"张一 手机:13811111111"
elseif zr="星期二" then
response.write"李二 手机:13822222222"
elseif zr="星期三" then
response.write"李三 手机:13833333333"
elseif zr="星期四" then
response.write"李四 手机:13844444444"
elseif zr="星期五" then
response.write"李五 手机:13855555555"
elseif zr="星期六" then
response.write"李六 手机:13866666666"
else
response.write"王七 手机:13877777777"
end if
%>
</body>
</html>