Jump to content

dúvida ao actualizar base de dados


Recommended Posts

NBatista

Boas!!!!

surgiu aqui um perqueno problema que é... quando eu acabo de gravar.. ele guarda bem... clico no botão escolher o ficheiro, faço a alteração e quando clico no botão actualizar ele diz que a connection string ja esta aberta....

esta aqui o código:

CN.ConnectionString = "Provider=MIcrosoft.Jet.OLEDB.4.0; Data source=C:\BandaGest PAP (PAP)\PAP.mdb"

CN.Open()

Dim str As String

str = "update [instumentos] set [Nome_instrumento]='" & nomeinstrumentotextbox.Text & "', [Referência]='" & referenciatextbox.Text & "', [Marca]='" & marcatextbox.Text & "', [Tonalidade]='" & tonalidadetextbox.Text & ""

Dim cmd As OleDbCommand = New OleDbCommand(str, CN)

Try

cmd.ExecuteNonQuery()

MsgBox("Registo alterado com sucesso!")

Catch ex As Exception

MsgBox("Erro na alteração do registo")

End Try

CN.Close()

Edited by NBatista
Link to post
Share on other sites
nelsonr

E não tens em lado nenhum do código a abrir a ligação e a não fechar?

Tenta verificar o estado da ligação antes de abrires (CN.State).

E o ficheiro não está aberto em exclusivo pelo Access?

Edited by nelsonr
Link to post
Share on other sites
nelsonr

NBatista, se queres ajuda convêm seres mais específico nas mensagens.

Poe la um breakpoint em cima da linha "CN.ConnectionString =..."

Quando parar, clicas com o botão direito do rato em cima do CN e fazes Quick Watch.

Na janela que abrir, procura a propriedade State e vê o que está lá

Link to post
Share on other sites
nelsonr

Pois, ai esta...

diz isto assim ---- CN.State Open {1} System.Data.ConnectionState -----

Agora tens é de ver em toda a aplicação onde o CN.Open é aberto, se está a fechar

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.