• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

debliu

Eliminar atraves de combobox

4 mensagens neste tópico

Oi,

tenho uma combobox que liga a uma tabela em Access assim:

Try

            Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\canigestdatabase.mdb;"

            Using connection As New OleDbConnection(connString)

                Dim SQL As String = "SELECT * FROM Cãodb "

                Dim da As New OleDbDataAdapter(SQL, connection)

                Dim ds As New DataSet

                'da.SelectCommand.Parameters.Add("activo", OleDbType.Boolean).Value = True

                With Me.cmbxeliminar

                    da.Fill(ds)

                    .DisplayMember = "NIU"

                    '               

                    .DataSource = ds.Tables(0).DefaultView

                    .DropDownStyle = ComboBoxStyle.DropDown

                    .AutoCompleteMode = AutoCompleteMode.Suggest

                    .AutoCompleteSource = AutoCompleteSource.ListItems

                End With

                Me.cmbxeliminar.SelectedIndex = -1

            End Using

        Catch ex As Exception

            MessageBox.Show(ex.Message, My.Application.Info.Title, MessageBoxButtons.OK, MessageBoxIcon.Error)

        End Try

agora o que eu queria era apagar da tabela a linha que tenha o parametro selecionado na tabela...

alguem???  :wallbash:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

agora o que eu queria era apagar da tabela a linha que tenha o parametro selecionado na tabela...

Explica lá isto!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ele quer seleccionar um elemento da combobox e dps apagar, na tabela, a linha da correspontente a esse elemento.

Por exemplo: Escolher o cliente 12345 na combobox e o programa ir à tabela apagar todos os dados desse cliente.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Tenta assim.. Não tenho a certesa de funciona.

sql1 = "delete from produtos WHERE cod_prod = " & ListBox1.GetItemText(ListBox1.Items.Item(ListBox1.SelectedIndex)) & ";"

                dataAdapter1.DeleteCommand = New MySql.Data.MySqlClient.MySqlCommand(sql1, connection1)

                connection1.Open()
                dataAdapter1.DeleteCommand.ExecuteNonQuery()
                connection1.Close()

Espero ter ajudado

0

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