Ir para o conteúdo
mariogx

Inserir dados em acsses a partir de vb 2005

Mensagens Recomendadas

mariogx    0
mariogx

Boas!!!!

Tou k problemas a inserir dados na base de dados a partir du vb 2005...

o erro encontra-se no comando executenonquery..

o erro é o seguinte: ExecuteNonQuery: Connection property has not been initialized.

o código é este:

Imports System.Data.OleDb

______________________________________________________________________________________________

Public Class NaoDocentes

    Dim ds1 As New DataSet()

    Dim ligação As New OleDbConnection("Provider =Microsoft.Jet.OLEDB.4.0;data source =dados.mdb")

...

...

...

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'inserir dados

Dim valor As Integer

ligação.Open() 'abrir a ligação

Dim sql As New OleDbCommand("insert into doc(ID,Nome,Gabinete,Extensão,Telefone,DS,User,Pass) values('" & txtid.Text & "','" & txtnome.Text & "','" & txtgab.Text & "','" & txtex.Text & "','" & txttel.Text & "','" & combods.SelectedValue & "','" & txtuser.Text & "','" & txtpass.Text & "'")

valor = sql.ExecuteNonQuery()

ligação.Close() 'fechar a ligação

End Sub

HELP ME!!!

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
perdido_e_sozinho    0
perdido_e_sozinho

Boas!!!!

Tou k problemas a inserir dados na base de dados a partir du vb 2005...

o erro encontra-se no comando executenonquery..

o erro é o seguinte: ExecuteNonQuery: Connection property has not been initialized.

o código é este:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'inserir dados

Dim valor As Integer

ligação.Open() 'abrir a ligação

Dim sql As New OleDbCommand("insert into doc(ID,Nome,Gabinete,Extensão,Telefone,DS,User,Pass) values('" & txtid.Text & "','" & txtnome.Text & "','" & txtgab.Text & "','" & txtex.Text & "','" & txttel.Text & "','" & combods.SelectedValue & "','" & txtuser.Text & "','" & txtpass.Text & "'")

valor = sql.ExecuteNonQuery()

ligação.Close() 'fechar a ligação

End Sub

HELP ME!!!

Não incluiste o código para a ligação ao access, pelo que não permite dar-mos grande ajuda.

Outro conselho não user ~ e ç em nomes de variáveis.

Existe um artigo na revista que talvez te seja útil, que te ajudará a melhorar o teu código.

Com os melhores cumprimentos,

Sérgio Matias

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
mariogx    0
mariogx

Boas!!!!

Tou k problemas a inserir dados na base de dados a partir du vb 2005...

o erro encontra-se no comando executenonquery..

o erro é o seguinte: ExecuteNonQuery: Connection property has not been initialized.

o código é este:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'inserir dados

Dim valor As Integer

ligação.Open() 'abrir a ligação

Dim sql As New OleDbCommand("insert into doc(ID,Nome,Gabinete,Extensão,Telefone,DS,User,Pass) values('" & txtid.Text & "','" & txtnome.Text & "','" & txtgab.Text & "','" & txtex.Text & "','" & txttel.Text & "','" & combods.SelectedValue & "','" & txtuser.Text & "','" & txtpass.Text & "'")

valor = sql.ExecuteNonQuery()

ligação.Close() 'fechar a ligação

End Sub

HELP ME!!!

Não incluiste o código para a ligação ao access, pelo que não permite dar-mos grande ajuda.

Outro conselho não user ~ e ç em nomes de variáveis.

Existe um artigo na revista que talvez te seja útil, que te ajudará a melhorar o teu código.

Com os melhores cumprimentos,

Sérgio Matias

Ja acrecentei a parte de ligação à basa de dados..assim ja ksgs ajudar.me?? :P

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade