MS_08.04

app/DD-Record-Organiser/ClassInit.vb

@@ -36,7 +36,7 @@ Public Class ClassInit
 
     End Function
 
-    Public Sub InitWindream()
+    Public Sub InitBasics2()
         Try
             Dim configResult As Boolean
             configResult = Settings_LoadBasicConfig()
@@ -45,12 +45,11 @@ Public Class ClassInit
                 Throw New Exception("Find more information in the logfile.")
             End If
         Catch ex As Exception
-            MsgBox("Unexpected Error in Init windream:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            MsgBox("Unexpected Error in InitBasics2:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
 
     End Sub
 
-
     Public Sub InitUserLogin()
         Dim sql = sql_UserID
         sql = sql.Replace("@user", Environment.UserName)