sql com mysql

ola estou fazendo um programa com asp e mysql esta dano o seguinte erro"O objeto não dá suporte para a propriedade ou método: 'eof'"o codigo:<%option explicit%><%Sub abreconn Set conn=server.CreateObject("ADODB.Connection") conn.connectionstring=_ "DRIVER={Mysql ODBC 3.51 driver};"& _ "SERVER=localhost;"& _ "DATABASE=paulo;"& _ "USER=root;"& _ "OPTION=3;" conn.Open()End subSub fechaconn conn.close Set conn= NothingEnd sub'-------------------------------------------------------carregar dadosdim conn, sql, rssql="select *from categoria"call abreconn()rs=conn.execute(sql)do while rs.eofresponse.write (rs("categoria"))response.Write("<br>")rs.nextloop%>