Size: a a a

2020 June 22

M

Mykola in QA_ua
Ну и чем оно собрано, как оно собрано. Но обычно это проблема в ca user/system context.
источник

AS

Alek Shulzhenko in QA_ua
я не могу пиндовать. пришел л3р, вот такой:

Error 1720.There is a problem with this Windows Installer package. A script required for this install to complete could not be run. Contact your support personnel or package vendor. Custom action GetMsiVersion script error -2147319780, :  Line 8, Column 1,
источник

M

Mykola in QA_ua
Вот у тебя есть ca getmsiversion. Он выдал срань в качетсве еррор кода. См что за скрипт, и что у него в 8 строке.
источник

M

Mykola in QA_ua
Ca - custom action.
источник

AS

Alek Shulzhenko in QA_ua
installer action that is failing is trying to read the file version of of a DLL in the Windows folder
источник

AS

Alek Shulzhenko in QA_ua
вот как заблокировать чтение версии длл-ки
источник

M

Mykola in QA_ua
Забрать права на чтение
источник

AS

Alek Shulzhenko in QA_ua
всей дире для юзера из под которого проходит интсалл?
источник

M

Mykola in QA_ua
Тут сложно. Потому, что ты вызываешь инсталяцию, но хз куда ты лезешь. Wininstaller может работать в контексте пользователя, а может быть в system контексте, если прошол context elevation
источник

M

Mykola in QA_ua
Alek Shulzhenko
всей дире для юзера из под которого проходит интсалл?
Можешь для начала так попробовать.
источник

M

Mykola in QA_ua
В каком контексте стоит ca getmsiversion у вас?
источник

AS

Alek Shulzhenko in QA_ua
я пробовал сделать обратные действия, описанные в этом шаге:
Step 4: Check the permissions

Verify the System has Full Control on the following key:

Navigate to the following entry and right-click.

HKEY_LOCAL_MACHINE \Software\Microsoft\Windows\CurrentVersion\Installer

Click Permissions.  Click SYSTEM.  If it doesn’t have FULL CONTROL
источник

AS

Alek Shulzhenko in QA_ua
т.е. забрать в реестре права у системы на полный контроль
источник

AS

Alek Shulzhenko in QA_ua
Mykola
В каком контексте стоит ca getmsiversion у вас?
в код инсталлера не пускают. могу только читать коментарии опса
источник

M

Mykola in QA_ua
Тю. Msi есть?
источник

AS

Alek Shulzhenko in QA_ua
да
источник

M

Mykola in QA_ua
Ставишь orca/instead и сам смотри
источник

M

Mykola in QA_ua
Нахер такого опса
источник

M

Mykola in QA_ua
источник

AS

Alek Shulzhenko in QA_ua
Mykola
В каком контексте стоит ca getmsiversion у вас?
strX64 = Session.Property("Msix64")
if Len(strX64) > 0 Then
 strSysFolder = Session.Property("System64Folder")
else
 strSysFolder = Session.Property("SystemFolder")
end if
strMSIDLL = strSysFolder + "msi.dll"
Set objFSO = CreateObject("Scripting.FileSystemObject")
strMsiVersion = objFSO.GetFileVersion(strMSIDLL)
Session.Property("FULLMSIVERSION") = strMsiVersion

Dim astrMsiParsedVersion(4)
i = 0
'find loc of first dot
iPos = InStr(strMsiVersion, ".")
While iPos > 0
   'save off everything to the left of the dot in array dimension
   astrMsiParsedVersion(i) = Left(strMsiVersion, iPos - 1)

   'strip off everything to the left of the now saved dot
   strMsiVersion = Right(strMsiVersion, Len(strMsiVersion) - iPos)
   i = i + 1
   iPos = InStr(strMsiVersion, ".")
Wend
astrMsiParsedVersion(i) = strMsiVersion
Session.Property("MSIMAJVERSION") = astrMsiParsedVersion(0)
Session.Property("MSIMINVERSION") = astrMsiParsedVersion(1)
Session.Property("MSIBUILDVERSION") = astrMsiParsedVersion(2)
Session.Property("MSIREVVERSION") = astrMsiParsedVersion(3)
источник