Скрипт, скомпилированный в .exe, работает только там где установлен AutoIT.

lavio · 10 Апр 2014

Создал себе скриптик, который устанавливает различные вещи на ОС (directx, framework и т.д.) для упрощения жизни. Однако работает он только там где был создан. То есть у меня есть машина на ней установлен autoit, конвертер в exe, и редактор. На ней создаю скрипт конвертирую в exe, запускаю все работает. Копирую на флешку всю папку (все пути в скрипте указаны относительно корня папки, а "установщик" лежит в самом корне папки). Запускаю на другом компе, мой установщик запускает окно с приветствием, запускают статусные сообщение, однако сами установщики от софта не запускаются. В чем может быть проблема? Возможно в компиляторе где-то есть галочка включить в exe все необходимые библиотеки или что-то похожее? Я такой не нашел.

madmasles · 10 Апр 2014

lavio,
Покажите Ваш скрипт.

lavio · 10 Апр 2014

Код:

#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <SendMessage.au3> ;Needed for _SendMessage function.
#include <ProgressConstants.au3>
#include <GUIConstantsEx.au3>
Global $hSplash
Func _SplashTextProgress($sText)
       SplashOff() ;Turn previous splash text screens off.
       $hSplash = GUICreate("", 500, 150, -1, -1, BitOR($WS_POPUP, $WS_BORDER), BitOR($WS_EX_TOPMOST, $WS_EX_WINDOWEDGE, $WS_EX_TOOLWINDOW))
       $iProgressBar = GUICtrlCreateProgress(30, 100, 440, 35, $PBS_MARQUEE) ;A Marquee progress bar.
       _SendMessage(GUICtrlGetHandle(-1), $PBM_SETMARQUEE, True, 80) ;last parameter is update time in ms. Sends message to run the Marquee progress bar.
       $iMessage = GUICtrlCreateLabel($sText, 0, 20, 500, 50, $SS_CENTER)
       GUICtrlSetFont(-1, 16, 500, 0, "Courier New")
       GUISetState(@SW_SHOW)
       Return SetExtended($iProgressBar, $hSplash)

EndFunc

$hProgressSplash = _SplashTextProgress("Внимание! Идет установка компонетов. Ждите...")
MsgBox(4096, "Отчет", "Установка DirectX", 5)
RunWait('"DirectX\Unzip\DXSETUP.exe" /silent')
MsgBox(4096, "Отчет", "DirectX установлен", 3)
Switch @OSVersion
	Case "WIN_7"
		Switch @OSArch
			Case "X86"
				MsgBox(4096, "Отчет", "Установка обновления времени для Windows 7 x32", 5)
				RunWait('"Time\Windows6.1-KB2570791-x86.msu" /quiet')
			Case "X64"
				MsgBox(4096, "Отчет", "Установка обновления времени для Windows 7 x64", 5)
				RunWait('"Time\Windows6.1-KB2570791-x64.msu" /quiet')
		EndSwitch
	Case "WIN_XP"
		MsgBox(4096, "Отчет", "Установка обновления времени для ОС Windows 7 x64", 5)
		RunWait('"Time\WindowsXP-KB2570791-x86-RUS.exe" /quiet')
EndSwitch
MsgBox(4096, "Отчет", "Обновление времени установлено", 3)

Switch @OSVersion
	Case "WIN_7"
		MsgBox(4096, "Отчет", "Установка фреймворка для Windows 7", 5)
		RunWait('"Net. Framework\dotNetFx40_Full_x86_x64.exe" -c -aiq /quiet /norestart')
		MsgBox(4096, "Отчет", "Фреймворк 4.0 установлен", 3)
		RunWait('"Net. Framework\dotNetFx45_Full_x86_x64.exe" -c -aiq /quiet /norestart')
		MsgBox(4096, "Отчет", "Фреймворк 4.5 установлен", 3)
		RunWait('"Net. Framework\NDP451-KB2858728-x86-x64-AllOS-ENU.exe" -c -aiq /quiet /norestart')
		MsgBox(4096, "Отчет", "Фреймворк 4.5.1 установлен", 3)
	Case "WIN_XP"
		MsgBox(4096, "Отчет", "Установка фреймворка для Windows XP", 5)
		RunWait('"Net. Framework\dotnetfx35setup.exe" -c -aiq /quiet /norestart')
		MsgBox(4096, "Отчет", "Фреймворк 3.5 установлен", 3)
		RunWait('"Net. Framework\dotNetFx40_Full_x86_x64.exe" -c -aiq /quiet /norestart')
		MsgBox(4096, "Отчет", "Фреймворк 4.0 установлен", 3)
EndSwitch
MsgBox(4096, "Отчет", "Установка фреймворков закончена", 3)

