その日の日付をファイル名とするファイルを開くマクロ


// ドライブ名からファイル名まで,アルファベットはすべて小文字で記載すること
// → 予約語の filename がすべて小文字で展開されるため
$Basedir = "c:\\documents and settings\\user\\デスクトップ\\";

// 時刻取得
$Year = midstr( date,0,2 );
$Month = midstr( date,3,2 );
$Day = midstr( date,6,2 );
$Today = "20"+$Year+"-"+$Month+"-"+$Day; //2009-07-28 という形式

$OpenFile = $Basedir+$Today+".txt";
if (filename != $OpenFile) {
if(findhidemaru($OpenFile) ==-1)
openfile $OpenFile;
else {
setactivehidemaru findhidemaru($OpenFile);
}
}
endmacro; //マクロの終了