VMware ThinApp | Thinstall (Часть 4) - [20] :: Программы :: Компьютерный форум Ru.Board

romby
вот честное слово - придумали мне занятие...
отдыхаю я после ударного месяца, так нет ))
ладно. начинаем разборки полётов.
THINSTALL_SANDBOX_DIR - переменная задающая путь к песочнице в рантайме (в процессе исполнения) она и должна быть пустой - что вам, собственно, и показывает скрипт. согласно мануала: если задать эту переменную, все песочницы будут создаваться по указанному там пути. задать её можно двумя путями: прописать в систему - так же, как и все другие переменные окружения, либо скриптом. скрипт тоже можно "включить" двумя путями: при сборке (какой в этом смысл - я хз) или поместив его в папку Program Files/ThinstallPlugins.
в свете озвученной вами задачи - её надо проверять, вдруг она существует у юзера.
также проверяется наличие переменной окружения <sandbox_name>_SANDBOX_DIR.
способы задания - те же.

опять же, согласно мануала - ThinApp ищет песочницу в такой последовательности:
1. <sandbox_name>_SANDBOX_DIR
2. THINSTALL_SANDBOX_DIR
3. <exe_directory>\<sandbox_name>.<computer_name>
4. <exe_directory>\<sandbox_name>
5. <exe_directory>\Thinstall\<sandbox_name>.<computer_name>
6. <exe_directory>\Thinstall\<sandbox_name>
7. <sandbox_path>\<sandbox_name>.<computer_name>
8. <sandbox_path>\<sandbox_name>
9. %AppData%\Thinstall\<sandbox_name>.<computer_name>
10. %AppData%\Thinstall\<sandbox_name>

первая найденная используется. если ничего не найдено - создаётся новая, согласно Package.ini

отсюда у вас должен быть такой же алгоритм поиска песочницы: последовательно проверяем всё и если там пусто - читаем Package.ini
примерно так:

Код:

ThinstallSandboxDir = GetEnvironmentVariable("<sandbox_name>_SANDBOX_DIR")
if ThinstallSandboxDir ="" then
MsgBox "пусто", VBOKOnly + VBInformation, "ThinApp"
else
MsgBox "путь: " & ThinstallSandboxDir , VBOKOnly + VBInformation, "ThinApp"
end if

вместо <sandbox_name> подставляете реальное имя песочницы.
и далее - по всем пунктам, подставляя вместо <...> реальные имена.
если "одноразово" - можно вписать руками. для автоматизации:

Код:

tempName = GetBuildOption("SandboxName") + "_SANDBOX_DIR"
ThinstallSandboxDir = GetEnvironmentVariable(tempName)
...

пояснение: для строковых переменных знаки "+" и "&" равнозначны

P.S. а в vbs я вовсе не гуру - просто существуют общие правила программирования и это - одно из них. кроме того, что строгое следование ему гарантирует беспроблемность в плане работы программы, написанной на любом языке, гораздо проще разбираться и модифицировать программу, когда она чётко структурирована - даже если пишешь для себя. уж поверьте - это подсказывает мой собственный опыт. когда-то я тоже грешил многоэтажными конструкциями, ведь кажется, что так проще и быстрей. только когда через время пытаешься во всём этом разобраться...

P.P.S.чтобы магнет был магнетом, а не непонятно чем - снимите галку "разрешить смайлики" в сообщении.
а книга - не лучше мануала от Astra55. я её просматривал в своё время и ничего нового не нашёл - по сравнению с мануалом

Модерирует : gyra, Maz
Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69