$pth = Split-Path -Parent $MyInvocation.MyCommand.Path
echo $pth
#上記を保存して実行した結果
PS C:\Users\root\Documents> .\test.ps1
C:\Users\root\Documents
powershell "start-process powershell '-Command Set-ExecutionPolicy RemoteSigned -Confirm' -wait" -verb runas > nul
# 設定ファイルのパス
$MyInvocation.MyCommand.Path | Split-Path -Parent | sv path
Join-Path $path setting.json | sv setting_path
# 設定ファイル読み込み
cat $setting_path | ConvertFrom-Json | sv conf
# 認証情報生成
ConvertTo-SecureString $conf.pass | sv pass
New-Object System.Management.Automation.PSCredential $conf.user, $pass | sv cred
# ホスト名取得
hostname | sv hst
# メール送信
Send-MailMessage `
-To $conf.to `
-From $conf.from `
-SmtpServer $conf.server `
-Port $conf.port `
-Subject "PC Boot" `
-Credential $cred `
-UseSsl `
-Body $hst
# スクリプトのパスと設定ファイルのパス
$MyInvocation.MyCommand.Path | Split-Path -Parent | sv current_path
Join-Path $current_path setting.json | sv setting_path
Read-Host "送信先(to)メールアドレスを入力してください。" | sv to
Read-Host "送信元(from)メールアドレスを入力してください。" | sv from
Read-Host "SMTPサーバアドレスを入力してください。" | sv server
Read-Host "SMTPサーバポート番号を入力してください。" | sv port
Get-Credential -m "【メールアカウント】と【パスワード】を入力して下さい。" | sv cred
# ユーザ入力情報から設定ファイルを作成。
@{
to = $to
from = $from
server = $server
port = $port
user = $cred.UserName
pass = ConvertFrom-SecureString $cred.Password
} | sv setting
ConvertTo-Json $setting | Set-Content $setting_path
$from = "ユーザ名@gmail.com"
$to = "ユーザ名@gmail.com"
$server = "smtp.gmail.com"
$port = 587
$user = "ユーザ名@gmail.com"
$pass = "ぱすわーど"
curl ipinfo.io | ConvertFrom-Json | sv ret
$ret.ip
$client = New-Object Net.Mail.SmtpClient($server, $port)
$client.EnableSsl = $true
$client.Credentials = New-Object Net.NetworkCredential($user, $pass)
New-Object Net.Mail.MailMessage($from, $to,"Global IP", $ret.ip) | sv msg
$client.Send($msg)
# 設定ファイルのパス・前回取得したグローバルIPアドレス記録ファイルのパス
$MyInvocation.MyCommand.Path | Split-Path -Parent | sv path
Join-Path $path setting.json | sv setting_path
Join-Path $path latest_gip.txt | sv gip_path
# 設定ファイル読み込み。
cat $setting_path | ConvertFrom-Json | sv conf
# 認証情報生成
ConvertTo-SecureString $conf.pass | sv pass
New-Object System.Management.Automation.PSCredential $conf.user, $pass | sv cred
# 前回のIPをファイルから取得
if (Test-Path $gip_path) {
cat $gip_path | sv latestip
}
# グローバルIP取得サイトにアクセス。
curl ipinfo.io | ConvertFrom-Json | sv ret
# 前回のIPと今回取得したIPが不一致の場合のみ、ファイル書き込み＆メール送信。
if ($latestip -ne $ret.ip) {
Send-MailMessage `
-To $conf.to `
-From $conf.from `
-SmtpServer $conf.server `
-Port $conf.port `
-Subject "Global IP" `
-Credential $cred `
-UseSsl `
-Body $ret.ip
# メール送信に成功した場合のみ、グローバルIPアドレスを更新
if ($? -eq $true) {
$ret.ip | tee -f $gip_path
}
}
# 設定値============================================
# 起動対象PCのMACアドレス
$mac_addr = "11:22:33:44:55:66"
# 起動対象PCのIPアドレス
$ip_addr = "255.255.255.255" #ブロードキャストでも可能
# 処理内容=========================================
# magic packetの生成。FF×6の後に起動対象PCのMACアドレスが16回続く
$mac_addr -split ':' | %{[Convert]::ToInt32($_, 16)} | sv data
$packet = @(0xFF) * 6 + $data * 16
# UDPクライアント生成＆パケット送信
$udp_client = New-Object System.Net.Sockets.UdpClient
$udp_client.Send($packet, $packet.Length, $ip_addr, 2304) | Out-Null
$udp_client.Close()
| VM状態 | CPU使用率 | メモリ使用量 | 下記イメージの時間帯 |
|---|---|---|---|
| スタンバイ | 0.01～0.15% | 4GB | 00:46～01:20 |
| VM起動し、アイドル状態 | 1～4% | 4GB | 01:25～01:44 |
##########################################################################################
# 注意事項
# ・ドライブ直下のフォルダ（例えばc:\tmpなど）は権限が無いため、
# 本スクリプトでは作成できないことがあります。事前に作成して下さい。
# ・実行ポリシーが変更されていない場合、（Set-ExecutionPolicy RemoteSigned等）が必要です。
##########################################################################################
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
# 出力先ファイルパス
$filePath = "c:\tmp\evi\C{0:000}.png"
#$filePath = "c:\tmp\evi\" + $(Get-Date).ToString("yyyyMMdd") + "\C{0:000}.png"
# Jpeg,Gif,Bmp,Pngから選択する。
$fileKind = [System.Drawing.Imaging.ImageFormat]::Png
# スクリーンキャプチャして、Graphicsオブジェクトを生成
$rect = [System.windows.forms.Screen]::PrimaryScreen.Bounds
$bitmap = New-Object System.Drawing.Bitmap($rect.Width, $rect.Height)
$graphics = [System.Drawing.Graphics]::FromImage($bitmap)
$zero = New-Object System.Drawing.Point(0, 0)
$graphics.CopyFromScreen($zero, $zero, $bitmap.Size)
# フォルダ作成、フォルダがすでに存在するエラーは非表示。他のエラーも黙らせるので注意。
$dirPath = Split-Path $filePath -parent
New-Item -path $dirPath -type directory -ErrorAction SilentlyContinue
# ファイル名を決定。順に、以下の処理を行う。
# 1000までの数字を生成、ファイル名をフォーマットに従い決定、ファイルが存在するかチェック、最初の1件を取得、変数に格納を行う。
1..1000 | % { $filePath -f $_ } | Where { (Test-Path $_) -eq $false } | select -First 1 | sv resultFile
# ファイル保存
$bitmap.Save($resultFile, $fileKind)
##########################################################################################
# ファイル作成後処理。フォルダやファイルを開く。必要に応じて、コメントアウトする。
##########################################################################################
$shell = New-Object -ComObject Shell.Application # explorer ieの一覧を取得
#============================================================================
# 拡張子に対する既定のアプリケーションで開く。
#============================================================================
#ii $resultFile
#============================================================================
# ペイントで開く。
#============================================================================
#mspaint $resultFile
#============================================================================
# IEで開く。（毎回新しいウィンドウで開く。）
#============================================================================
#$ieCom = New-Object -ComObject InternetExplorer.Application # IEで開く。
#$ieCom.Navigate($resultFile)
#$ieCom.Visible = $true
#============================================================================
# IEで開く。初回のみIEを1つ開き、2回目以降はウィンドウを更新する。
#============================================================================
# 対象のウィンドウのみ取得。
$ie = $null
$locationURL = "file:///" + $dirPath.Replace("\", "/")
$shell.windows() | where {($_.LocationURL -like $locationURL + "*") -and ($_.Name -eq "Internet Explorer")} | select -First 1 | sv ie
# オープン済みのIEが取得できなかった場合は、IEを開く。
if ($ie -eq $null)
{
$ie = New-Object -ComObject InternetExplorer.Application
$ie.Width = 700
$ie.Height = 300
$ie.Left = 1000
$ie.top = 300
$ie.AddressBar = $false
}
# IEで作成したファイルを開く。
$ie.Navigate($resultFile)
$ie.Visible = $true
#============================================================================
# エクスプローラを開く。
#============================================================================
$exp = $null
$locationURL = "file:///" + $dirPath.Replace("\", "/")
$shell.windows() | where {($_.LocationURL -like $locationURL) -and ($_.Name -eq "エクスプローラー")} | select -First 1 | sv exp
if ($exp -eq $null)
{
Start "explorer " -Args $dirPath -Wait
$shell.windows() | where {($_.LocationURL -like $locationURL) -and ($_.Name -eq "エクスプローラー")} | select -First 1 | sv exp
$exp.Width = 700
$exp.Height = 300
$exp.Left = 1000
$exp.top = 0
$exp.AddressBar = $false
$exp.Document.SortColumns = "prop:System.DateModified;"
$exp.Document.CurrentViewMode = 5
$exp.Document.IconSize = 150
}
$exp.Refresh2()
Get-EventLog -LogName System |
where {($_.EventID -eq 6005) -or ($_.EventID -eq 6006)} |
select -First 10 |
foreach { Write-Host $_.TimeWritten, $_.Message }
Read-Host "Enterキーを入力して下さい。"
Get-EventLog -LogName System |
where EventID -in (6005, 6006) |
select -First 10 |
foreach { Write-Host $_.TimeWritten, $_.Message }
Read-Host "Enterキーを入力して下さい。"
Get-EventLog -LN System |
where EventID -in (6005, 6006) |
select TimeWritten, Message -F 10
Read-Host "Enterキーを入力して下さい。"
Get-EventLog -LogName System |
where {($_.EventID -eq 6005) -or ($_.EventID -eq 6006)} |
select TimeWritten, Message -First 10
Read-Host "Enterキーを入力して下さい。"
$path = "c:\tmp\" # 出力先
$file = "Cap_{0:000}.png" # {0:000} 0番目の引数を3桁の0埋め数字とする。
Add-Type -A System.Windows.Forms # このセッションに型を追加。
[Windows.Forms.Screen]::PrimaryScreen.Bounds | # ディスプレイサイズを取得し、
% {[Drawing.Bitmap]::New($_.Width, $_.Height)} | # そのサイズのBitmapデータ生成。
sv b # Set-Variable 変数への代入。bにBitmapオブジェクトを代入。
[Drawing.Graphics]::FromImage($b).CopyFromScreen(0, 0, $b.Size) # 描画オブジェクトで画面キャプチャして、Bitmapデータへ反映。
md -f $path # フォルダ作成。-f:force 既に存在する場合エラーを抑止。
1..1000 | # 1～1000まで
% { $path + $file -f $_ } | # 繰り返し、フォーマット。c:\tmp\Cap_001.pngなどに変換。
? { (Test-Path $_) -eq $false } | # その内、ファイルが存在しないパスのみを取得。
select -F 1 | # 最初の1件のみにフィルタして、
% { $b.Save($_) } # そのパスにBitmapデータをファイル保存。
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
$filePath = "c:\tmp\Cap_{0:000}.png"
$fileKind = [System.Drawing.Imaging.ImageFormat]::Png
#$fileKind = [System.Drawing.Imaging.ImageFormat]::Jpeg
#$fileKind = [System.Drawing.Imaging.ImageFormat]::Gif
#$fileKind = [System.Drawing.Imaging.ImageFormat]::Bmp
# スクリーンキャプチャして、Graphicsオブジェクトを生成
$rect = [System.windows.forms.Screen]::PrimaryScreen.Bounds
$bitmap = New-Object System.Drawing.Bitmap($rect.Width, $rect.Height)
$graphics = [System.Drawing.Graphics]::FromImage($bitmap)
$zero = New-Object System.Drawing.Point(0, 0)
$graphics.CopyFromScreen($zero, $zero, $bitmap.Size)
# ファイル名を決定するために、存在しないファイルになるまでループ
$i = 0
do
{
$path = $filePath -F $i # 文字列フォーマット
$i++
} while (Test-Path $path);
# ファイル保存
$bitmap.Save($path, $fileKind)
#==================================================================
# ツールの概要
#==================================================================
# 一定間隔で指定フォルダの最新の画像ファイルを表示する。
# ウィンドウをクリックした場合も最新の画像ファイルを表示する。
# ウィンドウをダブルクリックするとウィンドウが画像にフィットする。
#==================================================================
# 事前準備
#==================================================================
# 管理者権限でpowershellを開き、実行ポリシーを変更しておく。
# Window 8の場合
# 1. キーボードでWindowsキー押下。
# 2. キーボードでpowershellと入力。
# 3. Shift-Ctrlを押しながら、powershellアイコンをクリック。
# 4. キーボードでSet-ExecutionPolicy RemoteSignedと入力。
#==================================================================
# 使用方法
#==================================================================
# このテキストをコピーしてファイルに保存。拡張子はps1とする。
# 下記の「設定値」欄を変更し、powershellからps1ファイルを実行。
# Windows8の場合はファイルを右クリックして「PowerShellで実行」を選択。
#==================================================================
# ライセンス
#==================================================================
# Copyright (c) 2015 Barracuda sh
# This software is released under the MIT License.
# http://opensource.org/licenses/mit-license.php
#==================================================================
# 設定値
#==================================================================
$pictDirPath = "C:\tmp"
$fileExt = @("*.gif", "*.jpg", "*.jpeg", "*.png", "*.bmp")
$interval = 2000
$width = 480
$height = 320
#$DebugPreference = "Continue"
#==================================================================
# メイン処理
#==================================================================
# コンソールを非表示
PowerShell -WindowStyle Hidden -Command Exit
# アセンブリ読み込み
Add-Type -Assembly System.Windows.Forms
Add-Type -Assembly System.Drawing
# Formサイズ（=画像サイズ）
$size = New-Object System.Drawing.Point
$size.X = $width
$size.Y = $height
# Form生成
[System.Windows.Forms.Form]$mainForm = New-Object System.Windows.Forms.Form
$mainForm.ClientSize = $size
# PictureBoxを生成しFormへ追加
[System.Windows.Forms.PictureBox]$pictBox = New-Object System.Windows.Forms.PictureBox
$pictBox.Sizemode = [System.Windows.Forms.PictureBoxSizeMode]::Zoom
$pictBox.AutoSize = $false
$pictBox.Size = $size
$pictBox.anchor = `
[System.Windows.Forms.AnchorStyles]::Top -bor `
[System.Windows.Forms.AnchorStyles]::Bottom -bor `
[System.Windows.Forms.AnchorStyles]::Left -bor `
[System.Windows.Forms.AnchorStyles]::Right
$mainForm.Controls.Add($pictBox)
#タイマーイベントコールバック関数
$tick = {
Write-Debug "[イベント]タイマー"
# 画像表示を行う
updatePict $script:mainForm $script:pictBox $script:pictDirPath $script:fileExt $false
}
# ピクチャーボックスクリックイベントコールバック関数
$click = {
Write-Debug "[イベント]クリック"
# 強制画像表示を行う
updatePict $script:mainForm $script:pictBox $script:pictDirPath $script:fileExt $true
}
# ピクチャーボックスクリックイベントコールバック関数
$doubleClick = {
Write-Debug "[イベント]ダブルクリック"
$widthRatio = $pictBox.Size.Width / $pictBox.Image.Size.Width
$heightRatio = $pictBox.Size.Height / $pictBox.Image.Size.Height
Write-Debug ("width ratio = " + $widthRatio)
Write-Debug ("height ratio = " + $heightRatio)
if ($widthRatio -le $heightRatio)
{
[int]$newWidth = $script:mainForm.ClientSize.Width
[int]$newHeight = $script:pictBox.Image.Height * $widthRatio + 1
}
else
{
[int]$newWidth = $script:pictBox.Image.Width * $heightRatio + 1
[int]$newHeight = $script:mainForm.ClientSize.Height
}
$script:mainForm.ClientSize = New-Object System.Drawing.Size($newWidth, $newHeight)
}
# 画像更新関数
function updatePict ([System.Windows.Forms.Form]$form, [System.Windows.Forms.PictureBox]$pictBoxObj, [string]$path, [array]$ext, [bool]$force) {
Write-Debug ("path = " + $path)
Write-Debug ("ext = " + $ext)
Write-Debug ("force = " + $force)
# ファイル一覧を取得
$path = $path + "\*.*"
$sortFileAry = (Get-ChildItem $path -include $ext | sort CreationTime -Desc)
# ファイル数が0なら終了
if ($sortFileAry.Length -eq 0)
{
$pictBoxObj.ImageLocation = ""
$form.Text = ""
return
}
# 最新のファイルのパスを取得
$latest = $sortFileAry[0].FullName
# CPU・HDD負荷低減のため、前回と同じファイルパスの場合は画像表示をスキップ。
if (!$force) {
if ($pictBoxObj.ImageLocation -eq $latest)
{
Write-Debug "更新無"
return
}
}
# 前回と違うファイルパスの場合は、画像ファイルを表示する。
$pictBoxObj.ImageLocation = $latest
$form.Text = $latest
Write-Debug $latest
}
# PictureBoxのクリックイベント登録
$pictBox.Add_Click($click)
$pictBox.Add_DoubleClick($doubleClick)
# タイマー生成
$timer = New-Object Windows.Forms.Timer
$timer.Interval = $interval
$timer.Add_Tick($tick)
$timer.Enabled = $true
# 初回画像表示
updatePict $script:mainForm $pictBox $pictDirPath $script:fileExt $true
# メインフォームを表示
$mainForm.ShowDialog()
# タイマーを終了。
$timer.Enabled = $false