ERROR 3709

AMARCOS2611 14/02/2015 21:25:45
#444521
A conexão não pode ser usada para realizar esta operação , ela está fechada ou é inválida neste contexto.

Sub wabrirtabela()
wsql = [Ô]select * from TbPonto[Ô] [ô]Selecionar tabela
wtabela.CursorLocation = adUseClient
wtabela.Open wsql, wbanco, adOpenKeyset, adLockOptimistic, adCmdText >>> Erro esta nesta linha.
End Sub

Obrigado deste já para quem me ajudar.
OMAR2011 14/02/2015 22:46:06
#444523
Resposta escolhida
Sub wabrirtabela()
wsql = [Ô]select * from TbPonto[Ô] [ô]Selecionar tabela
wtabela.CursorLocation = adUseClient
wtabela.Open wsql, [txt-color=#e80000]wbanco[/txt-color], adOpenKeyset, adLockOptimistic, adCmdText
End Sub

Para mim o erro está no selecionado de vermelho.
Não mostrou como o banco e aberto.
Tópico encerrado , respostas não são mais permitidas