problemas em paginacao

[kaplan 0]

galera eu hospedava o meu site em um servidor e fiz uma paginação, ae eu mudei de servidor colocari no host location minha paginação começou a dar erros oolha o codigo...

 

'faço o selectSql = "Select * From Anuncio_Dados"'Faço o comando para o recordsetSet Rs = Server.CreateObject("ADODB.Recordset")'Começo a fazer a paginação esta parte eu vou colocar depois da query e antes do meu loopif Rs.state = 1 then Rs.close   Rs.Open Sql,conn,3,3   'Verifico sem tem registro   if not Rs.EOF then	   Rs.PageSize = 10 'Quantidade de registros por pagina	   IF Request.QueryString("pag")="" then 		   intpag = 1 		   p_inicial = 1	   Else		   IF cint(Request.QueryString("pag"))<1 then			   intpag = 1			   p_inicial = 1 		   Else			   IF cint(Request.QueryString("pag")) > Rs.PageCount then 					 intpag = dados.PageCount 				   p_inicial = 1			   Else				   intpag=Request.QueryString("pag")			   End If		   End If	   End If	   Rs.AbsolutePage = intpag	   intrec=0	   'Faço o Loop parte 2	   While intrec < Rs.PageSize and not Rs.EOF		  Response.Write(Rs("CodAnuncio") & "<br>")		  Rs.MoveNext 		  intrec=intrec+1		  	   Wend

Esta é a parte do começo dele e ele esta dando confilto nesta linha

 

Rs.AbsolutePage = intpag

Erro:

 

ADODB.Recordset (0x800A0CB3)O conjunto de registros atual não oferece suporte para indicadores. Isso pode ser uma limitação do provedor ou do tipo de cursor selecionado.

o que sera que pode ser, problema é que no outro servidor funcionava.....

[Wallcrawler 0]

Qual o banco que você está usando?

[kaplan 0]

sql server mais ja deu certo eu mudei esta configuração aqui:

 

Rs.Open Sql,conn,3,1