海航 巴西航线:帮我看看这段代码，哪里错了？

调试的时候老提示下面这行:

rs.Open "select * from musiclist",conn,1,1

ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。

<form action=delmusic.asp?action=delmusic method=post name=delmusic>
<%
dim songname,singer,special,adddate,rs,k,i,x
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from musiclist",conn,1,1
songname=rs("songname")
singer=rs("singer")
adddate=rs("adddate")
special=rs("adddate")
x=rs.recordcount
do while not rs.eof
for i=1 to x
%>

<tr>
<td width="47"><p align="center"><span style="font-size: 9pt"><%=i%></span>
</td>
<td width="7"><span style="font-size: 9pt"> </span></td>
<td width="161"><span style="font-size: 9pt"><%=songname%></span></td>
<td width="11"><span style="font-size: 9pt"> </span></td>
<td width="95"><span style="font-size: 9pt"><%=singer%> </span></td>
<td width="9"><span style="font-size: 9pt"> </span></td>
<td width="98"><span style="font-size: 9pt"> <%=special%></span></td>
<td width="11"><span style="font-size: 9pt"> </span></td>
<td width="92"><span style="font-size: 9pt"> <%=adddate%></span></td>
<td width="8"><span style="font-size: 9pt"> </span></td>
<td width="42">
<p align="center"><input type="checkbox" name="C1" value="ON"></form>
</td>
</tr>
<%
next
loop%>
</from>
哦.知道了
原来我忘记加<!--#include file="conn.asp"-->这行了

但是又有一个新的问题:
错误类型：

Response 对象, ASP 0104 (0x80070057)
不允许操作

是什么出错了吗?