Add RegexEditor, Improve Database Add Language

Modules.Database/ODBC.vb

@@ -2,6 +2,8 @@
 Imports DigitalData.Modules.Logging
 
 Public Class ODBC
+    Inherits BaseClass
+
     Private _Logger As Logger
     Private _LogConfig As LogConfig
 
@@ -86,7 +88,7 @@ Public Class ODBC
     ''' </summary>
     ''' <param name="SqlCommand">The command to execute</param>
     ''' <returns>True, if command was executed sucessfully. Otherwise false.</returns>
-    Public Function ExecuteNonQuery(SqlCommand As String) As Boolean
+    Public Overrides Function ExecuteNonQuery(SqlCommand As String) As Boolean
         Dim oConnection As OdbcConnection = GetConnection()
         Dim oScalarValue As Object = ExecuteNonQueryWithConnection(SqlCommand, oConnection)
         oConnection.Close()
@@ -126,7 +128,7 @@ Public Class ODBC
     ''' </summary>
     ''' <param name="SqlQuery">The query to execute</param>
     ''' <returns>A datatable containing the results if the command was executed successfully. Nothing otherwise.</returns>
-    Public Function GetScalarValue(SqlQuery As String) As Object
+    Public Overrides Function GetScalarValue(SqlQuery As String) As Object
         Dim oConnection As OdbcConnection = GetConnection()
         Dim oDatatable As DataTable = GetDatatableWithConnection(SqlQuery, oConnection)
         oConnection.Close()
@@ -169,7 +171,7 @@ Public Class ODBC
     ''' </summary>
     ''' <param name="SqlQuery">The query to execute</param>
     ''' <returns>A datatable containing the results if the command was executed successfully. Nothing otherwise.</returns>
-    Public Function GetDatatable(SqlQuery As String) As DataTable
+    Public Overrides Function GetDatatable(SqlQuery As String) As DataTable
         Dim oConnection As OdbcConnection = GetConnection()
         Dim oDatatable As DataTable = GetDatatableWithConnection(SqlQuery, oConnection)
         oConnection.Close()