ERROR 06?

USUARIO.EXCLUIDOS 26/05/2004 19:24:17
#26831 Resposta escolhida

Tamanini, defina as variáveis de forma explícita, tipo dim objBanco as DAO.Database, para evitar conflito com objetos de outras bibliotecas, e na hora de instanciar, utilize o DBEngine como prefixo, tipo, Set oBanco = DBEngine.OpenDatabase(Variável, Parà¢metro1, Parà¢metro2, Parà¢metro3). E utilize explicitamente os parà¢metros da abertura do banco de dados, porque ás vezes a versão de DAO de um sistema é diferente da versão de outro, mesmo que seja pouca diferença, pode dar confusão. Ao abrir a base de dados também, o nome dessa base pode estar sendo referenciado por alguma outra rotina em memória ou ser uma fonte ODBC e isso gera o erro que você fala, porque o DAO tenta abrir por meio do ODBC e o ODBC chama o DAO de volta, num ciclo que gera o overflow. Veja se não tem nenhuma base de dados ODBC com esse nome instalada. Se tiver, dê preferência pelo uso do ADO, porque ao utilizar o DAO com ODBC, o risco de corromper a base é maior. Além da memória gasta, que pode ser o seu problema.
Você diz que funciona em outras máquinas, portanto não é a rotina mesmo que tem erro. A dedução mais simples é que seja mesmo um ODBC que foi criado e esquecido por aí, ou outra rotina que abra a base de dados e esteja mal finalizada, não fechando a conexão, como uma página web por exemplo. Ou as duas coisas.