Synology HDD交換

2018.01.08 admin

ん？自宅NASことSynology（シノロジー）に異常発生。なんどかS.M.A.R.T（スマート情報）を実行しても2日間まわしても途中から先に進まなかった。明らかにディスクの故障もしくはディスクの異常だ。このブログでは…

iSCSI経由でSynologyのハードディスクを他の機器に提供する

2017.06.21 admin

SAN（Storage Area Network）だのNAS（Network Attached Storage）だの、の件。 iSCSI（Internet Small Computer System Interface）…

ログオンログ取得→メールを飛ばすVBS

2014.01.17 admin

まだまだ未熟なWSHスクリプトですが、リモートデスクトップ接続元の情報が取れない以外は、まぁまぁのスクリプトかなぁ。ログオンスクリプトに仕掛けるVBS

strPath = "\network-drivesyslogaccess_log.txt"

Set objShell = CreateObject("WScript.Shell")
strClientPC = objShell.ExpandEnvironmentStrings("%CLIENTNAME%")

Set wshNetwork = WScript.CreateObject("WScript.Network")
strPC = WshNetwork.ComputerName
strUser = wshNetwork.UserName

Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFile = objFS.OpenTextFile(strPath, 8, True)
objFile.WriteLine (Now & ",logon," & strClientPC & "," & strPC & "," & strUser & Chr(13))
objFile.Close

Set objFile = Nothing
Set objFS = Nothing
Set wshNetwork = Nothing