This commit is contained in:
Digital Data - Marlon Schreiber
2018-07-13 10:30:32 +02:00
parent 8103f5d055
commit 2d11c3a677
14 changed files with 1303 additions and 1621 deletions

View File

@@ -28,7 +28,7 @@ Public Class ClassDatabase
Dim DTConnection As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBDD_CONNECTION WHERE GUID = " & id, True)
If DTConnection.Rows.Count = 1 Then
Select Case DTConnection.Rows(0).Item("SQL_PROVIDER")
Case "MS-SQLServer"
Case "MS-SQL"
If DTConnection.Rows(0).Item("USERNAME") = "WINAUTH" Then
connectionString = "Server=" & DTConnection.Rows(0).Item("SERVER") & ";Database=" & DTConnection.Rows(0).Item("DATENBANK") & ";Trusted_Connection=True;"
Else