nightwolf (Normal User)
Pro
 
Messaggi: 149
Iscritto: 14/09/2010
|
 Questo topic è stato chiuso dal moderatore
buon giorno a tutti ho un piccolo problema nel far aggiornare il database, mi spiego meglio, ho due form,
form1 dove è collocato un datagridview collegato ad un database con 2 button,
button1 (modifica) e button2(nuovo)
form2 dove ci sono tante textbox quanti soni i campi del database con due button,
button1 (salva)
button2 (esci)
adesso, riesco senza problema cliccando il button1 del form1 ad aggiungere cio che nella rispettiva riga del database nelle rispettivite textbox del form2, ma il mio problema è che quando clicco sul pulsante salva lui non mi salva le modifiche, me le fa vedere nel datagrid ma non le salva, invece se inserisco un button3 nel form1 con (salva), lui li salva, perchè?
e poi non riesco ad aggiungere nuovi elementi nel database perche il codice che uso dice che non si può perche collegati ad un archivio, adesso posto il codice che uso
grazie a tutti se mi date una mano,
form1:giornali
Public Class Giornali
Private Sub Giornali_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: questa riga di codice carica i dati nella tabella 'EdicolaDataSet1.Riviste'. È possibile spostarla o rimuoverla se necessario.
Me.RivisteTableAdapter.Fill(Me.EdicolaDataSet1.Riviste)
Me.DataGridView1.DataSource = Me.EdicolaDataSet1.Riviste
DataGridView1.ReadOnly = True
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer = Me.DataGridView1.CurrentRow.Index
Inserimento_Giornali.TextBox1.Text = Me.DataGridView1.Rows(i).Cells(0).Value
Inserimento_Giornali.TextBox2.Text = Me.DataGridView1.Rows(i).Cells(1).Value
Inserimento_Giornali.ComboBox1.Text = Me.DataGridView1.Rows(i).Cells(2).Value
Inserimento_Giornali.TextBox3.Text = Me.DataGridView1.Rows(i).Cells(3).Value
Inserimento_Giornali.TextBox5.Text = Me.DataGridView1.Rows(i).Cells(4).Value
Inserimento_Giornali.ComboBox2.Text = Me.DataGridView1.Rows(i).Cells(5).Value
Inserimento_Giornali.TextBox7.Text = Me.DataGridView1.Rows(i).Cells(6).Value
Inserimento_Giornali.Show()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Inserimento_Giornali.Show()
End Sub
End Class
form2:inserimento giornali
Public Class Inserimento_Giornali
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer = Giornali.DataGridView1.CurrentRow.Index
If TextBox1.Text <> Giornali.DataGridView1.Rows(i).Cells(0).Value Then
Giornali.DataGridView1.Rows(i).Cells(0).Value = TextBox1.Text
ElseIf TextBox2.Text <> Giornali.DataGridView1.Rows(i).Cells(1).Value Then
Giornali.DataGridView1.Rows(i).Cells(1).Value = TextBox2.Text
ElseIf TextBox3.Text <> Giornali.DataGridView1.Rows(i).Cells(3).Value Then
Giornali.DataGridView1.Rows(i).Cells(3).Value = TextBox3.Text
ElseIf ComboBox1.Text <> Giornali.DataGridView1.Rows(i).Cells(2).Value Then
Giornali.DataGridView1.Rows(i).Cells(2).Value = ComboBox1.Text
ElseIf TextBox5.Text <> Giornali.DataGridView1.Rows(i).Cells(4).Value Then
Giornali.DataGridView1.Rows(i).Cells(4).Value = TextBox5.Text
ElseIf ComboBox2.Text <> Giornali.DataGridView1.Rows(i).Cells(5).Value Then
Giornali.DataGridView1.Rows(i).Cells(5).Value = ComboBox2.Text
ElseIf TextBox7.Text <> Giornali.DataGridView1.Rows(i).Cells(6).Value Then
Giornali.DataGridView1.Rows(i).Cells(6).Value = TextBox7.Text
End If
Giornali.RivisteTableAdapter.update(Giornali.EdicolaDataSet1.Riviste)
Me.Close()
End Sub
|
