diff --git a/Modules.Windream/Helpers.vb b/Modules.Windream/Helpers.vb
index f0aef4bc..b772e88c 100644
--- a/Modules.Windream/Helpers.vb
+++ b/Modules.Windream/Helpers.vb
@@ -16,37 +16,50 @@ Public Class Helpers
     }
 
     Friend Shared Function ConvertVectorType(vType As Object, value As String)
+        Dim myArray
+        ReDim myArray(0)
         Select Case vType
             Case INDEX_TYPE_HASH ' 36865
                 'Umwandeln in String
-                Return value
+                myArray(0) = CStr(value)
+                Return myArray
             Case INDEX_TYPE_VECTOR_STRING '4097
                 'Umwandeln in String
-                Return value
+                myArray(0) = CStr(value)
+                Return myArray
             Case INDEX_TYPE_VECTOR_INTEGER '4098
                 'Umwandeln in Integer
-                value = value.Replace(" ", "")
-                Return CInt(value)
+                myArray(0) = CInt(value.Replace(" ", ""))
+                Return myArray
             Case INDEX_TYPE_VECTOR_FLOAT  '4099
                 value = value.
                     Replace(" ", "").
                     Replace(".", ",")
                 'Umwandeln in Double
-                Return CDbl(value)
+                myArray(0) = CDbl(value)
+                Return myArray
             Case INDEX_TYPE_VECTOR_BOOLEAN '4100
                 'Umwandeln in Boolean
-                Return CBool(value)
+                myArray(0) = CBool(value)
+                Return myArray
             Case INDEX_TYPE_VECTOR_DATE '4101
                 'Umwandeln in Date
-                Return CDate(value)
+                myArray(0) = CDate(value)
+                Return myArray
             Case INDEX_TYPE_VECTOR_INTEGER_64BIT '4107
-                Return Convert.ToInt64(value)
+                myArray(0) = Convert.ToInt64(value)
+                Return myArray
             Case INDEX_TYPE_VECTOR_DATE_TIME '4103
                 'Umwandeln in Datum Uhrzeit
                 Return value
+            Case 8204
+                'Umwandeln in Integer
+                myArray(0) = CInt(value.Replace(" ", ""))
+                Return myArray
             Case Else
                 'Umwandeln in String
-                Return value
+                myArray(0) = CStr(value)
+                Return myArray
         End Select
     End Function
 
diff --git a/Modules.Windream/My Project/AssemblyInfo.vb b/Modules.Windream/My Project/AssemblyInfo.vb
index 8ae936dc..1099676c 100644
--- a/Modules.Windream/My Project/AssemblyInfo.vb	
+++ b/Modules.Windream/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.0.0.7")>
-<Assembly: AssemblyFileVersion("1.0.0.0")>
+<Assembly: AssemblyVersion("1.1.0.0")>
+<Assembly: AssemblyFileVersion("1.1.0.0")>
diff --git a/Modules.Windream/Windream.vb b/Modules.Windream/Windream.vb
index 0b06b5b7..0e5c7485 100644
--- a/Modules.Windream/Windream.vb
+++ b/Modules.Windream/Windream.vb
@@ -1142,7 +1142,12 @@ Public Class Windream
 
         Try
             Dim oType As Integer = GetIndexType(IndexName)
-            Dim oConvertedValue As Object = Helpers.ConvertIndexValue(oType, Value)
+            Dim oConvertedValue As Object
+            If oType < 3000 Then
+                oConvertedValue = Helpers.ConvertIndexValue(oType, Value)
+            Else
+                oConvertedValue = Helpers.ConvertVectorType(oType, Value)
+            End If
             oWMObject.SetVariableValue(IndexName, oConvertedValue)
             oWMObject.Save()