consultas assíncronas para deixar o programa responsivo

Bom dia, Estou tentando fazer o programa funcionar com o SQL server por ODBC

Estou pesquisando como fazer consultas assíncronas. Está difícil de achar no Google e pesquisando aqui no forum as palavras async e responsivo não retornaram muita coisa.

Nesta página da Microsoft Database.Execute - MS Access diz que posso usar o argumento dbRunAsync mas dá erro quando coloco no código:

Código:

   Dim db As DAO.Database
    Set db = CurrentDb
    db.Execute query, dbRunAsync
    Set db = Nothing

Sendo que usando dbSeeChanges funciona, mas não é assíncrono e está deixando o programa todo travado por uns 30 segundos dependendo da query

Código:

   Debug.Print query
    Dim db As DAO.Database
    Set db = CurrentDb
    db.Execute query, dbSeeChanges
    Set db = Nothing

Nilson, boa tarde.
Conformando: "responsivo" você está querendo dizer não bloquear a tela enquanto executa a conexão/operação no banco de dados, executando de forma assíncrona é isso?

Nunca usei esse recurso no Access, mas pelo o pouco que vi, não basta chamar a conexão como você passou.
Tem que realizar a ligação direta independe de ODBC instalado, utilizando ODBCDirect (também nunca usei).
Nesse arquido da Microsoft, mostra como converte uma coxão padrão do Access a ODBCDirect. Clique aqui.

Boa tare
Como vai a solução?

Boa tarde

Alexandre Neves escreveu:Boa tare
Como vai a solução?

Andei pesquisando bastante como usar esse ODBCDirect sem sucesso, mas parei porque apareceram outros problemas para resolver, mas assim que eu resolver tudo vou voltar a pesquisar.
Neste meio tempo a pergunta permanece.

Uma alternativa que andei pesquisando também foi migrar de linguagem, pois tem outras que são mais fáceis de se usar eventos assíncronos.