きのうは暑かったのに、今日は寒いのかよっ。
何だか体調が悪いなぁ。
午前中は背中がぎっくり腰みたいに痛くなってしまった。
お昼を食べたら治ったけど。
午後からは偏頭痛。
左のこめかみがズキンズキンする。
う～。
とりあえず WSH の続きをやろう。
ZIP ファイルを展開する処理を作らなきゃいけないので、UNZIP.exe を使ったスクリプトにした。
ところがテスト用に借りたマシンにはこの EXE が入っていない。
なにぃっ。
しかたがないので別の方法にしよう。
クライアント PC はすべて Windows XP だということなので、Shell オブジェクトを使おう。
言語は VBScript。
Set appShell = CreateObject("Shell.Application")
appShell.NameSpace(destFolderPath).CopyHere appShell.NameSpace(zipFilePath).Items
こんな感じのスクリプトで展開できた。
ただし、展開したあとに一時フォルダが残ってしまうので、削除する処理を入れておかないとね。
残業。
疲れた…。