<html>
<head>
<title>问候页面</title>
</head>
<body>
<script language="VBScript">
if Time<=#12:00:00# And Time>#06:00:00# then
msgbox "早上好！"
elseif Time<=#15:00:00# And Time>#12:00:00# then
msgbox "中午好！"
elseif Time<=#19:00:00# And Time>#15:00:00# then
msgbox "下午好！"
elseif Time<#23:00:00# And Time>#19:00:00# then
msgbox "晚上好！"
else
msgbox "太晚了，该休息了！ "
end if
</script>
</body>
</html>