2006-04-04から1日間の記事一覧

ファイルサイズの取得

WSH

Set fso = CreateObject("Scripting.FileSystemObject") Set src = fso.Getfile("C:\OouchiWorks\M6E3\NUCORE\Pc-Cam_Data\Debug_Host\update.img") if src.Size >= 4128768 then WScript.Echo "[警告]イメージデータのサイズが大きすぎます。->" & src.Size…

マクロの中断を禁止

disablebreak;

実行

WSH

Dim WSH Set WSH = CreateObject("WScript.Shell") WSH.Run "notepad",0,true