AppStd/FileFlow
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Version 2.0.0.3

Browse Source
This commit is contained in:
Jonathan Jenne
2020-03-11 15:46:17 +01:00
parent 50713e61b6
commit 5f5bb9f20c
17 changed files with 1400 additions and 23083 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Global_Indexer/ClassDatabase.vb
View File

@@ -71,7 +71,7 @@ Public Class ClassDatabase
End If
End Function
Public Shared Function Return_Datatable(sql_command As String, Optional userInput As Boolean = False)
Public Shared Function Return_Datatable(sql_command As String, Optional userInput As Boolean = False) As DataTable
Try
Dim SQLconnect As New SqlConnection
Dim SQLcommand As SqlCommand
@@ -99,7 +99,7 @@ Public Class ClassDatabase
LOGGER.Info("#SQL: " & sql_command)
End If
Return False
Return Nothing
Catch ex As Exception
If userInput = True Then
MsgBox("Error in Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)