[Quote]

    bios83
  • 2205
  • Longevity: 4 years 6 months
  • Posts: 66
  • REPUTATION:8

    [+] [-]
Набор программ на мой взгляд необходимые и должны быть под рукой.
Что входит в Soft Pack:
1. Установка драйверов (Snappy Driver Installer и DriverPack Online)
2. Создание резервной копии драйверов, пароли от браузеров, wi-fi, системы и интернет соединения и т.д.(выполняется сбор паролей на основе nirsoft утилит.)
3. Набор разнообразных утилит для обслуживания и тестирования системы.
4. Набор антивирусных сканеров.
5. Набор программ для установки в систему с возможностью обновления их (есть возможность самому добавлять или удалять программы. За это отвечают Soft.ini и soft.bat)
6. Набор активаторов для Windows и Office.
7. Update раздел где есть возможность обновить большую часть программ и утилит.
Внимание, для корректной работы Soft Pack необходимо отключать антивирус, не допускать размещение в каталогах с пробелами, запускать от имени администратора.
Cкачать: https://yadi.sk/d/_zTk7LJYO6ZBrw

[Quote]

    KottoSOFT
  • 206
  • Longevity: 5 years 5 months
  • Posts: 718
  • REPUTATION:62

    [+] [-]
bios83, Как я понял, они из скрипта программки сперва скачиваються из интернета. Да? Инсталляторов то нет, а вот в скрипте ссылки имеются

Скрипт

