Buonasera a tutti,
mi presento essondo la prima volta che posto in questo forum.
La questione che voglio esporvi è la seguente: Sto facendo un piccolo progaramma di magazzino : Carico e scarico, con due tabelle create con access 2010 "magazzino" e "movimenti".
il problema che ho che quando faccio uno scarico o un carico nel datagrid "movimenti" la quantità dello scarico o viceversa dello scarico me lo registra sia nell'ultima riga "normalmente" ma conteporaneamente la sovracrive sempre anche nella prima riga.
Uso visual studio express 2013 con framework 4.5
Vi posto una porzione di codice che ho fatto fin ora:
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: questa riga di codice carica i dati nella tabella 'MagazzinoDataSet.movimenti'. È possibile spostarla o rimuoverla se necessario.
Me.MovimentiTableAdapter.Fill(Me.MagazzinoDataSet.movimenti)
'TODO: questa riga di codice carica i dati nella tabella 'MagazzinoDataSet.magazzino'. È possibile spostarla o rimuoverla se necessario.
Me.MagazzinoTableAdapter.Fill(Me.MagazzinoDataSet.magazzino)
ScaricoTextBox.Enabled = False
CaricoTextBox.Enabled = False
BntScarica.Enabled = False
BntCarica.Enabled = False
CaricoTextBox.Text = ""
ScaricoTextBox.Text = ""
End Sub
Private Sub BntCarica_Click(sender As Object, e As EventArgs) Handles BntCarica.Click
Dim newmovimentirow As magazzinoDataSet.movimentiRow
newmovimentirow = MagazzinoDataSet.movimenti.NewmovimentiRow
newmovimentirow.articolo = ArticoloTextBox.Text
newmovimentirow.carico = CaricoTextBox.Text
newmovimentirow.data = DataDateTimePicker.Text
MagazzinoDataSet.movimenti.Rows.Add(newmovimentirow)
Dim somma As Integer
somma = Val(GiacenzaTextBox.Text) + Val(CaricoTextBox.Text)
GiacenzaTextBox.Text = somma
If CaricoTextBox.Text = "" Then
MsgBox("Il campo scarica è vuoto immetti un valore numerico", MsgBoxStyle.Exclamation, "Attenzione")
CaricoTextBox.Focus()
End If
Me.Validate()
Me.MagazzinoBindingSource.EndEdit()
Me.MagazzinoDataSet.AcceptChanges()
Me.TableAdapterManager.UpdateAll(Me.MagazzinoDataSet)
Me.MovimentiBindingSource.EndEdit()
End Sub
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
potete farmi capire dove sbaglio?
Vi ringrazio anticipatamente!