MS

Windream/Helpers.vb

@@ -27,6 +27,10 @@ Public Class Helpers
                 'Umwandeln in String
                 myArray(0) = CStr(pValue)
                 Return myArray
+            Case 8204 'auch INDEX_TYPE_VECTOR_STRING 
+                'Umwandeln in String
+                myArray(0) = CStr(pValue)
+                Return myArray
             Case INDEX_TYPE_VECTOR_INTEGER '4098
                 'Umwandeln in Integer
                 myArray(0) = CInt(pValue.Replace(" ", ""))
@@ -65,7 +69,7 @@ Public Class Helpers
 
     Friend Shared Function ConvertIndexValue(Type As Integer, pValue As String) As Object
         ' Leerzeichen an Anfang und Ende entfernen
-        If Type > 4095 And Type < 4115 Then
+        If Type > 4095 Then
             Return ConvertVectorType(Type, pValue)
         End If
         pValue = pValue.Trim()