If I use:
Const msiReinstallModeUserData = 256
Set oInstaller = CreateObject("WindowsInstaller.Installer")
err.Clear
oInstaller.ReinstallFeature Application's
ProductCode,Feature2Reinstall,msiReinstallModeUserData
If err.Number = 0 Then
MsgBox "Success"
Else
MsgBox "Failed" & vbcrlf & err.Number & vbcrlf & err.Description
End If
Sometimes the err.number is -2147467259 (which is the same error as
clicking the Cancel button) on calls that have appeared to be
successful.
The description is "ReinstallFeature,Product,Feature,ReinstallMode"
ALSO If I run msiexec /iProductCode REINSTALL=Feature /l*v "C:\f.log"
The log file does not contain the error number above and the reinstall
was successful.