呵呵这个问题呀给你个语音分时问候的例子看一看!!!
<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 %>
我有个改变背景音乐的例子,你看看合适否:
与index.asp相同的路径下有sound1.mid、sound2.mid、sound3.mid三个音乐文件,默认进入时播放sound1.mid文件。
<%
dim sound,filepath
sound=request("music")
if sound="" then sound="1" end if
filepath="sound&".mid"
response.write("<embed height='43' width='305' src='"&filepath&"'>")
%>