[Resolvido] Como aplicar cursor 3 neste código

Olá pessoal estou dando este select dentro de outro mas como o banco é MYSQL preciso do cursor 3 no 1º ja esta mas neste nao estou conseguindo

OBS: o 1º é com paginação por isso não copiei do mesmo.

<%
Call abre_conexao1(ConnString,Conn)

categ = RS("categoria")

sql = "SELECT * FROM categoria where id="&categ&""
Set RScateg = Conn.Execute(sql)

do until RScateg.eof

%>

<%= RScateg("categoria")%>

<%
RScateg.movenext
loop

RScateg.Close
Set RScateg = Nothing

Call fecha_conexao1()
%>