diff --git a/ToolCollection/ClassWindream_allgemein.vb b/ToolCollection/ClassWindream_allgemein.vb
index 11027af..b298f4c 100644
--- a/ToolCollection/ClassWindream_allgemein.vb
+++ b/ToolCollection/ClassWindream_allgemein.vb
@@ -361,7 +361,7 @@ Public Class ClassWindream_allgemein
             Dim oIndexAttributes As WMObjectRelation
             Dim oIndexAttribute As WMObject
             Dim oIndex As WMObject
-            Dim oRelProperties As WMObjectRelationClass
+            Dim oRelProperties As Object
 
             ' den Objekttyp laden
             oObjectType = Me.oWMSession.GetWMObjectByName(WMEntityObjectType, name)
@@ -419,7 +419,7 @@ Public Class ClassWindream_allgemein
             Dim oIndexAttributes As WMObjectRelation
             Dim oIndexAttribute As WMObject
             Dim oIndex As WMObject
-            Dim oRelProperties As WMObjectRelationClass
+            Dim oRelProperties As Object
             For Each OrdnerType In Me.oOrdnerTypen
                 If OrdnerType.aName = Ordnertyp Then
                     oOrdnerType = OrdnerType