neu

VERAG_PROG_ALLGEMEIN/DATENSERVER/cDATENSERVER.vb

@@ -221,7 +221,7 @@ Public Class cDATENSERVER
         If DATA_LIST.ADD(srcPath, destpath, bezeichnung, "", coll_archiv) Then
             Return (destpath <> "")
         End If
-        Return ""
+        Return False
     End Function
 
     Public Function insertDataToDATENSERVER(srcPath, Optional bezeichnung = "", Optional endung = "", Optional allowMsg = True, Optional coll_archiv = False) As Boolean