[添付ファイル一覧]
[全ページの添付ファイル一覧]
- delete_0byte_file.js
- 格納ファイル名:attach/4D6163726F2FC5EAB9C62F323137_64656C6574655F30627974655F66696C652E6A73
- ページ:Macro/投稿/217
- 格納ファイル名:attach/4D6163726F2FC5EAB9C62F323137_64656C6574655F30627974655F66696C652E6A73
- MD5ハッシュ値:56e441c38ad59e252e139c0b20bf97e8
- サイズ:0.5KB (492 bytes)
- Content-type:application/octet-stream
- 登録日時:2013/04/15 18:25:12
- アクセス数:284
- MD5ハッシュ値:56e441c38ad59e252e139c0b20bf97e8
0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| | (function(){
var sPath = Editor.GetFilename();
if( sPath )
{
var shell = new ActiveXObject("WScript.Shell");
var objFileSys = new ActiveXObject("Scripting.FileSystemObject");
var objFile = objFileSys.GetFile(sPath);
if ( objFile.Size == 0 )
{
var msg = "ファイルが空です。削除しますか?";
if (Editor.YesNoBox(msg) == 6)
{
objFileSys.DeleteFile(objFile, true);
Editor.WinClose;
}
}
objFileSys = null;
shell = null;
}
})();
|