XStorable object thrown an exception with error code 283

[khammonh]

Hi there
I have some problem when implementing Interface XStorable of 
unoidl.com.sun.star.frame class .
I developed my own Library base on SDK here are method body of SaveDocAs and 
SaveDocToFile

Public Sub SaveDocAs(ByVal FileName As String, Optional ByVal Filter As 
SpreadSheetFileFilter = SpreadSheetFileFilter.MS_Excel_97)
          Dim Store As XStorable
          Dim Prop() As PropertyValue = {New PropertyValue, New PropertyValue}
          'Dim MyUrl As String = FileName
          Dim MyUrl As String = "file:///" + FileName
          Store = CType(m_mxDocument, XStorable)
          If Filter = SpreadSheetFileFilter.DefaultOpenOffice Then
              Prop = Nothing
          Else
              Prop(0).Name = "FilterName"
              Prop(0).Value = New uno.Any(ParserFilter(Filter))
              Prop(1).Name = "Overwrite"
              Prop(1).Value = New uno.Any(True)
          End If

          Store.storeAsURL(MyUrl, Prop)
      End Sub

Public Sub SaveDocToFile(ByVal FileName As String, Optional ByVal Filter As 
SpreadSheetFileFilter = SpreadSheetFileFilter.MS_Excel_97)
           Dim Store As XStorable
           Dim Prop() As PropertyValue = {New PropertyValue, New PropertyValue}
           Dim MyUrl As String = "file:///" + FileName
           Store = CType(m_mxDocument, XStorable)
           Prop(0).Name = "FilterName"
           Prop(0).Value = New uno.Any(ParserFilter(Filter))
           Prop(1).Name = "Overwrite"
           Prop(1).Value = New uno.Any(True)
           Store.storeToURL(MyUrl, Prop)
       End Sub

when invoke this method on client application with the code fragment bellow

              ExcelAttach = ExcelRoot & "\" & "Report_" & 
ReportDate.ToShortDateString

               OO.SaveDocToFile(ExcelAttach, 
OOClass.SpreadSheetHelper.SpreadSheetFileFilter.MS_Excel_97)
where ExcelAttach is a file path 
I got an exception with error code 283

Actually the document is opened by the app from a template file then the app 
filled the sheets with content and need to save this file with above mentioned 
method.
If I could set file location and filter of Document SaveFile dialog it would be 
more easy then use these 2 methods . But I don’t know how to interact with 
SaveFile dialog of OpenOffice .
Please if any body can help me.

Thank in advance.

Regards
Khammonh