header( "Content-Type: text/html; Charset=shift_jis" ); header( "Expires: Wed, 31 May 2000 14:59:58 GMT" ); session_start(); if ( $_COOKIE['service'] == "" ) { $_COOKIE['service'] = "ORCL"; } if ( $_COOKIE['path'] != "" ) { $_COOKIE['path'] = trim(str_replace("\\\\","\\", $_COOKIE['path'])); } $DirHandle = @opendir("./"); if ( $DirHandle ) { $Target = readdir( $DirHandle ); while( $Target !== false ) { if ( $Target != "." ) { $ext = strrchr( $Target, "." ); $ext = strtolower($ext); if ( $ext == ".vbs" ) { $astamp = stat($Target); $laststamp = $astamp[9]; if ( $laststamp < time() - 300 ) { @unlink($Target); } } } $Target = readdir( $DirHandle ); } closedir( $DirHandle ); } ?>