Switch @OSArch
	Case "X86"
		MsgBox(4096, "Отчет", "Установка пакета MS Vusal C++ для x32 ОС", 5)
		RunWait('"Microsoft Visual C++\VCRHyb86.exe" -c /S')
		MsgBox(4096, "Отчет", "Библиотеки C++ установлены", 3)
	Case "X64"
		MsgBox(4096, "Отчет", "Установка пакета MS Vusal C++ для x64 ОС", 5)
		RunWait('"Microsoft Visual C++\VCRHyb64.exe" -c /S')
		MsgBox(4096, "Отчет", "Библиотеки C++ установлены", 3)
EndSwitch

GUIDelete($hSplash)
GUICreate('Завершение установки', 420, 100)
GUICtrlCreateLabel("Установка завершена. Компьютер будет перезагруженч ерез 10 секунд.",20,20)
GUISetState(@SW_SHOW)
Sleep(10000)
Shutdown(2)

Даже если выкинуть код отвечающий за прогрессбар, проблема остается.

madmasles · 10 Апр 2014

Предупреждение За нарушение правил форума (пункт В.11):

Любые отрывки AutoIt кода необходимо заключать в тег [autoit]

(подробнее), а обычный код соответственно в тег [code]

(подробнее). Также большие выдержки текста помещайте под тег [spoiler]

(подробнее), там где это поддерживается естественно. Как в случае с названием темы, также короткое и эргономичное сообщение привлекает больше внимания, и шансы на получение конкретного ответа увеличиваются.

С уважением, ваш Глобальный модератор.

lavio · 10 Апр 2014

По самой проблеме ответ будет? :smile:

madmasles · 10 Апр 2014

lavio [?]

По самой проблеме ответ будет?

~~Будет, но только после адекватной реакции на предупреждение.~~ Сам исправил на нужные теги.
Добавьте в начало скрипта

Код:

If @WorkingDir <> @ScriptDir Then FileChangeDir(@ScriptDir)

Или все пути поменяйте по этому примеру

Код:

RunWait('"' & @ScriptDir & '\DirectX\Unzip\DXSETUP.exe" /silent')

lavio · 10 Апр 2014

Попробовал оба варианта - не помогли.
1) Добавил следующим образом

Код:

#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <SendMessage.au3> ;Needed for _SendMessage function.
#include <ProgressConstants.au3>
#include <GUIConstantsEx.au3>
If @WorkingDir <> @ScriptDir Then FileChangeDir(@ScriptDir)
Global $hSplash
...

2) Изменил все пути на аналоги примера. Несколько раз перепроверил все кавычки в путях.
И в том и в другом случае ведет себя также как и раньше.

C2H5OH · 10 Апр 2014

lavio,
не могли бы вы указать на какой ОС вы компилируете скрипт?
Весь процесс работы скрипта насыщен окнами. Какое последнее собщение показывается при запуске .exe на компьютере пользователя?
Вы указали в профайле версию AutoIt 3.3.8.1. Это актуальные цифры? Так и есть?

И теперь самое главное. Если на компьютере пользователя установить AutoIt (просто установить и всё), а потом запустить ваш .exe, он будет работать?
(попробуйте, пожалуйста, на одном компе в качестве теста)

InnI · 10 Апр 2014

lavio [?]

В чем может быть проблема?

Код:

#RequireAdmin

lavio · 10 Апр 2014

C2H5OH,
компилируется на win7 x32, запускал пока на win7 x32(На которой компилил) и на win7 x64.
Да версия 3.3.8.1.
Если установить AutoIT на клиента (win7 x64) то все ставится как надо. Попозже попробую на виртуалке поднять голую win7 x32 и там проверить.

InnI,
Скрипт запускается из-под админской учетки.

madmasles · 10 Апр 2014

lavio [?]

И в том и в другом случае ведет себя также как и раньше.

Что будет показывать этот код?

Код:

MsgBox(64, 'DXSETUP.exe', 'FileExists(' & @ScriptDir & '\DirectX\Unzip\DXSETUP.exe) = ' & FileExists(@ScriptDir & '\DirectX\Unzip\DXSETUP.exe'))
Switch @OSVersion
	Case 'WIN_7'
		Switch @OSArch
			Case 'X86'
				MsgBox(64, 'Windows6.1-KB2570791-x86.msu', 'FileExists(' & @ScriptDir & '\Time\Windows6.1-KB2570791-x86.msu) = ' & _
						FileExists(@ScriptDir & '\Time\Windows6.1-KB2570791-x86.msu'))
			Case 'X64'
				MsgBox(64, 'Windows6.1-KB2570791-x64.msu', 'FileExists(' & @ScriptDir & '\Time\Windows6.1-KB2570791-x64.msu) = ' & _
						FileExists(@ScriptDir & '\Time\Windows6.1-KB2570791-x64.msu'))
		EndSwitch
	Case 'WIN_XP'
		MsgBox(64, 'WindowsXP-KB2570791-x86-RUS.exe', 'FileExists(' & @ScriptDir & '\Time\WindowsXP-KB2570791-x86-RUS.exe) = ' & _
				FileExists(@ScriptDir & '\Time\WindowsXP-KB2570791-x86-RUS.exe'))
