Jump to content
Sign in to follow this  

Update MSI summary

Recommended Posts


I'm trying to update the MSI summary of an standard msi package we use.

We used to change it with an vbscript function wich works perfect. But when i try to

use is in autoit it somehow doesn't work :D I can read the summary properties but can't seem to update them!

Maybe I'm doing something wrong?? I've been searching

the forums and googled my brains out!! but can't find the problem.

Here is the vbscript function

Function WriteSummary (strFilename,ByVal strPackageCodeValue)
    'On Error Resume Next
    Dim installer : Set installer = Nothing
    Set installer = WScript.CreateObject("WindowsInstaller.installer")
    Dim sumInfo  : Set sumInfo = installer.SummaryInformation  (strFilename,1)
    'msgbox sumInfo.property(9)
    sumInfo.property(9) = strPackageCodeValue
    'msgbox sumInfo.property(9)
    Set installer = Nothing
    Set sumInfo = Nothing
End Function

And here is the same function i rewrote in autoit

Func WriteSummary ($strFilename, $strPackageCodeValue)
;option explicit
dim $oinstaller, $osuminfo, $odatabase
$oinstaller = ObjCreate("WindowsInstaller.Installer")
$odatabase = $oinstaller.opendatabase($strFilename, 1)
$osuminfo = $odatabase.SummaryInformation (99)
MsgBox (4096, "AppID!!", $osumInfo.property(9))
$osuminfo.Property(9) = $strPackageCodeValue

Can anyone tell me what i'm doing wrong????

Share this post

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Create New...