http://bugs.winehq.org/show_bug.cgi?id=5755
Summary: oleaut32: MS Dao3.5 fails to evaluate "SELECT ... WHERE "X" & FieldName & "X" LIKE "XXX"" query Product: Wine Version: 0.9.17. Platform: Other OS/Version: other Status: UNCONFIRMED Severity: normal Priority: P2 Component: wine-ole AssignedTo: wine-bugs@winehq.org ReportedBy: paolo.salvan@xvision.it
Using DAO 3.5 (the engine for MS Access 97 databases) and Wine 0.9.17 I've got a trouble:
when I launch a query that uses expression like this: SELECT CategReport FROM TReport WHERE "X" & DefaultFor & "X" LIKE "XXX" the query fails...
The console log says: ---- fixme:variant:VarCat Failed to convert right side from vt 1 to VT_BSTR? ---- Replacing the builtin OLEAUT32.DLL with the native DLL everything works ok.
The attached minimal project reproduce the problem; before starting it, install standard Dao 3.5 setup from MS or install http://download.danea.it/demo/def2006demo09b.exe (that is my SW, it install a minimal Dao3.5)
BTW, this is the minimal bit of Delphi code to reproduce the problem:
procedure TForm1.Button3Click(Sender: TObject); var daodbeng: DAODBEngine; daodb: DAODatabase; daors: DAORecordset; begin try daodbeng:= OpDAO35.CreateEngine; daodb:= daodbeng.OpenDatabase(ChangeFileExt(Application.ExeName, '.mdb'), false, false, '');
// This works under Windows, fails under Wine: // log: fixme:variant:VarCat Failed to convert right side from vt 1 to VT_BSTR? daors:= daodb.OpenRecordset('SELECT CategReport FROM TReport WHERE "X" & DefaultFor & "X" LIKE "XXX"', dbOpenDynaset, _, _);
showmessage('OK');
daors.Free; daodb.Free; daodbeng.Free; except on e: Exception do ShowMessage('Exception: ' + e.ClassName + '; Msg: ' + e.Message); end; end;