MS_05042016

This commit is contained in:
SchreiberM
2016-04-05 17:28:12 +02:00
parent b9eb1e1981
commit d1eb7ecb5b
72 changed files with 11883 additions and 9088 deletions

View File

@@ -318,7 +318,7 @@ Public Class frmConstructorDesigner
view = SQL_SELECT_EBENE1TextBox.Text.ToUpper.Replace("SELECT * FROM ", "")
view = view.Trim
Dim Sql = "SELECT name FROM sys.columns WHERE object_id = OBJECT_ID('" & view & "')"
If LogErrorsOnly = False Then ClassLogger.Add(">> " & Sql, False)
If LogErrorsOnly = False Then ClassLogger.Add(" >> " & Sql, False)
Dim DT As DataTable = ClassDatabase.Return_Datatable(Sql)
If DT IsNot Nothing Then
COLUMN_NAME1ComboBox.Items.Clear()