JScript/sql2 - Sample is best!

開発環境	メモ帳
実行環境	Windows 8.1 (64bit)

sql4.js

// sql4.js
 
main();
 
function main()
{
	var con = new ActiveXObject("ADODB.Connection");
	con.Open("Driver={Microsoft Text Driver (*.txt; *.csv)}; ReadOnly=1;");
 
	var sql = "select map_no, unit_name, count from "
		+ "(select map_no, unit_no, count(*) as count from drop.csv"
		+ " where map_no = '10101'"
		+ " group by map_no, unit_no) d, unit.txt u"
		+ " where d.unit_no = u.unit_no"
		+ " order by map_no, count desc"
		;
 
	var rs = con.Execute(sql);
	while (! rs.EOF) {
		var rec = new Array(3);
		rec[0] = rs("map_no");
		rec[1] = rs("unit_name");
		rec[2] = rs("count");
		WScript.Echo(rec.join("\t"));
		rs.MoveNext();
	}
	rs.Close();
 
	con.Close();
	return 0;
}
 

drop.csv (抜粋)

20150514-162603,10101,,0,10003,50,1,720
20150514-162635,10102,,0,6009,50,1,720
20150514-162727,10101,,0,0,50,1,720
 

unit.txt (抜粋)

1001	指揮	アイゼンハワー
1002	中戦	エイブラムス
1003	航空	ガブレスキー
 

schema.ini

[drop.csv]
ColNameHeader=False
Col1=timestamp Char
Col2=map_no Char
Col3=rank Char
Col4=equip_no Char
Col5=unit_no Char
 
[unit.txt]
ColNameHeader=False
Format=TabDelimited
Col1=unit_no Char
Col2=unit_type Char
Col3=unit_name Char
 

実行例

C:\Projects\JScript\sql>cs sql4.js
 
C:\Projects\JScript\sql>C:\Windows\SysWOW64\cscript sql4.js
Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation. All rights reserved.
 
10101   シシュコ        16
10101   トルニ  13
10101   ラムケ  13
10101   クレーベルク    13
10101   ブロニコフスキー        11
10101   ナイディン      11
10101   サモヒン        8
10101   オルリック      8
10101   ユーティライネン        7
10101   カッツァーゴ    6
10101   リベルエーリ    3