[Bug 38368] New: AutoPatcher Updater 1.4.x (VB6 app) reports 'Error: Object doesn't support this action' (needs ITextStream::Close method implementation)

https://bugs.winehq.org/show_bug.cgi?id=38368

Bug ID: 38368
           Summary: AutoPatcher Updater 1.4.x (VB6 app) reports 'Error:
                    Object doesn't support this action' (needs
                    ITextStream::Close method implementation)
           Product: Wine
           Version: 1.7.40
          Hardware: x86-64
                OS: Linux
            Status: NEW
          Severity: normal
          Priority: P2
         Component: scrrun
          Assignee: [e-mail]
          Reporter: [e-mail]
      Distribution: ---

Hello folks,

found during validation of bug 38364

Not really a blocker but dismissing a message box each time the method stub is
called is annoying.

Prerequisite: 'winetricks -q vb6run'

--- snip ---
...
0024:fixme:scrrun:textstream_Close (0x1f4758): stub
...
0024:Call KERNEL32.RaiseException(c000008f,00000001,00000002,0033eae0)
ret=660d0956
0024:trace:seh:raise_exception code=c000008f flags=1 addr=0x7b83b64b
ip=7b83b64b tid=0024
0024:trace:seh:raise_exception  info[0]=deadcafe
0024:trace:seh:raise_exception  info[1]=deadcafe
0024:trace:seh:raise_exception  eax=7b8272ad ebx=7b8c1000 ecx=deadcafe
edx=0033ea3c esi=0033eae0 edi=0033eaa0
0024:trace:seh:raise_exception  ebp=0033ea78 esp=0033ea14 cs=0023 ds=002b
es=002b fs=0063 gs=006b flags=00000283
0024:trace:seh:call_stack_handlers calling handler at 0x409926 code=c000008f
flags=1
...
0024:Call oleaut32.VarBstrCat(001f712c L"APUP Has Started\r\nVersion:
1.4.43\r\n\r\nOperating System: English (1033) Windows XP Professional Service
Pack 3\r\nCurrent Locale: English - United States / Non-Unicode Default:
English - United States\r\nStarting APUP From:
Z:\home\focht\Downloads\r\nDate & Time: 06-Apr-2015 18:55 UTC Offset:
"...,001f6dd4 L"Error: Object doesn't support this action\r\nIn
mdlGeneral.fileToString At Line 112",0033ea74) ret=660e5f4d
...
0024:Call KERNEL32.WideCharToMultiByte(00000000,00000000,001f3ca4 L"Application
Error",ffffffff,009a46e8,00000022,00000000,00000000) ret=660711c4
0024:Ret  KERNEL32.WideCharToMultiByte() retval=00000012 ret=660711c4
...
0024:Call user32.MessageBoxIndirectA(0033e9ec) ret=6606f73f 
...
--- snip ---

Source:
https://source.winehq.org/git/wine.git/blob/533323d70397a53a2ce5002dc2038bcf...

--- snip ---
633 static HRESULT WINAPI textstream_Close(ITextStream *iface)
634 {
635     struct textstream *This = impl_from_ITextStream(iface);
636     FIXME("(%p): stub\n", This);
637     return E_NOTIMPL;
638 }
--- snip ---

$ sha1sum Apup_1_4_43.zip 
3c5694b5dee56bafbc4f528b37ef52eeed68a883  Apup_1_4_43.zip

$ du -sh Apup_1_4_43.zip 
2.3M    Apup_1_4_43.zip

$ wine --version
wine-1.7.40-29-gc1c108f

Regards