大家帮我看看这段asp代码，那里出错了！

汗~

由于我复制了程序中一个文件下载功能，自己制作一个音乐下载功能！

音乐功能已经做的差不多好了！

但是后台的广告管理，却有一代码错了！

但是我也只是复制文件功能一段代码的啊，还修改了一些东西，但是还是出错了！

提示为：

代码是：

<!-- #include file="conn.asp" -->
<!-- #include file="admin.asp" -->
<%Call Head()%>
<card title="广告管理中心"><p>
<%
IF KEY<>0 then
Call Error("你的权限不足！")
end if
response.write"<a href=""admin_go.asp?TP=1&amp;sid="&sid&""">1.主站页面广告</a>"
dim adset1name
if adsetkf("ads1")=1 then
adset1name="显示"
else
adset1name="不显示"
end if

response.write"<br/>状态:固定显示"

response.write"<br/><a href=""admin_go.asp?TP=2&amp;sid="&sid&""">2.社区页面广告</a>"

dim adset2name
if adsetkf("ads2")=1 then
adset2name="显示"
else
adset2name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=2&amp;sid="&sid&""">"&adset2name&"</a>"

response.write"<br/><a href=""admin_go.asp?TP=3&amp;sid="&sid&""">3.文件栏目广告</a>"

dim adset3name
if adsetkf("ads3")=1 then
adset3name="显示"
else
adset3name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=3&amp;sid="&sid&""">"&adset3name&"</a>"

response.write"<br/><a href=""admin_go.asp?TP=4&amp;sid="&sid&""">4.文章栏目广告</a>"
dim adset4name
if adsetkf("ads4")=1 then
adset4name="显示"
else
adset4name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=4&amp;sid="&sid&""">"&adset4name&"</a>"

response.write"<br/><a href=""admin_go.asp?TP=5&amp;sid="&sid&""">5.图片栏目广告</a><br/>"
dim adset5name
if adsetkf("ads5")=1 then
adset5name="显示"
else
adset5name="不显示"
end if
response.write"状态:<a href=""adcase.asp?TP=5&amp;sid="&sid&""">"&adset5name&"</a><br/>"

response.write"<br/><a href=""admin_go.asp?TP=6&amp;sid="&sid&""">6.音乐栏目广告</a>"

dim adset6name
if adsetkf("ads6")=1 then
adset6name="显示"
else
adset6name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=6&amp;sid="&sid&""">"&adset6name&"</a>"

response.write"<a href=""enter/adminads.asp?sid="&sid&""">[点广告送币系统]</a><br/>"&chr(13)
response.write"------------<br/>"&chr(13)
response.write"<a href='index.asp?sid="&sid&"'>[后台管理]</a>"
conn.close
set conn=nothing
%><br/>
报时: <%=String(2-Len(hour(now)),"0") & hour(now) %>:<%=String(2-len(minute(now)),"0") & minute(now) %>
</p></card></wml>

地址是： http://xyq163.kongse.com/admin/admingo.asp?sid=e0e5cd0490d4ec97c323f8ebf10168c0

请用wap浏览器浏览！

wap在线浏览器地址是： http://www.ggg.cn/MaxEwb.htm

麻烦高手看看！

在数据库新增“ads7”列名，原因ads6数据库本来就有ads6列，但是是用于其它的！