function remove(filepath) {
   var shell = new ActiveXObject("Shell.Application");
   filepath = fso.GetAbsolutePathName(filepath);
   var folder = shell.NameSpace(fso.GetParentFolderName(filepath));
   if (folder != null) {
       var folderItem = folder.ParseName(fso.GetFileName(filepath));
       if (folderItem != null) {
           folderItem.InvokeVerb("削除(&D)");
           folderItem = null;
       }
       folder = null;
   }
}