Remove ClassFormFunctions, switch to Database Module for getting connection string from connection id
This commit is contained in:
@@ -229,7 +229,7 @@ Public Class ClassControls
|
||||
Dim cmb As ComboBox = ctrl
|
||||
Dim sql As String = sql_result.ToString.ToUpper.Replace("@" & SearchString.ToUpper, Resultvalue)
|
||||
|
||||
connectionString = ClassFormFunctions.GetConnectionString(conid)
|
||||
connectionString = DATABASE_ECM.Get_ConnectionStringforID(conid)
|
||||
If connectionString Is Nothing = False Then
|
||||
'SQL Befehl füllt die Auswahlliste
|
||||
|
||||
@@ -436,7 +436,7 @@ Public Class ClassControls
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim oConnectionString = ClassFormFunctions.GetConnectionString(SqlConnectionId)
|
||||
Dim oConnectionString = DATABASE_ECM.Get_ConnectionStringforID(SqlConnectionId)
|
||||
Dim oDatatable As DataTable = DATABASE_ECM.GetDatatable(SqlCommand)
|
||||
Dim oFoundControl As Control = Nothing
|
||||
|
||||
|
||||
Reference in New Issue
Block a user