Windows | Glatos.RU

Скрипт берёт paid-till с сайта whois, и если осталось больше 30дн, выводит результат зелёным цветом, иначе — красным. Внутри используется powershell.

@echo off
setlocal EnableDelayedExpansion

:: Текущая дата
for /f "delims=" %%a in ('powershell -Command "Get-Date -Format yyyy-MM-dd"') do (
 set current_date=%%a
)

for %%d in (ya.ru yandex.ru) do (
    :: Извлекаем дату окончания регистрации из whois
    for /f "tokens=2" %%b in ('curl -s https://whois.ru/%%d ^| findstr paid-till') do (
        for /f "delims=T" %%c in ("%%b") do (
            
            :: Используем PowerShell для вычитания дат
            for /f "delims=" %%D in ('powershell -Command "$current_date = Get-Date '!current_date!'; $second_date = Get-Date '%%c'; $diff = $second_date - $current_date; $diff.Days"') do set days_diff=%%D

            :: Выводим разницу в днях
            if !days_diff! LEQ 30 (
                powershell -Command "Write-Host '%%d: !days_diff! days' -ForegroundColor Red"
            ) else (
                powershell -Command "Write-Host '%%d: !days_diff! days' -ForegroundColor Green"
            )
        )
    )
)

endlocal

@echo off

setlocal EnableDelayedExpansion

:: Текущая дата

for /f "delims=" %%a in ('powershell -Command "Get-Date -Format yyyy-MM-dd"') do (

set current_date=%%a

)

for %%d in (ya.ru yandex.ru) do (

:: Извлекаем дату окончания регистрации из whois

for /f "tokens=2" %%b in ('curl -s https://whois.ru/%%d ^| findstr paid-till') do (

for /f "delims=T" %%c in ("%%b") do (

:: Используем PowerShell для вычитания дат

for /f "delims=" %%D in ('powershell -Command "$current_date = Get-Date '!current_date!'; $second_date = Get-Date '%%c'; $diff = $second_date - $current_date; $diff.Days"') do set days_diff=%%D

:: Выводим разницу в днях

if !days_diff! LEQ 30 (

powershell -Command "Write-Host '%%d: !days_diff! days' -ForegroundColor Red"

) else (

powershell -Command "Write-Host '%%d: !days_diff! days' -ForegroundColor Green"

)

endlocal

BAT файл. Вывести список каталогов начинающихся на app-, проверить есть ли в них файл proxy.txt, если отсутствует, скопировать в них все файлы из каталога proxy. После этих действий запустить программу (как в ярлыке).

@echo off
setlocal enableDelayedExpansion

::build "array" of folders
set folderCnt=0
for /f "eol=: delims=" %%F in ('dir /b /ad %LocalAppData%\Programm\app-*') do (
  set /a folderCnt+=1
  set "folder!folderCnt!=%%F"
)

::print menu
for /l %%N in (1 1 %folderCnt%) do echo !folder%%N!

for /l %%N in (1 1 %folderCnt%) do (
    IF NOT EXIST %LocalAppData%\Programm\!folder%%N!\proxy.txt copy %LocalAppData%\Programm\proxy\* %LocalAppData%\Programm\!folder%%N!
)

C:\Users\%USERNAME%\AppData\Local\Programm\Update.exe --processStart Programm.exe

@echo off

setlocal enableDelayedExpansion

::build "array" of folders

set folderCnt=0

for /f "eol=: delims=" %%F in ('dir /b /ad %LocalAppData%\Programm\app-*') do (

set /a folderCnt+=1

set "folder!folderCnt!=%%F"

)

::print menu

for /l %%N in (1 1 %folderCnt%) do echo !folder%%N!

for /l %%N in (1 1 %folderCnt%) do (

IF NOT EXIST %LocalAppData%\Programm\!folder%%N!\proxy.txt copy %LocalAppData%\Programm\proxy\* %LocalAppData%\Programm\!folder%%N!

)

C:\Users\%USERNAME%\AppData\Local\Programm\Update.exe --processStart Programm.exe

Glatos.RU

Записки Системного администратора

Архив рубрики: Windows

bat файл — проверка истечения срока аренды домена

Скопировать файл, если отсутствует через cmd