Forum Discussion
Dmitry_Nikolaev
Staff
14 years agoHi Yehuda,
Modify your script in the following way:
Sub ChangeASaMenuPath ()
Dim Application
Dim os64bits
Dim aSaMenu
os64bits = Sys.OSInfo.Windows64bit
Set aSaMenu = TestedApps.aSaMenu
If os64bits Then
aSaMenu.Path = Replace(aSaMenu.Path,"Program Files","Program Files (x86)")
Else
aSaMenu.Path = Replace(aSaMenu.Path,"Program Files (x86)","Program Files")
End If
End Sub