Personalakte und ComputerAppConfig Fehler

app/DD-Record-Organizer/Classes/ClassHelper.vb

@@ -7,18 +7,23 @@ Public Class ClassHelper
     Private Shared BW_DocID As Integer
     Public Shared Function FORMAT_WM_PATH(WMpath As String)
         Try
-            Dim ochanged As Boolean = False
-            If WMpath.StartsWith("W:") Then
-                WMpath = WMpath.Replace("W:", WMPATH_PREFIX)
-                ochanged = True
-            ElseIf WMpath.StartsWith("\") Then
-                If WMpath.StartsWith(WMPATH_PREFIX) = False Then
-                    WMpath = WMPATH_PREFIX & WMpath
+            If Not IsNothing(WMpath) Then
+                Dim ochanged As Boolean = False
+                If WMpath.StartsWith("W:") Then
+                    WMpath = WMpath.Replace("W:", WMPATH_PREFIX)
                     ochanged = True
+                ElseIf WMpath.StartsWith("\") Then
+                    If WMpath.StartsWith(WMPATH_PREFIX) = False Then
+                        WMpath = WMPATH_PREFIX & WMpath
+                        ochanged = True
+                    End If
                 End If
+                LOGGER.Debug("WMpath is: " & WMpath)
+                Return WMpath
+            Else
+                Return Nothing
             End If
-            LOGGER.Debug("WMpath is: " & WMpath)
-            Return WMpath
+
         Catch ex As Exception
             Return WMpath
         End Try