...

[interlokk 0]

Fala pessoal, estou tendo uma mensagem de erro que tá me quebrando a cabeça. o erro é o seguinte:

 

ADODB.Recordset error '800a0cb3'

 

Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype.

 

/bulletin/default.asp, line 212

 

A sequencia que tá gerando este erro é a seguinte:

 

==============================

OpenDB con

SQL = "SELECT * FROM tblBulletin WHERE fldCateID = " & intCate & " AND fldReplyID = -1 AND fldGroupID > 0 ORDER BY fldAuto DESC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open SQL,con,3,3

If rs.EOF Then

%>

<font color="red">Não há mensagens nesta categoria</font>

<%

Else

rs.PageSize = MaxMailNo

LastPage = rs.PageCount

rs.AbsolutePage = PageNo

for i = 1 to rs.PageSize

If IsNull(rs("fldFace")) OR rs("fldFace") = -1 Then

strFace = "-"

Else

strFace = "<img src=""images/face/" & rs("fldFace") & ".gif"">"

End If

=======================================

 

Se alguem tiver uma dica de como corrigir isso, eu fico muito grato. Valeu.

[interlokk 0]

ninguem sabe nada????

[rOcKLoCo 0]

provavelmente é o tipo de cursor setado... tente alterar... ok?falows

[Salgado 4]

Perguntinha básica, qual banco de dados?

 

 

 

Ah, e evite esse titulo de tópico, se possível use uma rápida descrição do problema nele.

[interlokk 0]

O banco é MySQL...Quanto ao cursor, já alterei e o erro continua.

[Salgado 4]

Se não me engano o MySQL não aceita muito bem paginação de RecordSet. Quem poderia falar melhor é o Bicicleta.

[victor 0]

Olá interlokk,Aonde está a variavel "PageNo"?

[interlokk 0]

A var pageno está definida como se segue:

 

PageNo=Request("PgNo") if PageNo="" then 	PageNo=1else	PageNo=cint(PageNo)end if

esse erro começou a ocorre quando eu fiz a seguinte alteração:

 

Onde tinhao seguinte que chama um db access:

 

Sub OpenDB (ByRef con)	strPhysicalPath = Server.Mappath(".")	strDBName = "banco.mdb"	Set con = Server.CreateObject("ADODB.Connection")	con.Open "DRIVER=Driver do Microsoft Access (*.mdb);UID=admin;UserCommitSync=Yes;Threads=3;SafeTransactions=0;PageTimeout=5;MaxScanRows=8;MaxBufferSize=2048;FIL=MS Access;DriverId=25;DefaultDir=" & strPhysicalPath & ";DBQ=" & strPhysicalPath & "\" & strDBNameEnd Sub

eu troquei pelo seguinte para ligar ao MySQL:

 

Sub OpenDB (ByRef con)	Set con = Server.CreateObject("ADODB.Connection")	con.Open "dsn=MyConn;uid=banco;pwd=12345678;"End Sub

A DSN está instalada e funcionando para outras conexões...

[Salgado 4]

Se não me engano o MySQL não aceita muito bem paginação de RecordSet. Quem poderia falar melhor é o Bicicleta.

___^

[interlokk 0]

então fica a solicitação: bicicleta cê pode dar uma mãozinha aqui????

[Mário Monteiro 179]

tente paginar usando LIMITE

 

veja se te ajuda

 

http://www.imasters.com.br/forum/index.php...=0entry276385

[interlokk 0]

Valeu a dica marioufpa, vou tentar! Abraços.

[Mário Monteiro 179]

Valeu a dica marioufpa, vou tentar! Abraços.

ok http://forum.imasters.com.br/public/style_emoticons/default/joia.gif