EndSwitch
Switch @OSVersion
	Case 'WIN_7'
		MsgBox(64, 'dotNetFx40_Full_x86_x64.exe', 'FileExists(' & @ScriptDir & '\Net. Framework\dotNetFx40_Full_x86_x64.exe) = ' & _
				FileExists(@ScriptDir & '\Net. Framework\dotNetFx40_Full_x86_x64.exe'))
		MsgBox(64, 'dotNetFx45_Full_x86_x64.exe', 'FileExists(' & @ScriptDir & '\Net. Framework\dotNetFx45_Full_x86_x64.exe) = ' & _
				FileExists(@ScriptDir & '\Net. Framework\dotNetFx45_Full_x86_x64.exe'))
		MsgBox(64, 'NDP451-KB2858728-x86-x64-AllOS-ENU.exe', 'FileExists(' & @ScriptDir & '\Net. Framework\NDP451-KB2858728-x86-x64-AllOS-ENU.exe) = ' & _
				FileExists(@ScriptDir & '\Net. Framework\NDP451-KB2858728-x86-x64-AllOS-ENU.exe'))
	Case 'WIN_XP'
		MsgBox(64, 'dotnetfx35setup.exe', 'FileExists(' & @ScriptDir & '\Net. Framework\dotnetfx35setup.exe) = ' & _
				FileExists(@ScriptDir & '\Net. Framework\dotnetfx35setup.exe'))
		MsgBox(64, 'dotNetFx40_Full_x86_x64.exe', 'FileExists(' & @ScriptDir & '\Net. Framework\dotNetFx40_Full_x86_x64.exe) = ' & _
				FileExists(@ScriptDir & '\Net. Framework\dotNetFx40_Full_x86_x64.exe'))
EndSwitch
Switch @OSArch
	Case 'X86'
		MsgBox(64, 'VCRHyb86.exe', 'FileExists(' & @ScriptDir & '\Microsoft Visual C++\VCRHyb86.exe) = ' & _
				FileExists(@ScriptDir & '\Microsoft Visual C++\VCRHyb86.exe'))
	Case 'X64'
		MsgBox(64, 'VCRHyb64.exe', 'FileExists(' & @ScriptDir & '\Microsoft Visual C++\VCRHyb64.exe) = ' & _
				FileExists(@ScriptDir & '\Microsoft Visual C++\VCRHyb64.exe'))
EndSwitch

InnI · 10 Апр 2014

lavio [?]

Скрипт запускается из-под админской учетки.

И что? Если включён UAC, то для установки ваших приложений нужны права администратора, а не админская учётка.

C2H5OH · 10 Апр 2014

У меня с 3.3.10.2 похожая проблема. Правда, там я использую исключительно IE.au3. Но тоже все начинает работать, если установить пользователю AutoIt.
Так что я так же очень интересуюсь какие опции нужно указать при компиляции, чтобы в .exe вошло всё-всё что нужно.

lavio · 10 Апр 2014

madmasles,
Показывает:
FileExists(C:\users\1\desktop\instal\DirectX\DXSETUP.exe) = 1

madmasles · 10 Апр 2014

lavio [?]

Показывает:

Все единицы?

lavio · 10 Апр 2014

madmasles,
Да.

InnI,
Огромное спасибо! Проблемой и правда оказался включенный UAC. Век живи век учись)
Проблема решена.
Остался небольшой вопрос. Возможно ли с помощью AutoIT отключить и включить UAC? Можно просто подсказать с какого краю начать копать чтобы найти ответ :smile:

madmasles · 10 Апр 2014

lavio [?]

Остался небольшой вопрос.

Предупреждение За нарушение общих правил (пункт В.4):

Не лепите несколько вопросов разной тематики в один пост. По типу "Ребят, а ещё такой вопрос...". Каждый вопрос в свою тему.

С уважением, ваш Глобальный модератор.

Автор темы	Похожие темы	Форум	Ответы	Дата
E	Файловая система Скомпилированный скрипт не видит переменные с внешнего файла	Общие вопросы по AutoIt	13	22 Ноя 2019
A	Как передать переменную из CMD в скомпилированный скрипт?	Общие вопросы по AutoIt	4	14 Окт 2019
	IncludeSrc - Вложение исходного кода в скомпилированный скрипт	Полезняшки	1	24 Мар 2019
V	Компиляция через скомпилированный скрипт	Общие вопросы по AutoIt	14	30 Июл 2015
B	Подписать сертификатом скомпилированный скрипт	Общие вопросы по AutoIt	2	29 Мар 2015

Поиск

Поиск

Скрипт, скомпилированный в .exe, работает только там где установлен AutoIT.

lavio

Новичок

madmasles

Модератор

lavio

Новичок

madmasles

Модератор

lavio

Новичок

madmasles

Модератор

lavio

Новичок

C2H5OH

AutoIT Гуру

InnI

AutoIT Гуру

lavio

Новичок

madmasles

Модератор

InnI

AutoIT Гуру

C2H5OH

AutoIT Гуру

lavio

Новичок

madmasles

Модератор

lavio

Новичок

madmasles

Модератор