Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Обновления для Microsoft Windows 7 / Server 2008 R2

Модерирует : KLASS, IFkO

 Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

Открыть новую тему     Написать ответ в эту тему

vitya8585

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

echo off
chcp 65001
cls
setlocal EnableExtensions EnableDelayedExpansion
 
set PATH=%PATH%;d:\_d\Tools\cmd\
set LNK=https://support.microsoft.com/app/content/api/content/help/en-us
 
del %~n1_title.txt
 
for /f "tokens=1,2,3* delims= " %%A in (%~1) do (
  :: Print <KB Number> <KB Data> <KB Title>
  echo %%A | findstr "^--" >nul || (
    set HEADING=
    :: Get <KB Title> from Web API Service
    title Requesting: %LNK%/%%A
    for /f "tokens=1* delims=" %%D in ('wget.exe --no-check-certificate -q -O - "%LNK%/%%A" 2^>nul ^| jq.exe .details.heading') do (
      set HEADING=%%~D
    )
    echo %%A: !HEADING!
    echo %%A    %%B    !HEADING! >> %~n1_title.txt
  )
  :: Print Comments (strings with "--")
  echo %%A | findstr "^--" >nul && (
    echo %%A    %%B    %%C >> %~n1_title.txt
  )
)
 
:: Remove escape symbols \"
gsar.exe -o -s"\\"" -r""" %~n1_title.txt
 
pause

Всего записей: 17 | Зарегистр. 18-07-2013 | Отправлено: 19:05 05-04-2020 | Исправлено: vitya8585, 19:25 05-04-2020
Открыть новую тему     Написать ответ в эту тему

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Обновления для Microsoft Windows 7 / Server 2008 R2


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru