2014-12-08 3 views
-1

Итак, я использую визуальный базовый интерфейс для моей базы данных оракула. Я уже включил триггеры в oracle. Я хочу показать, что мои триггеры работают в Visual Basic, поэтому я вставляю данные, которые приведут к сбою базы данных и запуску триггеров. В визуальном базовом режиме он просто падает, вместо этого я хочу, чтобы вместо него отображался ящик сообщений. Как мне это сделать?Visual Basic- Как отобразить окно сообщения при запуске триггера в oracle

Private Sub TRANSACTIONBindingNavigatorSaveItem_Click(sender As System.Object, e As System.EventArgs) Handles TRANSACTIONBindingNavigatorSaveItem.Click 
     Me.Validate() 
     Me.TRANSACTIONBindingSource.EndEdit() 
     Me.TableAdapterManager.UpdateAll(Me.DataSet) 

линия ниже это тот, который ему не нравится

Me.TableAdapterManager.UpdateAll(Me.DataSet) 

Вот что я теперь? Это не нравится слово Exception хотя

Private Sub TRANSACTIONBindingNavigatorSaveItem_Click(sender As System.Object, e As System.EventArgs) Handles TRANSACTIONBindingNavigatorSaveItem.Click 
     Me.Validate() 
     Me.TRANSACTIONBindingSource.EndEdit() 
     Try 
     Catch exception 
      MessageBox.Show("Error", "Error") 
     End Try 
     Me.TableAdapterManager.UpdateAll(Me.DataSet) 
End Sub 
+1

[Catch] (http://msdn.microsoft.com/en-us/library/fk6t46tz.aspx) исключение. –

+0

Я попытался, но не знаю, как это исправить .. – Michael

ответ

2

Вы делаете это неправильно, пожалуйста, прочитайте MSDN правильно.

Private Sub TRANSACTIONBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TRANSACTIONBindingNavigatorSaveItem.Click 
    Try 
     Me.Validate() 
     Me.TRANSACTIONBindingSource.EndEdit() 
     Me.TableAdapterManager.UpdateAll(Me.DataSet) 
    Catch ex As Exception 
     MessageBox.Show(ex.Message) 
    End Try 
End Sub 
+0

Спасибо! Прекрасно работает – Michael

+0

Цветочная организация а? LOL да, я это видел. Смешной dawg ;-) OP будет больше повезло с этим. –

+0

Я очень рассмеялся :-)) слишком смешно –