i got an app getting program versions from an ini file... (its a setup app)
i got this routine searching through the inifile for the version info, but i only get returned the first one...
- In combo1, all the app names are loaded from the inifile (all the names between the "[" and "]")
- AppNavn is a string containg the name of the app (which is the section of the inifile)
- The programs you already got installed on your computer gets ": Update!" added, thats why i am removing it... (and it is correct, i have checked)
- ReportText is only the variable which all the info should be stored....
i think that was it... if something is unclear or you got any questions, just ask....
VB Code:
Do AppNavn = frmMain.Combo1.Text If Right(AppNavn, 7) = ": Update!" Then AppNavn = Mid(AppNavn, 1, Len(AppNavn) - 11) LocalVer = GetSetting(app.title & "\" & AppNavn, "Info", "Ver", "N/A") Noko = GetPrivateProfileString(AppNavn, "version", "default", ReturnInfo, Len(ReturnInfo), App.Path & "\setup.xxx") ReportText = ReportText & vbCrLf & AppNavn & " - Local version = " & LocalVer & ", Remote version = " & ReturnInfo If frmMain.Combo1.ListIndex = frmMain.Combo1.ListCount - 1 Then Exit Do frmMain.Combo1.ListIndex = frmMain.Combo1.ListIndex + 1 Loop
thanks in advance




)

Reply With Quote