我正在做一个Access&Asp网站
以下代码出现了问题

<%Set connect=Server.CreateObject("ADODB.connection")
Set rs = CreateObject("ADODB.Recordset")
dim s
connect.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(".\lanyadb.MDB") & ";Persist Security Info=False"
s="Select * from music_info where music_new=1 order by music_date desc"
rs=connect.execute(s)

Do

music=Trim(rs("music_chinese"))
picture="musiclib\" & Trim(rs("music_picture"))
file="musiclib\" & Trim(rs("music_file"))

%>
<tr><td><a href=<%=file%>>
<img border=0 src=<%=picture%> alt=<%=music%>></a>

<td><table width=100% border=0>

<tr><td><a href=<%=file%> target=_blank> <%=music%>

<%=Trim(rs("music_english"))%></a>

<td align=right>发行日期：20<%=Trim(rs("music_date"))%>

<tr>
<td colspan=2 align=center> 作曲：<%=Trim(rs("music_writer"))%>&nbsp;&nbsp; 演唱：<%=Trim(rs("music_actor"))%>

<tr><td colspan=2><%=rs("music_brief")%>

<tr><td colspan=2 align=right>出品：<%=Trim(rs("music_producer"))%>

</table>

<%
rs.movenext
Loop until rs.Eof

rs.Close
Set rs=Nothing

%>

调试时显示：

/lanya/musics_main.asp，行44

怎么回事啊，哥哥帮忙啊

你用rs.open sql,connect,1,1

谢谢斑竹
解决了
谢谢！！！！！！
kiss u