ms ProdAnpassung
This commit is contained in:
@@ -18,6 +18,7 @@ Public Class frmAdmin_IDBEntity
|
||||
|
||||
Private Sub frmAdmin_IDBEntity_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Try
|
||||
TBIDB_BUSINESS_ENTITYTableAdapter.Connection.ConnectionString = My.DatabaseIDB.CurrentSQLConnectionString
|
||||
If IsInsert Then
|
||||
DSIDB_Stammdaten.TBIDB_BUSINESS_ENTITY.ADDED_WHOColumn.DefaultValue = My.Application.User.UserName
|
||||
TBIDB_BUSINESS_ENTITYBindingSource.AddNew()
|
||||
|
||||
Reference in New Issue
Block a user