Pessoal bom dia estou com um problema. Quando tento salvar os dados de um combobox no access está dando erro como faço para salvar
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.OportunidadesTableAdapter.Insert(TXTDataCadastro.Text, TXTNoportunidade.Text, TXTNconvite.Text, TXTPrazo.Text, TXTStatus.Text, TXTDataapresentacao.Text, TXTTipooportunidade.Text, TXTCnpj.Text, TXTEstado.Text, TXTUnidadeoperacional.Text, TXTCidade.Text, TXTObjetodaoportunidade.Text, TXTObservacao.Text)
Me.OportunidadesTableAdapter.Update(DataSet1.Oportunidades)
MsgBox("Oportunidade Salva com Sucesso!")
Me.OportunidadesTableAdapter.Fill(Me.DataSet1.Oportunidades)
End Sub
Os combobox são: TXTStatus.text, TXTTipooportunidade.texr, TXTCnpj.text, TXTEstado.text.
Pergunta
cseal
Pessoal bom dia estou com um problema. Quando tento salvar os dados de um combobox no access está dando erro como faço para salvar
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.OportunidadesTableAdapter.Insert(TXTDataCadastro.Text, TXTNoportunidade.Text, TXTNconvite.Text, TXTPrazo.Text, TXTStatus.Text, TXTDataapresentacao.Text, TXTTipooportunidade.Text, TXTCnpj.Text, TXTEstado.Text, TXTUnidadeoperacional.Text, TXTCidade.Text, TXTObjetodaoportunidade.Text, TXTObservacao.Text)
Me.OportunidadesTableAdapter.Update(DataSet1.Oportunidades)
MsgBox("Oportunidade Salva com Sucesso!")
Me.OportunidadesTableAdapter.Fill(Me.DataSet1.Oportunidades)
End Sub
Os combobox são: TXTStatus.text, TXTTipooportunidade.texr, TXTCnpj.text, TXTEstado.text.
Grato
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.