Gente é o seguinte, estou tentando aprender a trabalhar com uma conexão ADO, agora estou tentando fazer uma consulta por codigo, tá o que acontece é o seguinte eu tenho um botão que chama um input box aonde eu informo o código de quem estou procurando, até ai tudo bem mas neste input box estou passando como parâmetro para a minha função de consulta o número que foi digitado quando debugo acontece o seguinte:
Public Function Consultar(ByVal IntCodigo As Integer) As Variant
Set Rs = CreateObject("ADODB.Recordset")
With Rs
.Open "select * from Pessoal where Codigo = " & IntCodigo & "", Cnn, adOpenKeyset, adLockOptimistic
Quando chega no .Open acontece e seguinte mensagem:
"The connection cannot be used to perform this operation. It is either closed or invalid in this context."
Pergunta
Guest - Rafael Portal -
Gente é o seguinte, estou tentando aprender a trabalhar com uma conexão ADO, agora estou tentando fazer uma consulta por codigo, tá o que acontece é o seguinte eu tenho um botão que chama um input box aonde eu informo o código de quem estou procurando, até ai tudo bem mas neste input box estou passando como parâmetro para a minha função de consulta o número que foi digitado quando debugo acontece o seguinte:
Public Function Consultar(ByVal IntCodigo As Integer) As Variant
Set Rs = CreateObject("ADODB.Recordset")
With Rs
.Open "select * from Pessoal where Codigo = " & IntCodigo & "", Cnn, adOpenKeyset, adLockOptimistic
Quando chega no .Open acontece e seguinte mensagem:
"The connection cannot be used to perform this operation. It is either closed or invalid in this context."
Alguém sabe me dizer o que está acontecendo??
Muito agradecido.
Rafael Portal
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.