[
板情報
|
カテゴリランキング
]
したらばTOP
■掲示板に戻る■
全部
1-100
最新50
|
メール
|
1-
101-
201-
301-
401-
501-
601-
701-
801-
901-
1001-
1101-
1201-
1301-
1401-
1501-
1601-
1701-
1801-
1901-
2001-
2101-
2201-
2301-
2401-
2501-
2601-
2701-
2801-
2901-
3001-
3101-
3201-
3301-
3401-
3501-
3601-
3701-
3801-
3901-
4001-
4101-
4201-
4301-
4401-
4501-
4601-
4701-
4801-
4901-
5001-
5101-
5201-
5301-
5401-
この機能を使うにはJavaScriptを有効にしてください
|
管理人の独り言(プログラミング関連)
1664
:
◆adhRKFl5jU
:2009/03/17(火) 23:38:15
var fso = new ActiveXObject("Scripting.FileSystemObject");
var log = fso.CreateTextFile("log" + (new Date()).getTime() + ".txt", false);
var dl = new Downloader;
dl.GetCookie();
for(var i = start; i < end; ++i){
if(fso.FileExists("source" + i + ".txt") == false){
var ret = dl.DownloadData(i);
if(ret != null){
try{
var file = fso.CreateTextFile("source" + i + ".txt", false);
file.Write(ret.src);
log.WriteLine("採点番号:" + ret.id);
log.WriteLine("問題番号:" + ret.qid);
log.WriteLine("言語:" + ret.language);
log.WriteLine("アップロード時刻:" + ret.uptime);
log.WriteLine("得点:" + ret.point);
log.WriteLine("詳細:" + ret.results.toString());
log.WriteLine("文字数:" + ret.src.length);
log.WriteLine("------------------------------");
}catch(e){
log.WriteLine("エラー:" + e.toString());
log.WriteLine("------------------------------");
}
}
}else{
log.WriteLine("採点番号" + i + "は存在するためスルー。");
log.WriteLine("------------------------------");
}
}
WScript.Echo("完了");
})();
新着レスの表示
名前:
E-mail
(省略可)
:
※書き込む際の注意事項は
こちら
※画像アップローダーは
こちら
(画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります)
スマートフォン版
掲示板管理者へ連絡
無料レンタル掲示板