这是我写的一段代码
<%set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("bbs.mdb") exec="select * from Details where Levels=1 order by DataAndTime desc" set rs=server.createobject("adodb.recordset") rs.open exec,conn,1,1
'rs.absolutepage=1 分页功能待完善
if not rs.eof then response.Write "<ul>" do while not rs.eof and rowcount>0 response.write "<li>" response.Write (rs.("Title")) 'response.Write "<a href='showarticle.asp?Title="& rs.("Title")&"'><font color="& rs.("color") &">"& rs.("Title") &"</font></a>" response.Write "</li>" rs.movenext rowcount=rowcount-1 loop response.Write"</ul>" end if
rs.close set rs=nothing conn.close set conn=nothing %>
IE提示
缺少标识符
/blue/list.asp,行22
response.Write (rs.("Title"))
请问怎么修改?