FILTAR ERRO SQL

ZIMIRO 30/11/2012 16:54:53
#415192
olá montei codigo para trazer resultados e comandos sql

mais quando da update ou delete, ele da erro porque não carrega nada no datagrid

alguém pode me ajudar a filtrar esse erro

do delete e update


   If recebebanco = [Ô][Ô] Then
            MsgBox([Ô]Você não deu o nome do banco de dados, a ser conectado![Ô], vbInformation, [Ô]Aviso[Ô])
            frmaddbanco.Show()
        Else
            If MemoEdit1.Text = [Ô][Ô] Then
                MsgBox([Ô]Digito um comando sql ou query[Ô], vbInformation, [Ô]Aviso[Ô])
            Else
                Try


                    Dim connectionString As String = [Ô]Network Library=DBMSSOCN;Data Source=ip:porta;Initial Catalog=[Ô] + recebebanco + [Ô];User ID=sa;Password=senha[Ô]
                    Dim sql As String = MemoEdit1.Text
                    Dim connection As New SqlConnection(connectionString)
                    Dim dataadapter As New SqlDataAdapter(sql, connection)
                    Dim ds As New DataSet()
                    connection.Open()
                    dataadapter.Fill(ds, [Ô]Authors_table[Ô])
                    connection.Close()
                    DataGridView1.DataSource = ds
                    DataGridView1.DataMember = [Ô]Authors_table[Ô]


                Catch ex As Exception

                    MsgBox([Ô]Erro no Sql Comando[Ô], vbInformation, [Ô]Aviso[Ô])
                    Exit Sub
                End Try
            End If

        End If
FELLIPEASSIS 01/12/2012 20:27:32
#415230 Resposta escolhida
especifique o erro ? vc quer que o datagridview carregue com dados da tabela do banco?
ZIMIRO 01/12/2012 20:50:14
#415233
nao quero quando update ou delete seja usando so msgbox execução e nao de erro
mais quando colocar sql invalido sim de msgbox de erro
mais todos comando dão err.number 5
Tópico encerrado , respostas não são mais permitidas
Voltar