dim t
t=timevalue(time)
if t>6:00:00 and t <11:59:59 then
			response.write("Good Morning"&"<br/>")
			else
				if t>12:00:00 and t <17:59:59 then
				response.write("Good Afternoon"&"<br/>")
				else
					if t>18:00:00 and t <22:59:59 then
					response.write("Good Evening"&"<br/>")
					else
						if t>23:00:00 and t <5:59:59 then
						response.write("Good Grief Go To Sleep"&"<br/>")
						else
							response.write"<span style='color:red;'>Something is wrong<br/>"
					end if
				end if
			end if
		end if