diff --git a/Windream/Windream.vb b/Windream/Windream.vb
index 2e71d39c..0348820d 100644
--- a/Windream/Windream.vb
+++ b/Windream/Windream.vb
@@ -703,7 +703,8 @@ Public Class Windream
         End Try
     End Function
 
-    Public Function NewFileStream(ByVal FilenameSource As String, ByVal FilenameTarget As String) As Boolean
+    Public Function NewFileStream(ByVal FilenameSource As String, ByVal FilenameTarget As String, ByVal WMObjecttypeName As String) As Boolean
+
         NewDocumentID = 0
 
         If Not TestSessionLoggedIn() Then
@@ -775,6 +776,10 @@ Public Class Windream
             _logger.Debug("Closing Stream")
             oWMStream.Close()
             _logger.Debug("Saving new object")
+
+
+            oWMObject.aObjectType = GetObjectByName(WMObjecttypeName, WMEntityObjectType)
+
             oWMObject.Save()
             _logger.Debug("Unlocking new object")
             oWMObject.unlock()