Pessoal,

 

Estou utilizando o seguinte código para abrir a conexao com o BD:

 

With Cnn

Cnn.Provider = "AsaProv"
Cnn.ConnectionTimeout = 0.2
Cnn.CommandTimeout = 0.2
Cnn.ConnectionString = "Data Source = scop;" & _
                           "User Id= dba;" & _
                           "Password = scopsao;" & _
                           "Eng=scop;" & _
                           "DBN=SCOP;" & _
                           "Commlinks=tcpip"

Cnn.Open

 

No formulário de login ele faz a verificação do usuário e senha corretamente no banco de dados mas quando vou abrir algum recordset ele da a mensagem abaixo:

 "The connection cannot be used to perform this operation. It is either closed or invalid in this context."

 

O que significa e o que estou fazendo de errado?

 

Abaixo esta o código que estou utilizando para abrir o recordset:

 

Private Sub Form_Load()

 

sql = "select * from tbl_op_ocorrencias order by cod_ocorr"

rsOcorr.Open sql, Cnn, adOpenStatic, adLockPessimistic

With rsOcorr
    If .EOF = True Then
        LimpaCampos
    Else
        .MoveMin
        ExibeOcorr
    End If
End With

End Sub

 

Ocorre esta mensagem em negrito e marca a linha em que estou abrindo o recordset.

 

Por favor, me ajudem!!!

 

Grato pela atenção de todos.

 

André