帮忙写个判断,我不会asp!

[daw020]

是这样的我 要写一个背景音乐的判断

如果要打开或者关闭背景音乐就刷新一下页面

做个按钮或者链接来传值
music=1的时候 北京那个音乐开启
music=0的时候 背景音乐关闭
关闭时候就不执行下面这句
<bgsound src="bgsound.mid" loop="-1"/>
然后值下一页也有效 应该用session

因为是写wap上用的,所以不支持脚本,用判断应该可以实现

[daw020]

<%
getmusic=request("music")
if getmusic="" then
getmusic="1"
end if
session("wap_music")=getmusic
if session("wap_music")="1" then
%>
<bgsound src="bgsound.mid" id=aa loop=-1>
<%
end if
%>

<a href="uniwap.asp?music=0">关闭音乐</a>
<a href="uniwap.asp?music=1">开启音乐</a>

我是这么写的 不知道有没更好的办法

[daw020]

我说错了 应该是尽量不用JAVA脚本

[daw020]

<%
bgsoundsurpport = "true"
if bgsoundsurpport = "true" then
if trim(request("bgsound"))="on" then
response.write "<bgsound src="&"""bgsound.mid"""&">"
response.write "<a href="""&request("HTTP_REFERER")&"&bgsound=off"""&">关闭背景音乐</a>"
session("sound")="on"
elseif trim(request("bgsound"))="off" then
response.write "<a href="""&request("HTTP_REFERER")&"&bgsound=on"""&">打开背景音乐</a>"
session("sound")="off"
elseif session("sound")="off" then
response.write "<a href="""&request("HTTP_REFERER")&"&bgsound=on"""&">打开背景音乐</a>"
elseif session("sound")="on" then
response.write "<bgsound src="&"""bgsound.mid"""&">"
response.write "<a href="""&request("HTTP_REFERER")&"&bgsound=off"""&">关闭背景音乐</a>"
elseif trim(request("bgsound"))="" and session("sound")="" then
response.write "<bgsound src="&"""bgsound.mid"""&">"
response.write "<a href="""&request("HTTP_REFERER")&"&bgsound=off"""&">关闭背景音乐</a>"
session("sound")="on"
end if
else
end if
%>

换这个了 现在的问题是 点击关闭之后 刷新页面没有出现"开启背景音乐"的链接

[yjbnew]

太参了，邦定

[daw020]

<%
c_url=left(request.ServerVariables("URL"),instr(request.ServerVariables("URL"),"?")-1)
bgsoundsurpport = "true"
if bgsoundsurpport = "true" then
if trim(request("bgsound"))="on" then
response.write "<bgsound src="&"""bgsound.mid"""&">"
response.write "<a href="""&c_url&"?bgsound=off"""&">关闭</a>"
session("sound")="on"
elseif trim(request("bgsound"))="off" then
response.write "<a href="""&c_url&"?bgsound=on"""&">开启</a>"
session("sound")="off"
elseif session("sound")="off" then
response.write "<a href="""&c_url&"?bgsound=on"""&">开启</a>"
elseif session("sound")="on" then
response.write "<bgsound src="&"""bgsound.mid"""&">"
response.write "<a href="""&c_url&"?bgsound=off"""&">关闭</a>"
elseif trim(request("bgsound"))="" and session("sound")="" then
response.write "<bgsound src="&"""bgsound.mid"""&">"
response.write "<a href="""&c_url&"?bgsound=off"""&">关闭</a>"
session("sound")="on"
end if
else
end if
%>

换这样
取的地址对了
不过调试之后出错

Microsoft VBScript 运行时错误 错误 '800a0005'

无效的过程调用或参数: 'left'

[jkx01whg]

ding

[一笑拔剑]

不支持脚本什么意思?
不用脚本纯用html?

[FIREGUNS]

靠，好多判断啊。
用select case不好么？