Notifications
Clear all

Erro em tempo de execuçao

2 Posts
1 Usuários
0 Reactions
961 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite.

Eu tenho uma macro que faz uma consultar a uma view em um banco de dados SQL, o problema é que a consulta é pesada e demora um pouco, só que o excel não espera e dá erro em tempo de execução.
Então eu gostaria de saber se eu consigo aumentar o tempo ou desativar este erro.

 
Postado : 17/11/2010 6:21 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Resolvido

Dim DBConexao As ADODB.Connection, objResposta, strConsulta
Set BDConexao = New ADODB.Connection

BDConexao.CommandTimeout = 120

O CommandTimeout padrão do sistema é 30 segundos, com o comando acima foi alterado para 120 segundos.

 
Postado : 18/11/2010 9:11 am