This commit is contained in:
SchreiberM
2016-11-23 10:24:21 +01:00
parent a1d1b2a88e
commit fc9f391307
79 changed files with 7388 additions and 4524 deletions

View File

@@ -7,7 +7,7 @@
Try
Me.TBDD_EMAIL_ACCOUNTBindingSource.EndEdit()
If DD_DMSDataSet.TBDD_EMAIL_ACCOUNT.GetChanges Is Nothing = False Then
Me.CHANGED_WHOTextBox.Text = Environment.UserName
Me.CHANGED_WHOTextBox.Text = USER_USERNAME
Me.TBDD_EMAIL_ACCOUNTBindingSource.EndEdit()
TBDD_EMAIL_ACCOUNTTableAdapter.Update(Me.DD_DMSDataSet.TBDD_EMAIL_ACCOUNT)
lblSave.Visible = True
@@ -28,7 +28,7 @@
End Sub
Private Sub TBDD_EMAIL_ACCOUNTBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBDD_EMAIL_ACCOUNTBindingSource.AddingNew
Me.DD_DMSDataSet.TBDD_EMAIL_ACCOUNT.ADDED_WHOColumn.DefaultValue = Environment.UserName
Me.DD_DMSDataSet.TBDD_EMAIL_ACCOUNT.ADDED_WHOColumn.DefaultValue = USER_USERNAME
End Sub
Private Sub btnEmailTest_Click(sender As Object, e As EventArgs) Handles btnEmailTest.Click