Bom dia Pessoal...estou com um erro que esta me irritando..rs...

 

Criei uma conexao no vb (ado) no data enviroment com tabelas consultas, coloquei estas linhas em botao command...quando executo a promeira vez ele funciona, mas na segunda ocorre um erro, tenho que sair do sistema para funcionar....

 

A linha de comando é a seguinte:

 

        If CnnCardex.ArqCardex.State = 1 Then CnnCardex.ArqCardex.Close
        CnnCardex.ArqCardex.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & vCaminho & "" & "NOTA.MDB;Persist Security Info=False"
        CnnCardex.ArqCardex.CursorLocation = adUseClient
        CnnCardex.ArqCardex.Open
        
        CnnCardex.Commands(1).Execute

 

O erro que dá é "Erro 3709" , "A conexao nao pode ser usada para realizar esta operação. Ela esta fechada ou é invalida neste contexto"

 

O que pode ser? me ajudem please....