NÃO É POSSÍVEL ENCONTRAR A TABELA

 Tópico anterior Próximo tópico Novo tópico

NÃO É POSSÍVEL ENCONTRAR A TABELA

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#479003 - 09/01/2018 18:28:42

LEOCRPTORRES
PASSO DE TORRES
Cadast. em:Dezembro/2017


Olá boa tarde. Ao executar o comando abaixo estou recebendo a msg de erro : não é possivel encontrar a tabela 0
Alguma ideia?

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        CaixaLoad()
    End Sub
     Sub CaixaLoad()
        Dim c As New Caixa()
        Dim ds As New DataSet
        Try
            ds = c.buscaLancamento()

            If ds.Tables(0).Rows.Count > 0 Then
                GDLoadCaixa.DataSource = ds.Tables(0)

                formartarGrid()
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub




Class:

Public Function buscaLancamento() As DataSet
        Dim cd As New npgSqlCommand
        Dim ds As New DataSet
        Dim query As String = ""
        Try
            query &= " SELECT * from FROM Caixa "

            cd.CommandText = query
            cd.CommandType = CommandType.Text

            ds = Conexao.Reader(cd)

            sStatus = "Busca realizada com sucesso!"

            Return ds
        Catch ex As Exception

            MsgBox(ex.ToString)
          
              Return ds
        Finally
        
        End Try
    End Function


    Public Function buscaLancamento(ByVal iRecibo As Integer) As DataSet
        Dim cd As New npgSqlCommand
        Dim ds As New DataSet
        Dim query As String = ""

        query &= " SELECT * from Caixa "
      

        cd.CommandText = query
        cd.CommandType = CommandType.Text

        ds = Conexao.Reader(cd)

        sStatus = "Busca realizada com sucesso!"

        Return ds



    End Function




 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por LEOCRPTORRES em 09/01/2018 19:19:38