Que Erro é Esse No Vb?!

[Guest dah]

Bem..quando salvo um registro no Access com o comando : Co.Execute "Insert into .........................

e logo depois Carrego qualquer registro na mesma tela com o comando: Rs.Open "SELECT * FROM .......

Me aparece o erro: "Operação não permitada quando o objeto esta aberto"

Como consertar isso ?

[AlexMunhoz]

Bem..quando salvo um registro no Access com o comando : Co.Execute "Insert into .........................

e logo depois Carrego qualquer registro na mesma tela com o comando: Rs.Open "SELECT * FROM .......

Me aparece o erro: "Operação não permitada quando o objeto esta aberto"

Como consertar isso ?

bom, se voce está utilizando o metodo execute do objeto connection, a operação do select não tem vinculo com o comando de cadastro. Portanto você deve estar prendento a operação com um select anterior...

verifique se não tem nenhum select antes.. caso tenha feche-o se não tem esperimente colocar um rs.close antes do proximo select... ;)

abraço....

[ToPronto N'Area]

Olha velhinho eu trabalho assim.

em uma module eu faço as declarações e codigo de abertura e de fechamento.

Public Cnn As New ADODB.Connection

Public rst As New ADODB.Recordset

Public Function AbreConexao()

'Criando uma instância do objeto Connection

Cnn.Open "provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Metta;Data Source=adriano\sqlexpress;"

End Function

Public Function FecharConexao()

Cnn.Close

End Function

Public Sub verifica_rs()

If rst.State = 1 Then rst.Close

End Sub

esta função verifica_rs ela ve se o rs esta aberto se estiver ele fecha caso contrario ele continua na ação!

então tu coloca ele sempre antes de chamar um rst.open

saca