ユーザー必読!コマンドライン(DOS Pt.6) at WIN
ユーザー必読!コマンドライン(DOS Pt.6) - 暇つぶし2ch816:名無し~3.EXE
08/06/19 01:58:58 lAQJD2cS
@if(0)==(0) echo off
cscript //Nologo //E:JScript "%~f0" %*
goto :EOF
@end
var FSO = new ActiveXObject("Scripting.FileSystemObject");
var ForAppending = 8;
var CreateIfNotExist = true;
var OverWriteIfAlreadyExist = true;
function write_file(filename, text, append_mode) {
var file_stream;
if(append_mode) file_stream = FSO.OpenTextFile(filename, ForAppending, CreateIfNotExist);
else file_stream = FSO.CreateTextFile(filename, OverWriteIfAlreadyExist);
file_stream.Write(text);
file_stream.Close();
}
function main(args) {
var append_mode = false;
var i = 0;
if(args[0]=="-a") {
append_mode = true;
i = 1;
}
var text = WScript.StdIn.ReadAll();
WScript.StdOut.Write(text);
for(; i<args.length; i++) {
var filename = args[i];
write_file(filename, text, append_mode);
}
}
var args = new Array();
for(var e=new Enumerator(WScript.Arguments); !e.atEnd(); e.moveNext()) args[args.length] = e.item();
main(args);


次ページ
続きを表示
1を表示
最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch