Mudei para MySQL e ADO, mas tb tá muito lento!!!
Talvez eu esteja aplicando o código errado.
Ex: Estou em um Do While.
Do while ???
rstCORTE.Open "select max(codigoco) from cortesca where codigrua='" & vapCORUA & "'and
codigoid='" & vapCODID & "'", db_CORTE, adOpenStatic, adLockOptimistic, adCmdText
If rstCORTE.RecordCount = 1 Then
???
endif
rstCORTE.close
'proximo
Loop
No meio do Do While, abro e fecho uma recordset. Está certo? Este é o procedimento? Caso contrário dá um erro, avisando que já está aberto.
Está extremamente lento o processo. Será melhor usar o FireBird?