[Bug 16676] RTG Bills 2.x (VB6 app) reports 'ADO error 1BD Object doesn't support this action' on startup (msado15 'connection_GetIDsOfNames' is a stub)

[WineHQ Bugzilla]

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

Anastasius Focht  changed:

What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |[e-mail]
            Summary|Running RTG Bills requires  |RTG Bills 2.x (VB6 app)
                   |alternate winecfg           |reports 'ADO error 1BD
                   |configurations of           |Object doesn't support this
                   |winetricks installed dcom98 |action' on startup (msado15
                   |DLLs for alternate          |'connection_GetIDsOfNames'
                   |functions                   |is a stub)
                URL|http://appdb.winehq.org/obj |https://web.archive.org/web
                   |ectManager.php?sClass=versi |/20210206115548/https://www
                   |on&iId=15018                |.rtgsoftware.com/bin/bills.
                   |                            |exe

--- Comment #7 from Anastasius Focht  ---
Hello folks,

adding stable download link via Internet Archive:

https://web.archive.org/web/20210206115548/https://www.rtgsoftware.com/bin/b...

You need to run 'winetricks -q vb6run' before the installer.

--- snip ---
$ pwd
/home/focht/.wine/drive_c/Program Files (x86)/Rtgbills

$ WINEDEBUG=+seh,+relay,+ole,odbc,+msado15 wine ./rtgbills.exe >>log.txt 2>&1
...
00fc:trace:msado15:msadocf_CreateInstance 00000000,
{00000000-0000-0000-c000-000000000046}, 0031F93C
...
00fc:trace:msado15:Connection_create returning iface 001721F8
00fc:trace:msado15:connection_QueryInterface 001721F8,
{00000000-0000-0000-c000-000000000046}, 0031F93C
00fc:Ret  combase.CoCreateInstance() retval=00000000 ret=660d9684
00fc:trace:msado15:connection_QueryInterface 001721F8,
{7fd52380-4e07-101b-ae2d-08002b2ec713}, 0031FA98
00fc:fixme:msado15:connection_QueryInterface interface
{7fd52380-4e07-101b-ae2d-08002b2ec713} not implemented
00fc:trace:msado15:connection_QueryInterface 001721F8,
{37d84f60-42cb-11ce-8135-00aa004bb851}, 0031FA9C
00fc:fixme:msado15:connection_QueryInterface interface
{37d84f60-42cb-11ce-8135-00aa004bb851} not implemented
00fc:trace:msado15:connection_QueryInterface 001721F8,
{00020400-0000-0000-c000-000000000046}, 0031FA84
00fc:RET  MSVBVM60.rtcCreateObject2(0031fb28,0045d2f4,00000000) retval=0031fb28
ret=660fd37b
00fc:fixme:msado15:connection_GetIDsOfNames 001721F8,
{00000000-0000-0000-0000-000000000000}, 0031FA84, 1, 1033, 0031FA88
...
00fc:Call KERNEL32.RaiseException(c000008f,00000001,00000002,0031fa00)
ret=660d0956
00fc:Call ntdll.memcpy(0031f968,0031fa00,00000008) ret=7b00fe28
00fc:Ret  ntdll.memcpy() retval=0031f968 ret=7b00fe28
00fc:trace:seh:dispatch_exception code=c000008f flags=1 addr=7B00FE38
ip=7b00fe38 tid=00fc
00fc:trace:seh:dispatch_exception  info[0]=deadcafe
00fc:trace:seh:dispatch_exception  info[1]=deadcafe
00fc:trace:seh:dispatch_exception  eax=0031f954 ebx=00161988 ecx=0031fa00
edx=00000008 esi=00000002 edi=0031f9c0
00fc:trace:seh:dispatch_exception  ebp=0031f9a8 esp=0031f954 cs=7bc50023
ds=31002b es=7bc3002b fs=310063 gs=006b flags=00000212
00fc:trace:seh:call_vectored_handlers calling handler at 7B00F270 code=c000008f
flags=1
00fc:trace:seh:call_vectored_handlers handler at 7B00F270 returned 0 
...
00fc:trace:variant:VarBstrCat L"ADO error 1BD\r\n\r\nObject doesn't support
this action" 
--- snip ---

Wine source:

https://source.winehq.org/git/wine.git/blob/4f1b297a14bbd304fb20da7c4b64266c...

--- snip ---
 168 static HRESULT WINAPI connection_GetIDsOfNames( _Connection *iface, REFIID
riid, LPOLESTR *names, UINT count,
 169                                                 LCID lcid, DISPID *dispid
)
 170 {
 171     FIXME( "%p, %s, %p, %u, %u, %p\n", iface, debugstr_guid(riid), names,
count, lcid, dispid );
 172     return E_NOTIMPL;
 173 }
--- snip ---

$ sha1sum bills.exe 
c35af2ca8e144e1da3c532f68cd2fd61404a89b9  bills.exe

$ du -sh bills.exe 
8.7M    bills.exe

$ wine --version
wine-6.1-187-g4f1b297a14b

Regards