2015-01-11 5 views
0

Я использую этот код для сохранения значений для доступа к базе данныхОшибка при сохранении данных в базе данных

Что я сделал.

  • Добавлена ​​база данных проекта
  • переплетены с DataBindings в текстовые поля
  • На форме нагрузки я получил значения из базы данных в текстовые поля (Так что я сделал это правильно)
  • На одной кнопки я добавить новый поле с этим кодом

код:

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
       TabelaBindingSource.AddNew() 
      End Sub 

И на кнопку Сохранить я добавить этот код

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 
    Try 
     Validate() 
     TabelaBindingSource.EndEdit() 
     TabelaTableAdapter.Update(EUUsersDataSet.tabela) 
     MessageBox.Show("Saved") 
    Catch ex As Exception 
     MessageBox.Show("Error during saving") 
    End Try 
End Sub 

Она всплывающие окна мне поле «Сохраненные», но нет никаких записей в базе данных Что я сделал не так?

Я попытался добавить его через TabelaBindingNavigator, даже когда я нажал кнопку сохранения на этой кнопке, по-прежнему не сохранит ее.

+0

Вы должны иметь INSERT INTO заявление, дать ему несколько значений, и добавить его некоторые параметры. – CodingSource

+0

Как делать с базами данных mysql? Я думал, потому что его связали, я мог бы избежать этого? – Anel

+0

Я пробовал это раньше ... Это не сработало. Если вы счастливы, я дам вам источник в своем ответе. – CodingSource

ответ

0

Этот код работает для меня:

Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    Me.TabelaTableAdapter.Fill(Me.Database1DataSet.Table1) 
End Sub 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    Me.TabelaBindingSource.AddNew() 
End Sub 

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
    Try 
     Me.Validate() 
     Me.TabelaBindingSource.EndEdit() 
     Me.TabelaAdapterManager.UpdateAll(Me.Database1DataSet) 
    Catch ex As Exception 
     MessageBox.Show("Error during saving") 
    End Try 
End Sub 
+0

Stil не работает. – Anel

+0

почему вы думаете, что я отрицаю ваш ответ? http://pokit.org/get/?65c371a0e5470c149c5de4ee1c74f2d9.jpg – Anel

+0

Работает ли он сейчас? См. Отредактированный тент. –

Смежные вопросы