vb net cristalreport

[KALAND 0]

Última edição em 12/03/2018 16:35:32 por KALAND

Olá pessoal estou fazendo um cadastro de estoque onde tenho um form venda que efetua a venda do produto e dou baixa no estoque que ao clicar em finalizar ele grava as informações no banco e me abre um form com cristalreport onde aparece os dados da compra efetuada, porem ele esta me retornando todos os dados das vendas anteriores tbem. No caso so queria da ultima que efetuei. 
Alguem poderia me ajudar

segue o código que estou utilizando


    Private Sub btnfinalizar_Click(sender As Object, e As EventArgs) Handles btnfinalizar.Click
        Dim numero As Integer
        con.Open()
        sql = "select * from faturas where nfaturas = '" & txtnfatura.Text & "'"
        da = New FbDataAdapter(sql, con)
        tabela = New DataTable()
        da.Fill(tabela)
        numero = tabela.Rows.Count
        con.Close()
        obterultimoregistro()
        F_relfaturas.Show()
    End Sub

    Private Sub obterultimoregistro()
        Try
            con.Open()
            Dim cmd As New FbCommand
            cmd.CommandText = "select MAX (NFATURAS)from FATURAS"
            cmd.CommandType = CommandType.Text
            cmd.Connection = con
            da.SelectCommand = cmd
            con.Close()
            tabela.Clear()
            da.Fill(tabela)
            Dim nfaturas As String = tabela.Rows.Item(0).Item(0).ToString
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub