[Цитировать]

    bios83
  • 2205
  • Стаж: 8 лет 3 месяца
  • Сообщений: 105
  • Репутация:16

    [+] [-]
Набор программ на мой взгляд необходимые и должны быть под рукой.
Что входит в 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

[Цитировать]

    KottoSOFT
  • 206
  • Стаж: 9 лет 2 месяца
  • Сообщений: 562
  • Репутация:65

    [+] [-]
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
Точно скопировал ссылку вставил в адресную строку скачался инсталлятор. Но некоторые ссылки ведут Сюда а я например не люблю такие сайты, хотя сама идея, вроде бы и не плоха

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

[Цитировать]

    bios83
  • 2205
  • Стаж: 8 лет 3 месяца
  • Сообщений: 105
  • Репутация:16

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

[Цитировать]

    KottoSOFT
  • 206
  • Стаж: 9 лет 2 месяца
  • Сообщений: 562
  • Репутация:65

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

[Цитировать]

    dimo70
  • 17296
  • Стаж: 6 лет 3 месяца
  • Сообщений: 3990
  • Репутация:26

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

_________________
Подпись отключена за нарушение правил форума

[Цитировать]

    bios83
  • 2205
  • Стаж: 8 лет 3 месяца
  • Сообщений: 105
  • Репутация:16

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

[Цитировать]

    Ander_73
  • 15549
  • Стаж: 7 лет 1 месяц
  • Сообщений: 3586
  • Репутация:127

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

[Цитировать]

    wadimus
  • 14910
  • Стаж: 7 лет 4 месяца
  • Сообщений: 762
  • Репутация:91

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

[Цитировать]

    bios83
  • 2205
  • Стаж: 8 лет 3 месяца
  • Сообщений: 105
  • Репутация:16

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

[Цитировать]

    bios83
  • 2205
  • Стаж: 8 лет 3 месяца
  • Сообщений: 105
  • Репутация:16

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

[Цитировать]

    dimo70
  • 17296
  • Стаж: 6 лет 3 месяца
  • Сообщений: 3990
  • Репутация:26

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

_________________
Подпись отключена за нарушение правил форума

[Цитировать]

    bios83
  • 2205
  • Стаж: 8 лет 3 месяца
  • Сообщений: 105
  • Репутация:16

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

[Цитировать]

    nik63
  • 1479
  • Стаж: 8 лет 6 месяцев
  • Сообщений: 497
  • Репутация:19

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

[Цитировать]

    Scorpion59
  • 444
  • Стаж: 9 лет
  • Сообщений: 31
  • Репутация:1

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

[Цитировать]

    vovan1982
  • 214
  • Стаж: 9 лет 2 месяца
  • Сообщений: 1098
  • Репутация:76

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

Страница 1 из 4


Показать сообщения:    

Текущее время: 28-Мар 14:06

Часовой пояс: UTC + 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете прикреплять файлы к сообщениям
Вы можете скачивать файлы