ASP實現語音分時問候

<bgsound src="wen.mid" loop="0">
<% dim weh
If Time >=#1:00:00 AM# And Time < #6:00:00 PM#  Then
  weh = "<bgsound src="1.mid" loop="0">"
Else  If Time >#6:00:00 AM# And Time < #9:00:00 PM#
  weh = "<bgsound src="2.mid" loop="0">"
 Else  If Time >#9:00:00 AM# And Time < #12:00:00 PM#
  weh = "<bgsound src="3.mid" loop="0">"
Else  If Time >#12:00:00 AM# And Time < #14:00:00 PM#
  weh = "<bgsound src="4.mid" loop="0">"
Else  If Time >=#14:00:00 AM# And Time < #17:00:00 PM#
  weh = "<bgsound src="4.mid" loop="0">"
Else  If Time >=#17:00:00 AM# And Time < #19:00:00 PM#
  weh = "<bgsound src="5.mid" loop="0">"
Else  If Time >=#19:00:00 AM# And Time < #24:00:00 PM#
  weh = "<bgsound src="6.mid" loop="0">"
End If
%>
<%=wen %>

上面的 X.MID 是的問候語音