MS ZF Adminconsole

GUIs.ZooFlow/ClassInit.vb

@@ -216,18 +216,9 @@ Public Class ClassInit
     Private Sub InitBasicConfig(MyApplication As My.MyApplication)
         Try
             My.Tables.DTIDB_COMMON_SQL = My.DatabaseIDB.GetDatatable("SELECT * FROM TBIDB_COMMON_SQL WHERE ACTIVE = 1")
-            My.Tables.DTIDB_FILESTORE = My.DatabaseIDB.GetDatatable("SELECT * FROM TBIDB_FILESTORE_CONFIG WHERE ACTIVE = 1")
 
-            'Get FilesStores
-            For Each oRow As DataRow In My.Tables.DTIDB_FILESTORE.Rows
-                Select Case oRow.Item("TITLE").ToString
-                    Case "ARCHIVE"
-                        My.Filestore_Archive = oRow.Item("STORAGE_PATH")
 
-                    Case "WORK"
-                        My.Filestore_Work = oRow.Item("STORAGE_PATH")
-                End Select
-            Next
+
         Catch ex As Exception
             Logger.Error(ex)
             Throw New InitException("Error in InitBasicData", ex)