Quantcast
Channel: Windows Forms Data Controls and Databinding forum
Viewing all articles
Browse latest Browse all 2535

After add quantity how i can link the data i already insert to datagridview 2

$
0
0
 Private Sub loadTransactions(ByVal transactionid As Integer)

        Dim dt As New DataTable
        Using cnn As New OleDbConnection("Provider=Microsoft.Jet.Oledb.4.0; Data Source=mydataX.mdb")
            Using cmd As New OleDbCommand("SELECT s.cid as [ID], c.CheckerName as item_name, " & _
                                                "s.CheckerName as [CheckerName], s.ShipQuantity as [StockQuantity], s.[Date] as [Date], s.CompanyName as [CompanyName], s.CheckerDetail as [CheckerDetail]" & _
                                                " FROM stock s left join checker c on c.cid = s.checkercid where s.checkercid = "& transactionid & " ORDER BY s.cid", cnn)
                cmd.Parameters.Add("transactionID", OleDbType.Integer).Value = transactionid
                cnn.Open()
                dt.Load(cmd.ExecuteReader)
            End Using
        End Using
        DataGridView1.DataSource = dt
    End Sub
    Private Sub UpdateStock(ByVal transactionid As Integer)
        Using cnn As New OleDbConnection("Provider=Microsoft.Jet.Oledb.4.0; Data Source=mydataX.mdb;")
            Using cmd As New OleDbCommand("Update stock Set CheckerDetail = CheckerDetail + @detail WHERE checkercid = @transactionID;", cnn)
                cmd.Parameters.Add("@detail", OleDbType.Integer).Value = CInt(txtdetail1.Text)
                cmd.Parameters.Add("@transactionID", OleDbType.Integer).Value = transactionid
                cnn.Open()
                cmd.ExecuteNonQuery()
            End Using
        End Using
    End Sub
 Private Sub loadTransactions(ByVal transactionid As Integer)

        Dim dt As New DataTable
        Using cnn As New OleDbConnection("Provider=Microsoft.Jet.Oledb.4.0; Data Source=mydataX.mdb")
            Using cmd As New OleDbCommand("SELECT s.cid as [ID], c.CheckerName as item_name, " & _"s.CheckerName as [CheckerName], s.ShipQuantity as [StockQuantity], s.[Date] as [Date], s.CompanyName as [CompanyName], s.CheckerDetail as [CheckerDetail]" & _" FROM stock s left join checker c on c.cid = s.checkercid where s.checkercid = " & transactionid & " ORDER BY s.cid", cnn)
                cmd.Parameters.Add("transactionID", OleDbType.Integer).Value = transactionid
                cnn.Open()
                dt.Load(cmd.ExecuteReader)
            End Using
        End Using
        DataGridView1.DataSource = dt
    End Sub
    Private Sub UpdateStock(ByVal transactionid As Integer)
        Using cnn As New OleDbConnection("Provider=Microsoft.Jet.Oledb.4.0; Data Source=mydataX.mdb;")
            Using cmd As New OleDbCommand("Update stock Set CheckerDetail = CheckerDetail + @detail WHERE checkercid = @transactionID;", cnn)
                cmd.Parameters.Add("@detail", OleDbType.Integer).Value = CInt(txtdetail1.Text)
                cmd.Parameters.Add("@transactionID", OleDbType.Integer).Value = transactionid
                cnn.Open()
                cmd.ExecuteNonQuery()
            End Using
        End Using
    End Sub



Viewing all articles
Browse latest Browse all 2535

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>