USB取り忘れメッセージ2

USB取り忘れMessage
USBがさしっぱなしです( ゚Д゚)
お茶をこぼしても知らないぞ( ´∀`)
席にもういないダーッΣΣ(゚Д゚;)

これはかつて掲載した記事の再掲です。上のメッセージをUSBが残っているとき「お知らせ」として表示します。

#USBログオフ時メッセージプロンプト処理
#メッセージ文
$messagePath="C:\tabc\message.txt"
#ログ出力パス
$usbLOG="C:\tabc\ccc\usblogx.txt"
 
#--------------------------------------
#メッセージボックス
#--------------------------------------
function MessageBox([string]$p_value = "")
{
    [Void][Windows.Forms.MessageBox]::Show($p_value,"お知らせ","OK", "Warning")
}
 
 
$crUSB = Get-WmiObject -Class win32_usbhub | ? { $_.name -eq "USB 大容量記憶装置" } | ? { $_.status -eq  "OK" }
 
 
if ($crUSB) {
    write-output "$env:computername,$env:username,$(get-date)" >> $usbLOG
 
    #Windowsフォームのロード
    [Void][Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms");
 
    MessageBox $([String]::Join("`r`n", (Get-Content $messagePath)))
    
}
USB取り忘れ防止Log
USB取り忘れ防止Log

文字が小さく見ずらい時はWindows拡大鏡をお使いください。Windows・キー + 「+」(プラス・キー)(Windows・キーはキーボード左下、左から3~4番目のキー。抜けるにはWindows・キー + 「ESCキー」を押します)
Enlighterのコードは窓の右上アイコンの「<>」を押すと明るい表示になります。

↑人気ブログランキングに参加しています。ポチっと1票を!

投稿者: 管理者

大学の工学部電気工学科演算工学講座で学び卒業論文で「小型コンピューターのオペレーティングシステム(ジョブの連続処理)」を書いた。卒業してコンピューター会社に入社し以来コンピューター一筋SE、SAとして働いた。退職後趣味でWeb開発をしている。現在、AIに興味を持っている。

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です