FURUやんのScript忘備録

自分で作ったり調べたり踊ったりしてカスタマイズしたりどこかから引用したりしたScriptや手順の忘備録です  このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証とサポートが無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

和暦を警告してくれるバッチ

@ECHO OFF
SET MYDATE=%DATE:~-6,1%
SET MYDATE2=%DATE:~-10,4%
SET MYDATE3=%DATE:~1,1%

IF %MYDATE3%==和 GOTO WARKI
IF %MYDATE3%==成 GOTO WARKI
IF %MYDATE2% GTR 999 GOTO SEIREKI4
IF %MYDATE%==/ GOTO SEIREKI2
echo 西暦(英語)ほか
echo msgbox "システム日付が異常です 西暦4桁に変更して下さい " + vbCr + "「日付と時刻の変更」→「カレンダーの設定の変更」→" + vbCr + "「追加の設定」→「日付」タブ→カレンダの種類を「西暦(日本語)」" + vbCr + "データ形式を「yyyy/MM/dd」にしてください",vbOKOnly + vbCritical , "システム日付が和暦です" > %TEMP%/msgboxtest.vbs & %TEMP%/msgboxtest.vbs
cmd /k

:SEIREKI4
echo 西暦日本語4桁
cmd /k

:SEIREKI2
echo 西暦日本語2桁
echo msgbox "システム日付が異常です 西暦4桁に変更して下さい " + vbCr + "「日付と時刻の変更」→「カレンダーの設定の変更」→" + vbCr + "「追加の設定」→「日付」タブ→カレンダの種類を「西暦(日本語)」" + vbCr + "データ形式を「yyyy/MM/dd」にしてください",vbOKOnly + vbCritical , "システム日付が和暦です" > %TEMP%/msgboxtest.vbs & %TEMP%/msgboxtest.vbs
cmd /k

:WARKI
echo 和暦
control DATE/TIME
echo msgbox "システム日付が異常です 西暦4桁に変更して下さい " + vbCr + "「日付と時刻の変更」→「カレンダーの設定の変更」→" + vbCr + "「追加の設定」→「日付」タブ→カレンダの種類を「西暦(日本語)」" + vbCr + "データ形式を「yyyy/MM/dd」にしてください",vbOKOnly + vbCritical , "システム日付が和暦です" > %TEMP%/msgboxtest.vbs & %TEMP%/msgboxtest.vbs
cmd /k

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

 

特定の時間は処理をパスするバッチ

@ECHO OFF

REM 処理可能開始時間
SET START=1720

REM 処理可能終了時間
SET END=1800

echo msgbox "処理可能時間を%START% 処理可能終了時間を%END% に設定します。" ,vbInformation  + vbSystemModal > %TEMP%/msgboxtest.vbs & %TEMP%/msgboxtest.vbs


REM 現在の時間を取得(数字が1桁の場合は'0'埋め)
SET NOW=%TIME: =0%
SET NOWSTR=%NOW:~0,2%%NOW:~3,2%
SET CONSOLE_NOWSTR=%NOW:~0,2%時%NOW:~3,2%分

REM (現時間 < 処理可能開始時間)ならエラー
IF 1%NOWSTR% LSS 1%START% (
    GOTO ERR
)

REM (処理可能開始時間 < 現時間)ならエラー
IF 1%END% LSS 1%NOWSTR% (
    GOTO ERR
)

ECHO この時間はBAT処理OKです。
pause
GOTO END

:ERR
rem ECHO 現在の時刻は【%CONSOLE_NOWSTR%】です。このBATは時間外です。
echo msgbox "【 %CONSOLE_NOWSTR%】です。このBATは時間外です。" ,vbInformation  + vbSystemModal > %TEMP%/msgboxtest.vbs & %TEMP%/msgboxtest.vbs
pause

 

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

 

 

 

ハイパーネーションをON/OFFにするバッチ

@echo off
echo 休止状態(ハイバネーション)を有効にする
powercfg /h on
pause

 

@echo off
echo 休止状態(ハイバネーション)を無効にする
powercfg /h off
pause

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

指定日前後に起動する処理を選べるバッチ

@echo off

SET CHECKDATE="2021/XX/XX"
IF "%date%" GTR %CHECKDATE% GOTO AFTER
IF "%date%" EQU %CHECKDATE% GOTO TODAY
IF "%date%" LSS %CHECKDATE% GOTO BEFORE
GOTO AFTER

:AFTER
echo after
cmd /k

:BEFORE
echo before
cmd /k

:TODAY
echo TODAY
cmd /k

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

 

困った!「別のプログラムがこのフォルダーまたはファイルを開いているので、操作を完了できません」

itojisan.xyz

 

news.mynavi.jp

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

現在の電源プランを記録に残す

news.mynavi.jp

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。

先月、今月、翌月の月末日を調べてくれるVBS

  '今月の月末日
  MsgBox DateSerial(Year(Date), _
         Month(Date) + 1, 0)
  '前月の月末日
  MsgBox DateSerial(Year(Date), _
         Month(Date), 0)
  '翌月の月末日
  MsgBox DateSerial(Year(Date), _
         Month(Date) + 2, 0)

 

このサイトに掲載のスクリプト・手順など全ての情報については、一切の保証が無いものとしてご利用下さい。PCの不具合、動作、データの破損などについて責任を負うことはできません。あくまでも自己責任となります。