问个asp 白痴编辑问题

发布于 2008-06-03 17:55， 449 次点击

<body>
<script language="vbscript" runat="server">
dim a
a=now()
select case a
case a<"12:00"or a>"0:00"
response.Write "早上好"
case a>"12:00"
response.Write "啊好"
case a<"12:00" or a>"18:00"
response.Write "下午好"
case a<"18:00" or a>"0:00"
response.write "晚上好"
End select
</script>
</body>
为什么调试不出来啊

4 回复

tianyu1232008-06-03 18:03

select case a

case b '这里的b只能是与a是否匹配的字符串或数字等，不能用判断表达式

end select

yms1232008-06-03 18:22

adsdomain2008-06-03 18:35

<%
dim a
a=hour(time)
Response.Write a
select case a
case a<"12:00"or a>"0:00"
response.Write "早上好"
case a>"12:00"
response.Write "啊好"
case a<"12:00" or a>"18:00"
response.Write "下午好"
case a<"18:00" or a>"0:00"
response.write "晚上好"
End select

%>

ilovey42008-06-03 19:07

[bo][un]yms123[/un] 在 2008-6-3 18:22 的发言：[/bo]

dim a
a=Hour(Now)
IF a0 Then
   response.Write "早上好"
ElseIF a=12 Then
   response.Write "中午好"
ElseIF a12 Then
   response.Write "下午好"
ElseIF a0 or a>18 Then
   response.write "晚 ...

学习了