2008-03-18から1日間の記事一覧

やる気でねぇデス

その他

仕事おわらんー 眠いなぁ誰かのお土産のかりんとうを食べよう うまうま 隣にティッシュがあるのは別に他意があるわけでは・・

VBScriptでドラッグしたファイルに処理

その他

メモ VBScriptでドラッグしたファイルに処理 Const ForReading = 1,ForWriting = 2,ForAppending = 8 Set Fs = WScript.CreateObject("Scripting.FileSystemObject") sPath = Fs.GetParentFolderName(WScript.Arguments(0)) '入力パス For Each infile In WS…

VBScriptで画像のサイズを取得

その他

メモ VBScriptで画像のサイズ（ピクセル数）を取得するやりかた。 strFileNameは画像へのパス。 ImgSizeStr = objFolder.GetDetailsOf(strFileName, 26) ImgSizeTbl = split(ImgSizeStr, " ") Xsize = CDbl(ImgSizeTbl(0)) Ysize = CDbl(ImgSizeTbl(2)) もっ…