Try
builder.GetUpdateCommand ()
myDataAdapter.UpdateCommand = builder.GetUpdateCommand ()
ds. Stół ((0)). Kolumna (1).Unique = Prawdziwy
Ciemnawy myUC Jako UniqueConstraint
Ciemnawy mytable Jako DataTable = ds. Stół ((0))
Próba
myUC = Nowy UniqueConstraint ("UC", ds. Stół ((0)). Kolumna (1))
'ds. Stół ((0)). Constraints.Add (myUC)
Chwyt ukex Jako ConstraintException
MessageBox.Show ("Szpaltowy zawartość być Unikalny", "Duplikat Dane", MessageBoxButtons.OK, MessageBoxIcon.Stop)
'Chwyt uniqEx Jako Wyjątek
'MessageBox.Show (uniqEx.Message)
Wyjście Okręt podwodny
Końcówka Próba
myDataAdapter.Update (ds, "myDataset")
MessageBox.Show ("Twój dane Ratować", "Oprócz Pomyślny! ")
Chwyt wyjątek Jako Wyjątek
MessageBox.Show ("Imię: saveData" + vbCrLf + "Błąd Wiadomość: " + ex.ToString)
Końcówka Próba
|