ASP實現語音分時問候

  <% 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 是的問候語音