[Bug 33996] Multiple installers fail in VBScript custom actions due to missing support of Properties with Parameters (IncrediMail, LabChart Reader 8, Toad for MySQL Freeware 7.x)

[WineHQ Bugzilla]

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

Anastasius Focht  changed:

What    |Removed                     |Added
----------------------------------------------------------------------------
                URL|http://www5l.incredimail.co |https://web.archive.org/web
                   |m/im/imsetup/201104120001/d |/20191116120133/http://www5
                   |efault/installer/fullsetup/ |l.incredimail.com/im/imsetu
                   |IncrediMailSetup.exe        |p/201104120001/default/inst
                   |                            |aller/fullsetup/IncrediMail
                   |                            |Setup.exe
            Summary|IncrediMail installer fails |Multiple installers fail in
                   |in VBScript custom action   |VBScript custom actions due
                   |after accepting EULA        |to missing support of
                   |(incorrect 'Property'       |Properties with Parameters
                   |keyword handling)           |(IncrediMail, LabChart
                   |                            |Reader 8, Toad for MySQL
                   |                            |Freeware 7.x)

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

revisiting still present. Refining the summary to reflect that multiple
installers are affected.

Incredimail:

--- snip ---
$ wine ./IncrediMailSetup.exe

01c4:fixme:vbscript:parser_error L", newKey)\r\n        oDict.Key(oldKey) =
newKey\r\n    End Property\r\n \r\n    'Returns array of items\r\n    Public
Function Items()\r\n        Items = oDict.Items\r\n    End Function\r\n \r\n   
'Check if certain key exists or not\r\n    Public Function Exists(Key)\r\n     
  Exists = "...: "syntax error"
01c4:err:msi:MsiActiveScriptSite_OnScriptError script error: L"Unknown runtime
error"
...
01a4:err:msi:ITERATE_Actions Execution halted, action
L"Call_IncrementByOneAtAtartUp" returned 1603
--- snip ---

In case of Toad for MySQL Freeware 7.x installer the error seems non-fatal. It
still completes successfully.

Prerequisites: 'winetricks -q dotnet45 mfc42 win7'

--- snip ---
$ wine ./ToadforMySQL_Freeware_7.3.1.3290.exe 
...
019c:fixme:vbscript:parser_error L"("WiseCurrentDialog")\r\n   Wizard =
Property("WiseCurrentWizard")\r\n   if (Property("WiseNextDialog") = "")
Then\r\n\t   CurrDialog = Wizard\r\n   Else \r\n\t   CurrDialog =
Property("WiseNextDialog")\r\n   End If\r\n   Property("WiseCurrentDialog")
= CurrDialog\r\n\r\n   ' "...: "syntax error"
019c:err:msi:MsiActiveScriptSite_OnScriptError script error: L"Unknown runtime
error"
...
--- snip ---

Adding another installer from bug #35744 -> LabChart Reader 8

https://web.archive.org/web/20140407004909/http://cdn.adinstruments.com/Inst...

--- snip ---
020c:fixme:vbscript:parser_error L"Property (name)\r\n        if Not Quiet and
not Properties.Exists (name) then\r\n            Echo "Get creating property
" & name\r\n            Properties.Item (name) = ""\r\n        end
if\r\n\r\n        Property = Properties.Item (name)\r\n    End Property\r\n\r\n
   Public Propert"...: "syntax error"
020c:err:msi:MsiActiveScriptSite_OnScriptError script error: L"Unknown runtime
error"
0200:err:msi:ITERATE_Actions Execution halted, action L"GetCmdDir" returned
1603
--- snip ---

https://web.archive.org/web/20170304022449/https://visualstudiomagazine.com/...

$ wine --version
wine-5.19-123-ge909986e6ea

Regards