@echo off
cls
mode con lines=2 cols=55
if not exist "%1\soft" md "%1\soft"
cd /d "%~dp0"
set "os=x86"
IF /I NOT "%PROCESSOR_ARCHITECTURE%"=="x86" set "os=x64"
goto %2
:update
:7z
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_7z
set "h1=https://sourceforge.net/projects/sevenzip/files/7-Zip/"
set "d1=title.*[0-9][0-9][.].*class.*folder"
("%~dp0http2cli.exe" "%h1%" 2| findstr /R /C:"%d1%") >"%~dp0down.txt"
for %%a in ("%~dp0down.txt") do set size=%%~za
if %size%==0 goto next_7z
<"%~dp0down.txt" (for /f "tokens=1* delims=[]" %%a in ('find /n /v ""') do set "s%%a=%%b")
FOR /F "tokens=2 delims=+++" %%a in ("%s1%") do set "f=%%a"
set "h1=https://sourceforge.net/projects/sevenzip/files/7-Zip/%f%/"
set "d1=[.]exe/download"
("%~dp0http2cli.exe" "%h1%" 2| findstr /R /C:"%d1%") >"%~dp0down.txt"
for %%a in ("%~dp0down.txt") do set size=%%~za
if %size%==0 goto 1
<"%~dp0down.txt" (for /f "tokens=1* delims=[]" %%a in ('find /n /v ""') do set "s%%a=%%b")
FOR /F "tokens=6 delims=+++" %%a in ("%s1%") do set "g1=%%a"
FOR /F "tokens=6 delims=+++" %%a in ("%s2%") do set "g2=%%a"
if exist "%1\soft\7z-x64.exe" ( for %%a in ("%1\soft\7z-x64.exe") do set "fsize=%%~za" ) else ( set "fsize=0" )
("%~dp0%os%\get.exe" S "%g1%") >"%~dp0down.txt"
Set /p nsize=<"%~dp0down.txt"
if %fsize% NEQ %nsize% (
"%~dp0axel.exe" "%g1%" -k -a -n 8 -o "%1\soft\7z-x64.exe.~"
for %%a in ("%1\soft\7z-x64.exe.~") do set size=%%~za
if !size!==0 goto next_7z
del "%1\soft\7z-x64.exe" /q
ren "%1\soft\7z-x64.exe.~" "7z-x64.exe"
)
if exist "%1\soft\7z-x86.exe" ( for %%a in ("%1\soft\7z-x86.exe") do set "fsize=%%~za" ) else ( set "fsize=0" )
("%~dp0%os%\get.exe" S "%g2%") >"%~dp0down.txt"
Set /p nsize=<"%~dp0down.txt"
if %fsize% NEQ %nsize% (
"%~dp0axel.exe" "%g2%" -k -a -n 8 -o "%1\soft\7z-x86.exe.~"
for %%a in ("%1\soft\7z-x86.exe.~") do set size=%%~za
if !size!==0 goto next_7z
del "%1\soft\7z-x86.exe" /q
ren "%1\soft\7z-x86.exe.~" "7z-x86.exe"
)
del "%~dp0down.txt" /q
del "%~dp0*.~" /q
:next_7z
if "%2"=="7z" (
cls
echo “бв ­®ўЄ  7z
call "%1\soft\7z-%os%.exe" /S
EXIT
)
:rar
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_rar
("%~dp0http2cli.exe" "https://www.win-rar.com/postdownload.html?&L=4&Version=32bit" 3| findstr /R /C:"winrar-versions") >"%~dp0down.txt"
FOR /F "usebackq tokens=2 delims=+++" %%a in ("%~dp0down.txt") do set f=%%a
::echo %f%
for %%I in ("%1\soft\winrar-x86.exe") do set "LocalFileSize=%%~zI"
"%~dp0%os%\wget.exe" --tries=1 --no-check-certificate --spider "https://www.win-rar.com%f%" -o"%~dp01log.txt"
type "%~dp01log.txt" | find /i "Length" >"%~dp0log.txt"
FOR /F "usebackq tokens=2 delims=: " %%a in ("%~dp0log.txt") do set NetFileSize=%%a
if "%NetFileSize%"=="0" set "NetFileSize=%LocalFileSize%"
if "%LocalFileSize%"=="%NetFileSize%" goto next_rar
cd /d "%1\soft"
cls
echo ‡ Јаг¦ Ґ¬ winrar-x86
"%~dp0%os%\aria2c.exe" "https://www.win-rar.com%f%" --file-allocation=falloc --allow-overwrite=true --auto-file-renaming=false -R -j10 -x10 -k1M -s10 --check-certificate=false -o "winrar-x86.exe"
("%~dp0http2cli.exe" "https://www.win-rar.com/postdownload.html?&L=4&Version=64bit" 3| findstr /R /C:"winrar-versions") >"%~dp0down.txt"
FOR /F "usebackq tokens=2 delims=+++" %%a in ("%~dp0down.txt") do set f=%%a
cls
echo ‡ Јаг¦ Ґ¬ winrar-x64
::"%~dp0axel.exe" "https://www.win-rar.com%f%" -k -a -n 8 -o "%1\soft\winrar-x64.exe"
"%~dp0%os%\aria2c.exe" "https://www.win-rar.com%f%" --file-allocation=falloc --allow-overwrite=true --auto-file-renaming=false -R -j10 -x10 -k1M -s10 --check-certificate=false -o "winrar-x64.exe"
:next_rar
del "%~dp0log.txt"
del "%~dp01log.txt"
del "%~dp0*down.txt"
if "%2"=="rar" (
cls
echo “бв ­®ўЄ  winrar
copy "%~dp0rarreg.key" "%1\soft\rarreg.key"
call "%1\soft\winrar-%os%.exe" /S
EXIT
)
:Flash
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Flash
cd /d "%~dp0"
for %%I in ("%1\soft\install_flash_player.exe") do set "LocalFileSize=%%~zI"
for /f "delims=" %%a in ('%os%\Get.exe S "http://fpdownload.macromedia.com/pub/flashplayer/latest/help/install_flash_player.exe"') do set "NetFileSize=%%a"
if "%NetFileSize%"=="0" set "NetFileSize=%LocalFileSize%"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Flash
cd /d "%1\soft"
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://fpdownload.macromedia.com/pub/flashplayer/latest/help/install_flash_player.exe"
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://fpdownload.macromedia.com/pub/flashplayer/latest/help/install_flash_player_ppapi.exe"
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://fpdownload.macromedia.com/pub/flashplayer/latest/help/install_flash_player_ax.exe"
:next_Flash
if "%2"=="Flash" (
cls
echo “бв ­®ўЄ  flash player
call "%1\soft\install_flash_player.exe" -install
call "%1\soft\install_flash_player_ax.exe" -install
call "%1\soft\install_flash_player_ppapi.exe" -install
EXIT
)
:DirectX
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_DirectX
for %%I in ("%1\soft\DirectX.exe") do set "LocalFileSize=%%~zI"
for /f "delims=" %%a in ('%os%\Get.exe S "http://download.drp.su/soft/DirectX.exe"') do set "NetFileSize=%%a"
if "%NetFileSize%"=="0" set "NetFileSize=%LocalFileSize%"
if "%LocalFileSize%"=="%NetFileSize%" goto next_DirectX
cls
echo DirectX
"%~dp0%os%\wget.exe" -N "http://download.drp.su/soft/DirectX.exe" -P "%1\soft"
:next_DirectX
if "%2"=="DirectX" (
cls
echo “бв ­®ўЄ  DirectX
call "%1\soft\DirectX.exe"
EXIT
)
:VisualC
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_VisualC
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://download.drp.su/soft/RuntimePack.exe" -P "%1\soft"
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://download.drp.su/soft/VisualCplus.exe" -P "%1\soft"
:next_VisualC
if "%2"=="SF" (
cls
echo “бв ­®ўЄ  VisualCplus
call "%1\soft\VisualCplus.exe"
cls
echo “бв ­®ўЄ  RuntimePack
call "%1\soft\RuntimePack.exe" -y -gm2 -fm0
EXIT
)
:Firefox
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Firefox
cd /d "%~dp0"
for %%I in ("%1\soft\Firefox-x86.exe") do set "LocalFileSize=%%~zI"
for /f "delims=" %%a in ('%os%\Get.exe S "http://download.mozilla.org/?product=firefox-latest&os=win&lang=ru"') do set "NetFileSize=%%a"
if "%NetFileSize%"=="0" set "NetFileSize=%LocalFileSize%"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Firefox
cls
echo Firefox x86
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://download.mozilla.org/?product=firefox-latest&os=win&lang=ru" -O "%1\soft\Firefox-x86.exe"
cls
echo Firefox x64
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://download.mozilla.org/?product=firefox-latest&os=win64&lang=ru" -O "%1\soft\Firefox-x64.exe"
:next_Firefox
if "%2"=="Firefox" (
cd /d "%1\soft"
cls
echo “бв ­®ўЄ  Firefox
call "%1\soft\Firefox-%os%.exe" -ms -ira
EXIT
)
:Yandex
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Yandex
cd /d "%~dp0"
for %%I in ("%1\soft\Yandex.exe") do set "LocalFileSize=%%~zI"
for /f "delims=" %%a in ('%os%\Get.exe S "http://download.cdn.yandex.net/browser/yandex/ru/Yandex.exe"') do set "NetFileSize=%%a"
if "%NetFileSize%"=="0" set "NetFileSize=%LocalFileSize%"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Yandex
cls
"%~dp0%os%\wget.exe" -cN --content-disposition --waitretry=5 -t5 -T15 "http://download.cdn.yandex.net/browser/yandex/ru/Yandex.exe" -P "%1\soft"
:next_Yandex
if "%2"=="Yandex" (
cls
echo “бв ­®ўЄ  Yandex
call "%1\soft\Yandex.exe" /silent
ping -n 5 -w 1000 127.0.0.1
taskkill /f /im browser.exe
"%localappdata%\Yandex\YaPin\YandexWorking.exe" --uninstall --nopinned
EXIT
)
:chrome
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_chrome
cd /d "%~dp0"
for %%I in ("%1\softGoogleChromeStandaloneEnterprise.msi") do set "LocalFileSize=%%~zI"
for /f "delims=" %%a in ('%os%\Get.exe S "http://dl.google.com/edgedl/chrome/install/GoogleChromeStandaloneEnterprise.msi"') do set "NetFileSize=%%a"
if "%NetFileSize%"=="0" set "NetFileSize=%LocalFileSize%"
if "%LocalFileSize%"=="%NetFileSize%" goto next_chrome
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://dl.google.com/edgedl/chrome/install/GoogleChromeStandaloneEnterprise.msi" -P "%1\soft"
cls
"%~dp0%os%\wget.exe" -N --waitretry=5 -t5 -T15 "http://dl.google.com/edgedl/chrome/install/GoogleChromeStandaloneEnterprise64.msi" -P "%1\soft"
:next_chrome
if "%2"=="chrome" (
cls
echo “бв ­®ўЄ  Google Chrome
IF EXIST "%ProgramFiles(x86)%" ("%1\soft\GoogleChromeStandaloneEnterprise64.msi" /qb) Else ("%1\soft\GoogleChromeStandaloneEnterprise.msi" /qb)
EXIT
)
:ABBYY
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_ABBYY
if not exist "%1\soft\FineReader.exe" del "%1\soft\FineReader_size_test.txt"
rmdir "%~dp0Temp" /s /q
cls
set f=0
:st
cls
echo €йг Ї® бва ­Ёж ¬ %f%
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/ofis/page/%f%/" 3| findstr /R /C:"abbyy-finereader" | findstr /R /C:"repack-portable-by-diakov") >"%~dp0down.txt"
for %%I in ("%~dp0down.txt") do set Size=%%~zI
set /a f=%f%+1
if "%Size%"=="0" goto st
for /f "usebackq tokens=4 delims=+++" %%i in (`find /n /v "" %~dp0down.txt ^| find "[1]"`) do set "url=%%i"
cls
::echo %url%
("%~dp0http2cli.exe" "%url%" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=5 delims=+++=" %%i in (`find /n /v "" %~dp0down1.txt`) do set "dow=%%i"
for /f "usebackq tokens=2 delims=:(" %%i in (`find /n /v "" %~dp0down1.txt`) do set "ver=%%i"
echo %ver% >"%~dp0i-FineReader.txt"
set /p lurl=< "%1\soft\FineReader.txt"
set /p iurl=< "%~dp0i-FineReader.txt"
if "%iurl%"=="%lurl%" goto next_ABBYY
cls
echo ‡ Јаг¦ о
"%~dp0%os%\aria2c.exe" "http://gtorrent.ru/engine/download.php?id=%dow%" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true --check-certificate=false -d "%~dp0temp\."
FOR /r "%~dp0temp" %%a in (*.exe) DO move /Y "%%a" "%1\soft\FineReader.exe"
move "%~dp0i-FineReader.txt" "%1\soft\FineReader.txt"
rmdir "%~dp0Temp" /s /q
del "%~dp0down1.txt"
del "%~dp0down.txt"
del "%~dp0*.torrent"
:next_ABBYY
del "%~dp0down1.txt"
del "%~dp0down.txt"
del "%~dp0i-FineReader.txt"
if "%2"=="ABBYY" (
cls
echo “бв ­®ўЄ  ABBYY FineReader
IF EXIST "%1\soft\FineReader.exe" call "%1\soft\FineReader.exe" /S /I
EXIT
)
:Acrobat
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Acrobat
cls
rmdir "%~dp0Temp" /s /q
cls
set f=0
:st
cls
echo €йг Ї® бва ­Ёж ¬ %f%
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/ofis/page/%f%/" 3| findstr /R /C:"adobe-acrobat-pro-dc" | findstr /R /C:"repack-by-dakov") >"%~dp0down.txt"
for %%I in ("%~dp0down.txt") do set Size=%%~zI
set /a f=%f%+1
if "%Size%"=="0" goto st
for /f "usebackq tokens=4 delims=+++" %%i in (`find /n /v "" %~dp0down.txt`) do set "url=%%i"
cls
::echo %url%
::pause
("%~dp0http2cli.exe" "%url%" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=2 delims=:[" %%i in (`find /n /v "" %~dp0down1.txt`) do set "ver=%%i"
for /f "usebackq tokens=5 delims=+++=" %%i in (`find /n /v "" %~dp0down1.txt`) do set "dow=%%i"
echo %ver% >"%~dp01file.txt"
if not exist "%1\soft\AcrobatReaderProDC.exe" del "%1\soft\AcrobatReaderProDC.txt"
set /p LocalFileSize=< "%1\soft\AcrobatReaderProDC.txt"
set /p NetFileSize=< "%~dp01file.txt"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Acrobat
cls
echo ‡ Јаг¦ о
"%~dp0%os%\aria2c.exe" "http://gtorrent.ru/engine/download.php?id=%dow%" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true --check-certificate=false -d "%~dp0temp\."
FOR /r "%~dp0Temp" %%i IN (*.exe) DO move /y "%%i" "%1\soft\AcrobatReaderProDC.exe"
rmdir "%~dp0Temp" /s /q
move "%~dp01file.txt" "%1\soft\AcrobatReaderProDC.txt"
del "%~dp0*.torrent"
:next_Acrobat
del "%~dp01file.txt"
del "%~dp0down.txt"
del "%~dp0down1.txt"
if "%2"=="Acrobat" (
cls
echo “бв ­®ўЄ  AcrobatReaderDC
IF EXIST "%1\soft\AcrobatReaderProDC.exe" call "%1\soft\AcrobatReaderProDC.exe" /S
EXIT
)
:K-Lite
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_K-Lite
cls
("%~dp0http2cli.exe" "https://www.codecguide.com/download_k-lite_codec_pack_mega.htm" 1| findstr /R /C:"http://files2.codecguide.com") >"%~dp0down.txt"
FOR /F "usebackq tokens=2 delims==>" %%a in ("%~dp0down.txt") do set link=%%a
cls
"%~dp0%os%\wget.exe" -cN --tries=1 "%link%" -O"%1\soft\K-Lite_Codec_Pack_Mega.exe"
del "%~dp0down.txt"
del "%~dp0size_test.txt"
:next_K-Lite
del "%~dp0down.txt"
if "%2"=="K-Lite" (
cls
echo “бв ­®ўЄ  K-Lite Codec Pack Mega
IF EXIST "%1\soft\K-Lite_Codec_Pack_Mega.exe" call "%1\soft\K-Lite_Codec_Pack_Mega.exe" /VERYSILENT /NORESTART
SCHTASKS /delete /TN "klcp_update" /f
EXIT
)
:PotPlayer
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_PotPlayer
cls
echo ‡ Јаг¦ Ґ¬ PotPlayer-x86
"%~dp0%os%\wget.exe" -cN --tries=1 "http://get.daum.net/PotPlayer/Version/Latest/PotPlayerSetup.exe" -O "%1\soft\PotPlayer-x86.exe"
cls
echo ‡ Јаг¦ Ґ¬ PotPlayer-x64
"%~dp0%os%\wget.exe" -cN --tries=1 "http://get.daum.net/PotPlayer64/Version/Latest/PotPlayerSetup64.exe" -O "%1\soft\PotPlayer-x64.exe"
:next_PotPlayer
if "%2"=="PotPlayer" (
cls
echo “бв ­®ўЄ  PotPlayer-%OS%
call "%1\soft\PotPlayer-%OS%.exe" /S
REGEDIT /S "%~dp0PotPlayerMini-%OS%.reg"
if exist "%~dp0Skins.exe" "%~dp0Skins.exe"
EXIT
)
:UltraISO
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_UltraISO
rmdir "%~dp0Temp" /s /q
cls
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/rabota-s-faylami/54665-ultraiso-premium-edition-*-repack-portable-by-elchupacabra-multi-ru.html" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=4 delims=+++" %%i in (`find /n /v "" %~dp0down1.txt ^| find "[1]"`) do set "dow=%%i"
if not exist "%1\soft\UltraISO.exe" del "%1\soft\UltraISO.txt"
cls
::echo %dow%
echo %dow% >i-UltraISO.txt
set /p lurl=< "%1\soft\UltraISO.txt"
set /p iurl=< "%~dp0i-UltraISO.txt"
if "%iurl%"=="%lurl%" goto next_UltraISO
cls
md "%1\soft\Temp"
echo ‡ Јаг¦ Ґ¬ UltraISO
"%~dp0%os%\aria2c.exe" "http://gtorrent.ru%dow%" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true -d "%1\soft\temp"
FOR /r "%1\soft\temp" %%a in ("*.exe") DO move /y "%%a" "%1\soft\UltraISO.exe"
move /y "%~dp0i-UltraISO.txt" "%1\soft\UltraISO.txt"
rmdir "%1\soft\Temp" /s /q
:next_UltraISO
del "%~dp0i-UltraISO.txt"
del "%~dp0down.txt"
del "%~dp0down1.txt"
del "%~dp0*.torrent"
cls
if "%2"=="UltraISO" (
cls
echo “бв ­®ўЄ  UltraISO
call "%1\soft\UltraISO.exe" /SILENT
EXIT
)
:ESET
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_ESET
cls
rmdir "%~dp0Temp" /s /q
cls
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/bezopasnost/eset-nod32-antivirus/69507-eset-nod32-antivirus-smart-security-803191-repack-by-kpojiuk-24082018-ru-en.html" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=2 delims=:[" %%i in (`find /n /v "" %~dp0down1.txt`) do set "ver=%%i"
for /f "usebackq tokens=5 delims=+++=" %%i in (`find /n /v "" %~dp0down1.txt`) do set "dow=%%i"
echo %ver% >"%~dp01file.txt"
if not exist "%1\soft\ESET8.exe" del "%1\soft\ESET8.txt"
set /p LocalFileSize=< "%1\soft\ESET8.txt"
set /p NetFileSize=< "%~dp01file.txt"
if "%LocalFileSize%"=="%NetFileSize%" goto next_ESET
echo ‡ Јаг¦ о
"%~dp0%os%\aria2c.exe" "http://gtorrent.ru/engine/download.php?id=%dow%" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true --check-certificate=false -d "%~dp0temp\."
FOR /r "%~dp0Temp" %%i IN (*.exe) DO move /y "%%i" "%1\soft\ESET8.exe"
rmdir "%~dp0Temp" /s /q
move "%~dp01file.txt" "%1\soft\ESET8.txt"
:next_ESET
del "%~dp01file.txt"
del "%~dp0*down.txt"
if "%2"=="ESET" (
cls
echo “бв ­®ўЄ  ESET NOD32 Smart Security 8
IF EXIST "%1\soft\ESET8.exe" call "%1\soft\ESET8.exe" /S /RUS
EXIT
)
:Office2007E
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Office2007E
cls
rmdir "%1\soft\Temp" /s /q
md "%1\soft\Temp"
cls
::цикл поиска по страницам
set f=0
:sto
set /a f=%f%+1
cls
echo €йг Ї® бва ­Ёж ¬ %f%
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/ofis/page/%f%/" 3| findstr /R /C:"microsoft-office-2007-enterprise" | findstr /R /C:"repack-by-specialist") >"%~dp0down.txt"
for %%I in ("%~dp0down.txt") do set Size=%%~zI
if "%Size%"=="0" goto sto
::Получении ссылки на страницу
for /f "usebackq tokens=7 delims=+++" %%i in (`find /n /v "" %~dp0down.txt ^| find "[1]"`) do set "url=%%i"
cls
::echo %url%
::pause
("%~dp0http2cli.exe" "%url%" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=2 delims=:[" %%i in (`find /n /v "" %~dp0down1.txt`) do set "ver=%%i"
for /f "usebackq tokens=8 delims=+++=" %%i in (`find /n /v "" %~dp0down1.txt`) do set "dow=%%i"
echo %ver% >"%~dp01file.txt"
cls
::echo %dow%
::pause
if not exist "%1\soft\office2007.exe" del "%1\soft\office2007.txt"
set /p LocalFileSize=< "%1\soft\office2007.txt"
set /p NetFileSize=< "%~dp01file.txt"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Office2007E
"%~dp0%os%\wget.exe" -cN --tries=1 http://gtorrent.ru/engine/download.php?id=%dow% -O"%~dp0minstall.torrent"
"%~dp0%os%\aria2c.exe" "%~dp0minstall.torrent" -S >"%~dp0idx0.txt"
type "%~dp0idx0.txt" | find /i "Office_" >"%~dp0idx.txt"
FOR /F "tokens=1,* delims=|" %%a in ('type "%~dp0idx.txt"') do set idx=%%a
::echo %idx%
::Удаление пробелов
set idx=%idx: =%
cls
echo ‡ Јаг¦ о Microsoft Office Enterprise 2007
"%~dp0%os%\aria2c.exe" "%~dp0minstall.torrent" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true --check-certificate=false --select-file=%idx% -d "%1\soft\temp\."
FOR /r "%1\soft\Temp" %%i IN (office*2007*.exe) DO move /y "%%i" "%1\soft\office2007.exe"
rmdir "%1\soft\Temp" /s /q
move "%~dp01file.txt" "%1\soft\office2007.txt"
:next_Office2007E
del "%~dp01file.txt"
del "%~dp0*down.txt"
del "%~dp0minstall.torrent"
del "%~dp0idx*.txt"
if "%2"=="Office2007E" (
cls
echo “бв ­®ўЄ  Microsoft Office Enterprise 2007
IF EXIST "%1\soft\office2007.exe" call "%1\soft\office2007.exe" -ais
EXIT
)
:Office2010p
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Office2010p
cls
rmdir "%1\soft\Temp" /s /q
md "%1\soft\Temp"
cls
::цикл поиска по страницам
set f=0
:st1
set /a f=%f%+1
cls
echo €йг Ї® бва ­Ёж ¬ %f%
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/ofis/page/%f%/" 3| findstr /R /C:"microsoft-office-2010" | findstr /R /C:"repack-by-specialist") >"%~dp0down.txt"
for %%I in ("%~dp0down.txt") do set Size=%%~zI
if "%Size%"=="0" goto st1
::Получении ссылки на страницу
for /f "usebackq tokens=7 delims=+++" %%i in (`find /n /v "" %~dp0down.txt ^| find "[1]"`) do set "url=%%i"
cls
::echo %url%
::pause
("%~dp0http2cli.exe" "%url%" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=2 delims=:[" %%i in (`find /n /v "" %~dp0down1.txt`) do set "ver=%%i"
for /f "usebackq tokens=8 delims=+++=" %%i in (`find /n /v "" %~dp0down1.txt`) do set "dow=%%i"
echo %ver% >"%~dp01file.txt"
cls
::echo %dow%
::pause
if not exist "%1\soft\office2010.exe" del "%1\soft\office2010.txt"
set /p LocalFileSize=< "%1\soft\office2010.txt"
set /p NetFileSize=< "%~dp01file.txt"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Office2010p
"%~dp0%os%\wget.exe" -cN --tries=1 http://gtorrent.ru/engine/download.php?id=%dow% -O"%~dp0minstall.torrent"
"%~dp0%os%\aria2c.exe" "%~dp0minstall.torrent" -S >"%~dp0idx0.txt"
type "%~dp0idx0.txt" | find /i "Office_" >"%~dp0idx.txt"
FOR /F "tokens=1,* delims=|" %%a in ('type "%~dp0idx.txt"') do set idx=%%a
::echo %idx%
::Удаление пробелов
set idx=%idx: =%
cls
echo ‡ Јаг¦ о Microsoft Office Enterprise 2010
"%~dp0%os%\aria2c.exe" "%~dp0minstall.torrent" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true --check-certificate=false --select-file=%idx% -d "%1\soft\temp\."
FOR /r "%1\soft\Temp" %%i IN (office*2010*.exe) DO move /y "%%i" "%1\soft\office2010.exe"
rmdir "%1\soft\Temp" /s /q
move "%~dp01file.txt" "%1\soft\office2010.txt"
:next_Office2010p
del "%~dp01file.txt"
del "%~dp0*down.txt"
del "%~dp0minstall.torrent"
del "%~dp0idx*.txt"
if "%2"=="Office2010p" (
cls
echo “бв ­®ўЄ  Microsoft Office 2010
IF EXIST "%1\soft\office2010.exe" call "%1\soft\office2010.exe" -ais
EXIT
)
:Kaspersky
"%~dp0%os%\wget.exe" -q -Onul http://www.google.com || goto next_Kaspersky
cls
rmdir "%1\soft\Temp" /s /q
md "%1\soft\Temp"
cls
::цикл поиска по страницам
set f=0
:stk
set /a f=%f%+1
cls
echo €йг Ї® бва ­Ёж ¬ %f%
("%~dp0http2cli.exe" "http://gtorrent.ru/programmy/bezopasnost/page/%f%/" 3| findstr /R /C:"kaspersky-free" | findstr /R /C:"repack-by-kpojiuk") >"%~dp0down.txt"
for %%I in ("%~dp0down.txt") do set Size=%%~zI
if "%Size%"=="0" goto stk
::Получении ссылки на страницу
for /f "usebackq tokens=4 delims=+++" %%i in (`find /n /v "" %~dp0down.txt`) do set "url=%%i"
cls
::echo %url%
::pause
("%~dp0http2cli.exe" "%url%" 3| findstr /R /C:"download.php?id=") >"%~dp0down1.txt"
for /f "usebackq tokens=2 delims=:[" %%i in (`find /n /v "" %~dp0down1.txt`) do set "ver=%%i"
for /f "usebackq tokens=5 delims=+++=" %%i in (`find /n /v "" %~dp0down1.txt`) do set "dow=%%i"
echo %ver% >"%~dp01file.txt"
cls
::echo %dow%
::pause
if not exist "%1\soft\KasperskyF.exe" del "%1\soft\KasperskyF.txt"
set /p LocalFileSize=< "%1\soft\KasperskyF.txt"
set /p NetFileSize=< "%~dp01file.txt"
if "%LocalFileSize%"=="%NetFileSize%" goto next_Kaspersky
echo ‡ Јаг¦ о Kaspersky Free
"%~dp0%os%\aria2c.exe" "http://gtorrent.ru/engine/download.php?id=%dow%" --seed-time=0 --file-allocation=none --summary-interval=0 --console-log-level=error --allow-overwrite=true --check-certificate=false -d "%1\soft\temp\."
FOR /r "%1\soft\Temp" %%i IN (Kaspersky*.exe) DO move /y "%%i" "%1\soft\KasperskyF.exe"
::pause
rmdir "%1\soft\Temp" /s /q
move "%~dp01file.txt" "%1\soft\KasperskyF.txt"
:next_Kaspersky
del "%~dp01file.txt"
del "%~dp0*down.txt"
if "%2"=="Kaspersky" (
cls
echo “бв ­®ўЄ  Kaspersky Free
IF EXIST "%1\soft\KasperskyF.exe" call "%1\soft\KasperskyF.exe" /S /RU
EXIT
)
:retry_pinging
EXIT
Точно скопировал ссылку вставил в адресную строку скачался инсталлятор. Но некоторые ссылки ведут Сюда а я например не люблю такие сайты, хотя сама идея, вроде бы и не плоха

только по моему не мешало бы торрент сайт поменять на более солидный проверенный.

[Quote]

    bios83
  • 2205
  • Longevity: 4 years 6 months
  • Posts: 66
  • REPUTATION:8

    [+] [-]
KottoSOFT, Да скрипт скачивает и проверяет наличие новой версии. Вариант скачивания был предоставлен для тестирования, а вы сами можете выбрать другой сайт и откорректировать скрипт под свой источник. Я лишь всего нашёл сайт где более или менее во время обновляются программы. Можно поменять на любой другой Главное чтобы не было блокировок и проблем с получением ссылки на скачивание. Дай пожалуйста пример торрент без авторизации?

[Quote]

    KottoSOFT
  • 206
  • Longevity: 5 years 5 months
  • Posts: 718
  • REPUTATION:62

    [+] [-]
74216Можно поменять на любой другой Главное чтобы не было блокировок и проблем с получением ссылки на скачивание. Дай пожалуйста пример торрент без авторизации?
Да нет, извини лишь бы с сайта с прогами мусор не шёл, ведь сам знаешь иной раз нажимаешь скачать одно, а получаешь кучу не нужного барахла, чуть освобожусь поставлю виртуалку и запущу твою утиль посмотрю, какие версии придут, а потом от этого и будем плясать.

[Quote]

    dimo70
  • 17296
  • Longevity: 2 years 7 months
  • Posts: 1359
  • REPUTATION:20

    [+] [-]
  • Location: BG
Проверял вроде все работает нормально. Быстро качает и ставит.
Кажется Soft Pack полезен, так как может пригодиться в разных ситуациах.
Размер крошечный. Легко можно перебросить на клиентский компьютер, когда через Teamviewer приходиться работать например. Программы хорошо подобраны по моему.
А вот с сылками не знаю как дела. Может KottoSOFT и прав насчет торентовских ссылок.

[Quote]

    bios83
  • 2205
  • Longevity: 4 years 6 months
  • Posts: 66
  • REPUTATION:8

    [+] [-]
KottoSOFT, За основу взял RePack зарекомендовавших себя авторов, за время тестирования не было выявлено вредоносного по. Жду вашего вердикта.
dimo70, цель пака возможность работы простого пользователя. Честно говоря хотелось сделать драйвер Пак с возможностью создания резервной копии, а потом понесло.

[Quote]

    Ander_73
  • 15549
  • Longevity: 3 years 5 months
  • Posts: 1660
  • REPUTATION:104

    [+] [-]
bios83, просто из общих соображений, уже установленное ПО как-то помечается?

[Quote]

    wadimus
  • 14910
  • Longevity: 3 years 7 months
  • Posts: 197
  • REPUTATION:19

    [+] [-]
насчет ссылок.
изначально мой пак (а он в основе данного Soft-Pack-а) был сделан для бессплатных прог.
у каждого такого инсталлятора есть официальный сайт, путем парсинга можно получить ссылки на эти инсталляторы и скачать их.
ссылки бывают различных видов, прямые и вычисляемые. некоторые получить дюже непросто.
главное - офсайты меняются нечасто, но иногда меняются :) парсинг идет для статического варианта. поменялся офсайт - возможно(!) поменяется и условия парсинга.
вторая идея - полученные ссылки качаются и сохраняются в стандартизованные названия, которые имеют постоянные имена.
идея третья - качаются файлы только тогда, когда они отличаются от имеющихся на диске.
идея следующая - закачка идет во временные файлы, после окончания закачки идет замена файлов (удаляются имеющиеся файлы и временные переименовываются в те же названия)
версия вычисляется отдельно
для репаков, переделок - сайты для них есть, но получение таких инсталляторов идет через файлопомойки.
как вариант - получение инсталляторов через торрент-трекеры.
лучший вариант - качаем сами репак, обрабатываем его и помещаем на свой я-диск или иное облако. получение таких репаков упрощается. но зависит от автора .. а автору лень, автору нахрен-это-надо.

[Quote]

    bios83
  • 2205
  • Longevity: 4 years 6 months
  • Posts: 66
  • REPUTATION:8

    [+] [-]
Приветствую
wadimus,
а автору лень, автору нахрен-это-надо.
Нет времени создавать свои RePack или отслеживать изменения в софте поэтому торрент.
Ander_73,
просто из общих соображений, уже установленное ПО как-то помечается?
Подумаю над этим вопросом, как посвободнее буду.

[Quote]

    bios83
  • 2205
  • Longevity: 4 years 6 months
  • Posts: 66
  • REPUTATION:8

    [+] [-]
Обновил на сколько времени хватило, исправил ошибки.

[Quote]

    dimo70
  • 17296
  • Longevity: 2 years 7 months
  • Posts: 1359
  • REPUTATION:20

    [+] [-]
  • Location: BG
bios83, что то не совсем так - при загрузке выскакивают - глянь

[Quote]

    bios83
  • 2205
  • Longevity: 4 years 6 months
  • Posts: 66
  • REPUTATION:8

    [+] [-]
dimo70, приветствую, при загрузки чего? Перезапуск программы ничего не меняет?

[Quote]

    nik63
  • 1479
  • Longevity: 4 years 10 months
  • Posts: 301
  • REPUTATION:6

    [+] [-]
  • Location: Башкирия
Спасибо за программу, у меня отработала на отлично. aa

[Quote]

    Scorpion59
  • 444
  • Longevity: 5 years 4 months
  • Posts: 29
  • REPUTATION:1

    [+] [-]
Уважаемый bios83, у меня почему-то не обновляется Ваша сборка...
Проверьте, пожалуйста. bc
P.S. Папка Pack - в корне диска, пробелов в названии папки нет, Pack.exe запускаю от имени Администратора

[Quote]

    vovan1982
  • 214
  • Longevity: 5 years 5 months
  • Posts: 995
  • REPUTATION:65

    [+] [-]
  • Location: Ростов-на-Дону
Scorpion59, что конкретно у вас не обновляется? Если сидов нет на раздаче, то и качать не будет.

Page 1 of 2


Display posts:    

Current time is: 11-Jul 01:29

All times are UTC + 3


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum